㈠ 易語言ftp文件上傳的問題
.版本 2
.支持庫 downlib
.支持庫 iext
.支持庫 internet
.程序集變數 上傳文件, FTP上傳對象
.程序集變數 參數, 任務參數
.子程序 上傳
參數.類型 = 2 + 3 ' 參數詳見提示
參數.傳送類型 = 1
參數.文件地址 = 「ftp://」 + FTP地址 + 「/」 + FTP賬號 + 「/1/1.txt」 ' 這里是FTP伺服器路徑,可以修改。
參數.用戶名 = FTP賬號
參數.用戶密碼 = FTP密碼
參數.本地文件路徑 = 「c:\1.txt」 ' 這里的文件名是需要上傳的文件路徑,可以修改。
參數.線程等待超時 = 1000
透明標簽1.標題 = 「正在連接伺服器...」
透明標簽2.標題 = 「正在上傳文件...」
.判斷開始 (連接FTP伺服器 (FTP地址, FTP賬號, FTP密碼, , ))
透明標簽1.標題 = 「已連接!」
輸出調試文本 (FTP取現行目錄 () + 「aaa」)
.默認
透明標簽1.標題 = 「連接失敗!」
返回 ()
.判斷結束
' 雙線內代碼為測試伺服器是否可用,可以不需要
上傳文件.上傳文件 (參數)
㈡ 怎樣用易語言進行ftp上傳,不要模塊,有易語言寫CMD命令也行
簡單的寫一個 窗口內需要 按鈕1 通用對話框1 兩個控制項
.版本 2
.支持庫 internet
.子程序 _按鈕1_被單擊
.局部變數 文件名, 文本型
.如果 (連接FTP伺服器 (「192.168.1.1」, 「」, 「」, 21, ) = 真)
.如果真 (通用對話框1.打開 () = 真 且 通用對話框1.文件名 ≠ 「」) ' 判斷是否打開了文件
文件名 = 取文本右邊 (通用對話框1.文件名, 取文本長度 (通用對話框1.文件名) - 倒找文本 (通用對話框1.文件名, 「\」, , 假)) ' 取出被打開的文件名
.如果 (FTP文件上傳 (通用對話框1.文件名, 文件名, 假) = 真)
信息框 (「上傳文件 」 + 文件名 + 「 成功!」, 0, )
.否則
信息框 (「上傳文件 」 + 文件名 + 「 失敗!」, 0, )
.如果結束
.如果真結束
.否則
信息框 (「連接失敗」, 0, )
㈢ 易語言怎麼上傳js文件到ftp伺服器,試了好多方法都不行
文件應該沒有擴展名的區別,剛網路上隨便找了一個免費FTP測試,測試結果
沒有任何問題,如果你是所有JS文件都不能上傳可能是伺服器的限制。
調試輸出 (FTP文件上傳 (「C: itle.js」, 「 itle1.js」, ))
是不是伺服器限制上傳JS。你可以進行甄別,例如隨便將一個文本文件修改為JS的擴展名。如果失敗,就是伺服器上禁止了此類型的文件上傳。
如果是這種情況,將擴展名修改成txt。上傳後在重命名回來。
㈣ 易語言如何實現FTP上傳
先連接到伺服器:
連接FTP伺服器
(,
,
,
,
)
然後就可以上傳了:
FTP文件上傳
(,
,
)
要填的參數在易里都有說明。
㈤ 易語言ftp上傳文件
[e=1].版本 2
.支持庫 spec
.子程序 _按鈕1_被單擊
.局部變數 ftp, 類_FTP
.如果真 (ftp.連接FTP伺服器 (地址, 帳號, 密碼, 21, ))
.如果真 (ftp.文件上傳 (取運行目錄 () + 「\123.txt」, 「/123.txt」, ))
調試輸出 (「上傳成功」)
.如果真結束
[/e]
1.文件上傳,返回的是真嗎。 是否上傳成功,如果成功了說明命令沒有問題,是參數的問題。
2.文件上傳的第二個參數,去掉IP地址試試。
㈥ 易語言編輯框內容上傳到ftp
有兩種方法,一種是在你的FTP伺服器上安裝SQL資料庫,在個人電腦的客戶端直接連接到SQL資料庫將提交的內容進行保存,另一種方法是開發伺服器端和客戶端,將伺服器端安裝在你的FTP伺服器上,客戶端運行時連接伺服器端,伺服器端將接收到的數據保存到伺服器上
㈦ 易語言FTP文件上傳的一個問題!
暈、一個是FTP伺服器上文件的路徑,一個是本地的文件路徑~ ,,,FTP文件那個地方你就填
取現行FTP目錄()+「」←裡面填你要上傳位置的文件名注意加/,例如:取現行FTP目錄()+「/abc.txt」
㈧ 易語言FTP上傳
.版本 2
.支持庫 downlib
.子程序 _添加用戶_創建完畢
伺服器名 = 「10.110.160.23」
登錄名 = 「jjwnet」
登錄密碼 = 「1」
.如果真 (全局輔助對象.連接FTP伺服器 (「ftp://」 + 伺服器名 + 「/others/」, 登錄名, 登錄密碼, 21, , ) = 假)
信息框 (「無法連接伺服器」, 0, )
銷毀 ()
.版本 2
.支持庫 downlib
.子程序 上傳文件
.參數 服務端文件名, 文本型
.參數 本地文件名, 文本型, ,
.局部變數 任務參數, 任務參數
任務參數.類型 = #傳送常量.上傳
任務參數.用戶名 = 登錄名
任務參數.用戶密碼 = 登錄密碼
任務參數.本地文件路徑 = 本地文件名
輸出調試文本 (任務參數.本地文件路徑)
任務參數.文件地址 = 服務端文件名
輸出調試文本 (任務參數.文件地址)
任務參數.交互回調函數 = &交互回調函數
任務參數.日誌回調函數 = &日誌回調函數
全局上傳對象.上傳文件 (任務參數)
.子程序 交互回調函數, 整數型, , 同名覆蓋
.參數 消息類型, 整數型
.參數 線程信息, 整數型
.參數 參數3, 整數型
.參數 參數4, 整數型
.參數 對象信息, 整數型
.局部變數 獲得對象標記, 整數型
.局部變數 內容, 文本型
.局部變數 新文件名, 文本型
.局部變數 線程組, 整數型, , "0"
' 成員<15>的中文名稱為「交互回調函數」,英文名稱為「MutualCallBack」,類型為「子程序指針(SubPtr)」。
' 注冊一個回調函數,系統產生需要交互的消息時調用此函數,具體消息請參見傳送常量中設置的消息常量。如果為0則不接收,默認為0。回調函數需要有5個參數,一個整數型的返回值。返回值根據消息類型的不同而不同,如果沒有說明則返回值沒有意義。參見具體的消息第一個參數(整數型)消息類型,參見「傳送常量。」第二個參數(整數型),線程信息,可以通過」取線程信息「獲得每個上傳或下載對象的線程信息,與本參數比較從而確定發送本消息的對象第三個參數(整數型)根據消息類型的不同而不同,參見具體的消息第四個參數(整數型)根據消息類型的不同而不同,參見具體的消息第五個參數(整數型),對象信息,可以通過「取對象信息」獲得下載或上傳對象的信息與本參數比較,從而確定本消息屬於哪個對象。
.如果真 (消息類型 = #傳送常量.發現存在文件)
返回 (#傳送常量.覆蓋) ' 發現有同名文件存在,則覆蓋
.如果真結束
返回 (0)
.子程序 日誌回調函數
.參數 線程信息, 整數型
.參數 時間, 文本型
.參數 內容, 文本型
.參數 消息類型, 整數型
.參數 對象信息, 整數型
.局部變數 日誌內容, 文本型
.版本 2
.支持庫 dp1
.子程序 _按鈕1_被單擊
.局部變數 文件名, 文本型
文件名 = 「d/xxxxxx.txt」
上傳文件 (「ftp://」 + 伺服器名 + 「/databases/」 +「xxxxxx.txt」, 文件名)
延時 (1000)
信息框 (「上傳成功」, 0, 「finish」)
㈨ 易語言FTP文件上傳問題,感激~
可以像圖片里寫。
其中FTP地址、賬號、密碼區你可以用編輯框來代替。其它的我就不多說了。
㈩ 易語言 ftp的操作
.版本 2
.支持庫 iext
.支持庫 internet.局部變數 項目類型, 整數型
.局部變數 選中項, 整數型
.局部變數 當前目錄, 文本型
.局部變數 容器1, 整數型選中項 = 遠程文件框.現行選中項
.如果真 (選中項 = -1)
返回 ()
.如果真結束
項目類型 = 遠程文件框.取表項數值 (選中項)當前目錄 = FTP取現行目錄 ()
.判斷開始 (項目類型 = 0) ' 是否為到上目錄
容器1 = 倒找文本 (當前目錄, 「/」, , 真)
.如果真 (容器1 ≠ -1)
當前目錄 = 取文本左邊 (當前目錄, 容器1)
.如果真 (當前目錄 ≠ 「/」)
當前目錄 = 取文本左邊 (當前目錄, 容器1 - 1)
.如果真結束
FTP置現行目錄 (當前目錄)
填充遠程框 ()
.如果真結束.判斷 (項目類型 = 1) ' 是否到子目錄
.如果真 (取文本右邊 (當前目錄, 1) ≠ 「/」)
當前目錄 = 當前目錄 + 「/」
.如果真結束
FTP置現行目錄 (當前目錄 + 遠程文件框.取標題 (選中項, ))
填充遠程框 ()
.默認.版本 2
.支持庫 iext
.支持庫 internet.子程序 填充遠程框
.局部變數 文件名, 文本型, , "0"
.局部變數 文件尺寸, 整數型, , "0"
.局部變數 文件屬性, 整數型, , "0"
.局部變數 文件時間, 日期時間型, , "0"
.局部變數 數目, 整數型
.局部變數 容器1, 整數型
.局部變數 名稱, 文本型
.局部變數 索引, 整數型
.局部變數 現行目錄, 文本型遠程文件框.全部刪除 ()狀態標簽.標題 = 「正在獲取目錄列表,請稍候...」
狀態標簽.刷新顯示 () ' 立即顯示改變後的標題
數目 = FTP目錄列表 (「*.*」, , 文件名, 文件屬性, 文件尺寸, 文件時間)
' 填充目錄
現行目錄 = FTP取現行目錄 ()
.如果真 (現行目錄 ≠ 「/」)
遠程文件框.插入表項 (, , 0, , , 0) ' 如果不是根目錄,則插入到父目錄的特殊表項
.如果真結束.計次循環首 (數目, 容器1)
.如果真 (位與 (文件屬性 [容器1], #子目錄) ≠ 0)
名稱 = 文件名 [容器1]
.如果真 (取文本左邊 (名稱, 1) ≠ 「.」)
索引 = 遠程文件框.插入表項 (, 名稱, 1, , , 1)
遠程文件框.置標題 (索引, 2, 到文本 (文件時間 [容器1]))
.如果真結束 .如果真結束.計次循環尾 ()
' 填充文件
.計次循環首 (數目, 容器1)
.如果真 (位與 (文件屬性 [容器1], #子目錄) = 0)
索引 = 遠程文件框.插入表項 (, 文件名 [容器1], 2, , , 2)
遠程文件框.置標題 (索引, 1, 到文本 (文件尺寸 [容器1]))
遠程文件框.置標題 (索引, 2, 到文本 (文件時間 [容器1]))
.如果真結束.計次循環尾 ()