lcRemoteUrl = "http://www.
lcLocalFile = "c:\xxx.txt"
lcStr=FileToStr("c:\xxx.txt")
? lcStr
Declare Integer DeleteUrlCacheEntry In Wininet.Dll String szUrl
Declare Integer URLDownloadToFile In urlmon.Dll Integer pCaller,String szURL,;
String szFileName,Integer dwReserved,Integer lpfnCB
=DeleteUrlCacheEntry(lcRemoteUrl) &&清理缓存
If URLDownloadToFile(0,lcRemoteUrl,lcLocalFile,0,0)<>0
Messagebox('读取数据失败!',48,'信息提示')
Return
Endif
出现了内容,不会编辑