 |
|
|
작성일 : 11-09-22 18:39
|
글쓴이 :
권오준
조회 : 3,427
|
기존의 소스에 이부분을 추가 하시면 됩니다.^^
FOR nI := 1 TO LEN( aUpdated )
cFile := aUpdated[ nI ][ 1 ]
cTarget := ".\tmp\"+ cFile
nSize := aUpdated[ nI ][ 4 ]
Dr_metRefresh( oMeterNow, 0 )
lFail := .f.
cDownload := Dr_Nowdir()+"\wget.exe "
cDownload += "http://"+GetServer()+"/"+cFolder+"/"+cFile
cDownload += " -O" + cTarget
memoWrit("a.txt", cDownload )
FErase( cTarget )
IF WaitRun( cDownload, 0 ) <> 0
lFail := .t.
exit
ENDIF
Dr_metRefresh( oMeterTot, nI )
NEXT
|
|
|
|
|
 |
