= DownloadRemote('http://www.levelextreme.com', 'c:\temp\test.txt') >MODI FILE 'c:\temp\test.txt' NOWAIT > >FUNCTION DownloadRemote(lcRemoteFile, lcLocalFile) >* downloading a remote file to a local file > DECLARE INTEGER URLDownloadToFile IN urlmon; > INTEGER, STRING, STRING, INTEGER, INTEGER > WAIT WINDOW NOWAIT "Downloading remote file..." > = URLDownloadToFile(0, lcRemoteFile, lcLocalFile, 0,0) = 0 > WAIT CLEAR