ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

ASP Ū¨ú TXT ¤å¦rÀÉ

ASP Ū¨ú TXT ¤å¦rÀÉ

<html>

<head>
<title></title>
</head>

<body>
<%
Set fs = CreateObject("Scripting.FileSystemObject")
Set ts = fs.OpenTextFile ("c:\MyText.txt")
'¥u·|Ū¨ú²Ä¤@¦æªº¸ê®Æ
Do While ts.AtEndOfLine <> True
   Response.write ts.Read(1)
   ts.skip(1)
Loop
ts.Close
%>
</body>
</html>
µ{¦¡¤H­û

        ÀR«ä¦Û¦b : ¦³Ä@©ñ¦b¤ß¸Ì¡A¨S¦³¨­Åé¤O¦æ¡A¥¿¦p¯Ñ¥Ð¤£¼½ºØ¡A¬Ò¬OªÅ¹L¦]½t¡C
ªð¦^¦Cªí ¤W¤@¥DÃD