Re: [VB6 ] 有關inet 的引用

看板Visual_Basic作者b8888 (b8888)時間17年前 (2009/02/25 15:15)推噓2(2推 0噓 1→)

留言3則, 2人參與討論串2/2 (看更多)

: 推 Y78:改成 form1.inet1 02/24 18:54 先謝謝Y78大大的說明小弟後來想到可以放到Form_Load中所以改寫程式 Private Sub Form_Load() With Inet1 .URL = "ftp://1XX.X.1XX.2XX" .UserName = "USER" .Password = "PWD" .Execute , "get F1.txt D:\F1.txt ' .Execute , "CLOSE" '關閉連接。 End With 'End === > 這邊搞不定 End Sub 現在有一個問題是如果有加end的指令在執行後會自動結束程式;但不會下載檔案 ^^^^^^^ ^^^^^^^^^^^^^^^ 如果有没有加end的指令在執行後不會結束程式(會秀出表單);但會下載檔案 ^^^^^^^^^^ ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 想請問的是~~~ 我該如何做可以下載檔案;程式也可以自動結束? ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 或是有什麼方法去判斷檔案已下載完成? 我有試過 Private Sub Inet1_StateChanged(ByVal State As Integer) 去抓 state=12 但是卻不會跳到 stat=12 的選項?--> 在Form_Load()下謝謝您回答 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 163.29.241.8

推

Y78

02/25 22:21, , 1^F

02/25 22:21, 1^F

推

fumizuki

02/25 22:24, , 2^F

02/25 22:24, 2^F

→

fumizuki

02/25 22:24, , 3^F

02/25 22:24, 3^F