10 lines
238 B
Plaintext
10 lines
238 B
Plaintext
<%
|
|
strText="Sample text"
|
|
Set objFSO = CreateObject("Scripting.FileSystemObject")
|
|
Set objFile = objFSO.CreateTextFile("c:\testfile.txt", True)
|
|
objFile.Write (strText)
|
|
|
|
objFile.close
|
|
Set objFile=nothing
|
|
Set objFSO=nothing
|
|
%> |