12 lines
235 B
Plaintext
12 lines
235 B
Plaintext
|
<%
|
||
|
|
Set objFSO = CreateObject("Scripting.FileSystemObject")
|
||
|
|
Set objFile = objFSO.OpenTextFile("c:\testfile.txt")
|
||
|
|
strText = objFile.ReadLine
|
||
|
|
|
||
|
|
objFile.close
|
||
|
|
Set objFile=nothing
|
||
|
|
Set objFSO=nothing
|
||
|
|
|
||
|
|
%>
|
||
|
|
|
||
|
|
<% =strText %><br>
|