ªð¦^¦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 : ¤£©È¨Æ¦h¡A¥u©È¦h¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD