先確定這個自動接收文件的腳本是在windows上還是在linux上。
如果是windows上，按理說應該不用改，如果是linux上，那就查看一下crontab 里邊是否有
自動執行的腳本，或者直接問以前布置這個腳本的人。需要改什麼東西。
⑵ windowsftp如何獲取文件夾下所有的文件
可以通過命令窗口來打開所有的文件。具體步驟如下：
點擊win+R後輸入cmd打開dos命令窗口。
打開需獲取文件名的位置。
獲取名稱，命令格式：dir/b文件目標盤符文件夾位置(可省略)目標名稱.目標後綴。
獲取文件大小及文件名、修改時間（文件大小需處理）。
Microsoft Surface是一個由微軟所開發的第一款平面電腦，結合硬體與軟體的新技術，用家可以直接用手或聲音對屏幕作出指令，觸摸和其他外在物理物來和電腦進行交互，毋須再依賴會令手部勞損的滑鼠與鍵盤。
⑶ 請教高手，用批處理命令FTP自動下載文件。
① 如果我理解沒錯，遠端目錄，最深層的那個子目錄（名稱是日期）的那個，每天都是變的；你要下載的是裡面的文件（不含子目錄）；文件下載到本地E:dzyl下，而且目錄也是按伺服器上的日期創建。
② 批處理固定每天運行，從伺服器前一天的目錄下載文件。
如果理解正確，那麼下面的代碼可以實現（已測試過），ip地址你需要修改！你的操作系統如果是英文，也需呀修改（具體看腳本中的提示）
@echooff&
set"ftp_site=19.6.5.34"
set"ftp_id=pracq"
set"ftp_pwd=123456"
set"ftp_remote_dir=/ftp/bos/at/pracq/"
set"ftp_local_dir=E:dzyl"
:100
set"ftpcmd={{%random%}}.ftp"
ifexist%ftpcmd%goto100
::英文系統用下面這個，把下面一行中的::去除
::set"today=%date:~6,4%%date:~0,2%%date:~3,2%"
::中文系統用下面這個，如果是英文，在下面一行句首添加::
set"today=%date:~0,4%%date:~5,2%%date:~8,2%"
settoday=!today:~0,4!-!today:~4,2!-!today:~-2!
call:Date2Day!today!1Yesterday
setftp_remote_dir=!ftp_remote_dir!!yesterday!
>%ftpcmd%echoopen!ftp_site!
>>%ftpcmd%echo!ftp_id!
>>%ftpcmd%echo!ftp_pwd!
>>%ftpcmd%echocd!ftp_remote_dir!
>>%ftpcmd%echobye
for/f%%iin('ftp-s:%ftpcmd%')doif{%%i}=={550}(
!
gotoend
)
setftp_local_dir=!ftp_local_dir!!yesterday!
md!ftp_local_dir!1>nul2>&1
ifnotexist!ftp_local_dir!(
!
gotoend
)
>%ftpcmd%echoopen!ftp_site!
>>%ftpcmd%echo!ftp_id!
>>%ftpcmd%echo!ftp_pwd!
>>%ftpcmd%echocd!ftp_remote_dir!
>>%ftpcmd%echolcd!ftp_local_dir!
>>%ftpcmd%echobinary
>>%ftpcmd%echopromptn
>>%ftpcmd%echomget*.*
>>%ftpcmd%echobye
set/acount=0
for/f%%iin('ftp-s:%ftpcmd%')do(
if{%%i}=={226}set/acount=!count%+1
)
if!count!gtr0(
echoDone.!count!file^(s^)downloaded.
)else(
echoNofilehasbeendownloaded.
)
gotoend
:Date2Day
::call:Date2Day2007-11-122Day
@echooff&setlocal
for/f"tokens=1-3delims=/-:,"%%ain('echo/%~1')do(
set/ayy=%%a,mm=100%%b%%100,dd=100%%c%%100
)
set/az=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
set/aj=j/5+dd+y*365+y/4-y/100+y/400-2472633
set/ai=j-%~2,a=i+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set/ad=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set/add=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
(if%mm%LSS10setmm=0%mm%)&(if%dd%LSS10setdd=0%dd%)
endlocal&set%~3=%yy%%f%%mm%%f%%dd%&
goto:eof
:end
ifexist%ftpcmd%(typenul>%ftpcmd%&&del/f/q%ftpcmd%1>nul2>&1)
endlocal&@echoon
測試運行結果：
Done.5file(s)downloaded.
⑷ 如何使用bat命令直接下載指定ftp上面的指定文件
ftp下載文件一般步驟如下：
echo open xxx.xxx.xxx.xxx >ftp.txt
echo user >>ftp.txt
echo password >>ftp.txt
echo binary >>ftp.txt [可選]
echo get srv.exe >>ftp.txt
echo bye >>ftp.txt
ftp -s:ftp.txt(這一步是關鍵喲)
del ftp.txt
存為*.bat
⑸ VB 如何獲取FTP上的文件
要用到inet控制項。public strData as string
'這段可以返回伺服器中的第一級目錄名，保存在strData中， 如有多個文件夾名每個文件夾名會以空格分開。讀取時判段一下。
Inet1.Execute Inet1.URL, "dir """ & dirName & """"
Do
DoEvents
Loop While Inet1.StillExecuting = True
msgbox strData
'這段是進入目錄中，要想獲得伺服器中所有的文件夾名，就可以用遞規的辦法來獲得。
Inet1.Execute Inet1.URL, "cd """ & dirName & """"
Do
DoEvents
Loop While Inet1.StillExecuting = True
Private Sub Inet1_StateChanged(ByVal State As Integer)
Select Case State
Case 1
StatusBar1.Panels.Item(1).Text = "該控制項正在查詢所指定的主機的 IP 地址"
Case 2
StatusBar1.Panels.Item(1).Text = "該控制項已成功地找到所指定的主機的 IP 地址"
Case 3
StatusBar1.Panels.Item(1).Text = "該控制項正在與主機連接"
Case 4
StatusBar1.Panels.Item(1).Text = "該控制項已與主機連接成功"
Case 5
StatusBar1.Panels.Item(1).Text = "該控制項正在向主機發送請求"
Case 6
StatusBar1.Panels.Item(1).Text = "該控制項發送請求已成功"
Case 7
StatusBar1.Panels.Item(1).Text = "該控制項正在接收主機的響應"
Case 8
StatusBar1.Panels.Item(1).Text = "該控制項已成功地接收到主機的響應"
Case 9
StatusBar1.Panels.Item(1).Text = "該控制項正在解除與主機的連接"
Case 10
StatusBar1.Panels.Item(1).Text = "該控制項已成功地與主機解除了連接"
Case 11
MsgBox "與主機通訊時出現了錯誤", vbInformation, "個人資料"
Case 12
Dim vtData As Variant
Dim bDone As Boolean
bDone = False
'取得第一個塊。
vtData = Inet1.GetChunk(1024, icString)
DoEvents
Do While Not bDone
strData = strData & vtData
'取得下一個塊。
vtData = Inet1.GetChunk(1024, icString)
DoEvents
If Len(vtData) = 0 Then
bDone = True
End If
Loop
StatusBar1.Panels.Item(1).Text = "該請求已經完成，並且所有數據均已接收到"
Case Else
StatusBar1.Panels.Item(1).Text = Inet1.ResponseCode & ": " & Inet1.ResponseInfo
End Select
End Sub
關於inet控制項的祥細用法可以看msdn中的幫助。