Set Fsys=CreateObject("Scripting.FileSystemObject") set fso=Fsys.opentextfile("C:/Documents and Settings/Administrator/桌面/所有内容.txt",1) do while fso.atendofstream<>true txt = fso.readline msgbox txt set fso = nothing |
Set Fsys=CreateObject("Scripting.FileSystemObject") set fso=Fsys.opentextfile("C:/Documents and Settings/Administrator/桌面/所有内容.txt",1) do while fso.atendofstream<>true txt = fso.readline msgbox txt set fso = nothing |