使用PB调用API自动更新(非FTP模式)(四、统计复制文件数量函数F_CONNECT_COPYCOUNT)(4) end choose end if end if next else //判断文件,比较和下载 ls_filename1 = ls_directorya1 + '\' + ls_file ls_filename2 = ls_directorya2 + '\' + ls_file if fileexists(ls_filename2) = false then ll_k++ else ll_filehandle1 = FindFirstFileA(ls_filename1,ss_file1) FindClose(ll_filehandle1) ll_filehandle2 = FindFirstFileA(ls_filename2,ss_file2) FindClose(ll_filehandle2) choose case CompareFileTime(ss_file1.ftlastwritetime,ss_file2.ftlastwritetime) case 0 //两个时间相等,就返回零 case 1 //如lpFileTime2小于lpFileTime1,返回1 //下载 choose case lower(ls_file) case 'hbky_autodown.exe' //下载程序
case 'hbky_autodown.pbd'
//case 'autodown.ini'
case else ll_k++ end choose case -1 //如lpFileTime1小于lpFileTime2,返回-1 end choose end if end if Next return ll_k