使用PB调用API自动更新（非FTP模式）（四、统计复制文件数量函数F_CONNECT_COPYCOUNT）

使用PB调用API自动更新（非FTP模式）（四、统计复制文件数量函数F_CONNECT_COPYCOUNT）(2)   
  ls_file = ls_directoryb1 + '\*.*'
  lb_filecopy2.DirList(ls_file, 0+1+2+16)
  ll_filecountb1 = lb_filecopy2.TotalItems()
  for ll_cnt2 = 1 to ll_filecountb1
   ls_File = lb_filecopy2.Text(ll_cnt2)
   
   if left(ls_file,1) = '[' then
    ls_filename = right(ls_file,len(ls_file) - 1)
    ls_filename = left(ls_filename,len(ls_filename) - 1)
    
    if ls_filename = '..' then continue
    
    ls_directoryc1 = ls_directoryb1 + '\' + ls_filename
    ls_directoryc2 = ls_directoryb2 + '\' + ls_filename
    if directoryexists(ls_directoryc2) = false then
     ll_k++
    end if
    
    ls_file = ls_directoryc1 + '\*.*'
    lb_filecopy3.DirList(ls_file, 0+1+2+16)
    ll_filecountc1 = lb_filecopy3.TotalItems()
    for ll_cnt3 = 1 to ll_filecountc1
     ls_File = lb_filecopy3.Text(ll_cnt3)
     if ls_file = '[..]' then continue
     //判断文件，比较和下载
     ls_filename1 = ls_directoryc1 + '\' + ls_file
     ls_filename2 = ls_directoryc2 + '\' + 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)