​x
 
<html>
<body>
​
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
​
Set f=fs.OpenTextFile(Server.MapPath("testread.txt"), 1)
Response.Write(f.Read(2))
Response.Write("<p>鎸囬拡鐩墠浣嶄簬鏂囨湰鏂囦欢涓殑浣嶇疆 " & f.Column & "銆�</p>")
f.Close
​
Set f=Nothing
Set fs=Nothing
%>
​
</body>
</html>
​