導航:首頁 > 程序命令 > vb通過命令行下載文件

vb通過命令行下載文件

發布時間:2022-07-15 03:32:35

㈠ vb 命令行 ftp

把你的VB程序拷貝到BAT和TXT文件的目錄下就行了,或者修改你的FTP.BAT,在裡面有FTP.TXT文件的地方加上全路徑名即可。

加入你原來的FTP.BAT有下面一行:
FTP -I FTP.TXT
那麼可以修改為:
FTP -I D:\DATA\FTP.TXT

㈡ 怎樣用VB在網路中下載文件

如果是頁面文件(竟伺服器解析過的HTML代碼的話),有很多,可以用XMLHTTP,browser對象等,寫起來相對都比較簡單,如果想下載伺服器源碼(程序原代碼),那要看對方網站伺服器是否支持了(或者說有這方面的漏洞或提供源代碼開放式下載)
---------------------------------------------------------------
XML HTTP的,在工程中引用XML類型庫即可,返回值就是源代碼
================================================================
你需要引用你需要在工程->引用中,選擇Microsoft XML類型庫,最好選6.0
,代碼剛做了個修改,多了個strUrl=""語句,我剛測試正常,如果需要可以傳給你,就是下邊的代碼:

public function getData(byval strUrl as string) as string
Dim objHttp As MSXML2.ServerXMLHTTP
Set objHttp = New MSXML2.ServerXMLHTTP

getData=""
On Error GoTo 0
On Error GoTo ErrSubmit

objHttp.open "GET", strUrl, False
objHttp.send

getData = Trim$(Replace(objHttp.responseText, vbCrLf, ""))

exit function
ErrSubmit:
Msgbox err.description
set objHttp= Nothing
end function
==================================
在命令按鈕的CLICK事件中寫如下代碼:

dim strData as string

strData=trim(Text1.text)
text2.Text=getData(strData)

㈢ VB程序通過命令行運行

是vb6的話,可以這么做
添加一個模塊,加入代碼
Sub
Main()
If
Command
=
"/2"
Then
Form2.Show
Else
Form1.Show
End
If
End
Sub
菜單的工程屬性里的啟動對象改為Sub
Main

㈣ 如何在命令行編譯vb程序

有vbp文件了么··那你直接菜單: 文件 -> 生成工程 就好了··不知道命令行編譯成exe是什麼意思···一般都是這么生成的啊···

㈤ vb調用迅雷下載文件

確實會有這樣的情況,但最終也沒找到辦法啊
我用的是VB6
最終解決啦~ 用的是迅雷地址
下邊是把普通地址加密為迅雷地址的函數,試試吧,我是成功啦
Public Function Base64Encode(strSource As String) As String '迅雷加密
On Error Resume Next
If UBound(arrBase64) = -1 Then
arrBase64 = Split(StrConv(cstBase64, vbUnicode), vbNullChar)
End If
Dim arrB() As Byte, bTmp(2) As Byte, bT As Byte
Dim I As Long, J As Long
arrB = StrConv(strSource, vbFromUnicode)
J = UBound(arrB)
For I = 0 To J Step 3
Erase bTmp
bTmp(0) = arrB(I + 0)
bTmp(1) = arrB(I + 1)
bTmp(2) = arrB(I + 2)

bT = (bTmp(0) And 252) / 4
Base64Encode = Base64Encode & arrBase64(bT)

bT = (bTmp(0) And 3) * 16
bT = bT + bTmp(1) \ 16
Base64Encode = Base64Encode & arrBase64(bT)

bT = (bTmp(1) And 15) * 4
bT = bT + bTmp(2) \ 64
If I + 1 <= J Then
Base64Encode = Base64Encode & arrBase64(bT)
Else
Base64Encode = Base64Encode & "="
End If

bT = bTmp(2) And 63
If I + 2 <= J Then
Base64Encode = Base64Encode & arrBase64(bT)
Else
Base64Encode = Base64Encode & "="
End If
Next
End Function

㈥ 在VB中,如何調用命令行的命令

使用SHELL()

SHELL語句用法心得

一. 調用系統「創建快捷方式」向導
是否為VB不支持創建快捷方式而於著急呢?雖然 您可以調用vb5stkit.Dll中的fCreateShellLink函 數,但它是為安裝程序設計的,快捷方式的默認路徑 總是從當前用戶的「\Start Menu\Programs」開始,也 就是說,如果您的Windows95裝在C盤上,您無法通過 fCreateShellLink函數把快捷方式創建到D盤上去。
現在,給大家介紹一種極為方便、巧妙的方法: 用Shell語句調用系統「創建快捷方式」向導。
新建一個項目,在窗體上放一個按鈕,雙擊此按 鈕,加入以下代碼:
Private Sub Command1_Click()
Open App.Path & "\temp.lnk" For Output As #1
Close #1 '以上兩句在程序所在目錄建立一 個臨時文件
Shell "Rundll32.exe AppWiz.Cpl,NewLinkHere
"& App.Path & "\temp.lnk"
End Sub
(注意:Shell語句中NewLinkHere後面跟著一個 空格才是引號,否則將出錯。)
運行程序,按一下命令按鈕,怎麼樣?「創建快 捷方式」向導出現了,如果創建成功,快捷方式將取 代臨時文件temp.lnk的位置,如果選取消,temp.lnk 也會自動消失。當然,您可以在硬碟的任意位置建立 temp.lnk。好,現在又可以為您的程序增添一項新功 能了。Enjoy!
二. Rundll32.exe的用途
我們知道,用Shell語句只能調用可執行文件,即 exe、com、bat和pif文件,有時我們想要調用其他一 些系統功能該怎麼辦呢?此時,Windows提供的 Rundll32.exe可大顯身手了。下面我們來認識一下這 些用法,也許會給您帶來一點驚喜。
1.要打開設置系統時間的控制面板文件 (Timedate.cpl),只需運行如下代碼:
Shell "Rundll32.exe
Shell32.dll,Control_RunDLL Timedate.cpl"
至於打開其他控制面板文件,相信您一定能夠舉 一反三,嘗試一下,換個文件名就成了。
2.要運行某一快捷方式(*.lnk)則可以用以下 代碼:
She11 "Rundll32.exe url.dll, FileProtocolHandler X" (X代表要運行的文件,包括 路徑,下同。
3. 也可以這樣寫來打開ActiveMovie控制:
Shell "RUNDLL32.EXE amovie.ocx,Rundll",1
而用Shell "RUNDLL32.EXE amovie.ocx,Rundll /play X",1 將直接播放媒體文件。
4. Shell "rundll32.exe desk.cpl,InstallScreenSaver X」當然是安裝屏幕保 護啦,如果你寫了一個屏幕保護程序,那麼可以在安 裝程序中寫上它,而不一定要裝到system目錄下。順 便提一下,VB不是自撈一個「Application Setup Wizard」么?它的VB源代碼都在安裝目錄下的 「\setupkit\setup1」中放著呢,好好把它研究一下。 你完全能做出富有個性的安裝程序來。
5.按住shift鍵,右擊某一文件,菜單中會出現 「打開方式」選項,這也許已不是什麼秘密。但現在, 用shell "rundll32.exe shell32.dll OpenAs_RunDLL X" 便能直接調用「打開方式」框。
6. 甚至能用這樣一句來列印文件(包括HTML所 支持的所有文本與圖像格式):
Shell "rundll32.exe MSHTML.DLL,PrintHTML X」, 1
怎麼樣?是不是小有收獲呢?這下,您一定會對 Rundll32.exe這個平時不起眼的文件另眼相待了,它 可是系統運行必不可少的部件呢!其實 Shell+Rundll32還能調用其他許多系統功能,比如關 於NetMeeting和Telnet方面的。如果您有興趣,可以 到往冊表的「我的電腦\HKEY_CLASSES_ROOT\」或「我 的電腦\HKEY_LOCAL_MACHINE\Software\CLASSES」下 去看看,本文的內容大都是從那裡「抄」來的。只要 有足夠的決心、信心、耐心,您一定能發現更多有價 值的東西。Good luck!

㈦ vb用INET1,從FTP下TXT文件

1、INET打開FTP服務需要時間,所以不推薦在with塊中執行Execute
2、Execute "ftp://1234:[email protected]", "get" & strInspectPanelId & ".txt c:\" & strInspectPanelId & ".txt"
中的get後面應該有個空格!
3、不需要寫成Execute "ftp://1234:[email protected]", "get" & strInspectPanelId & ".txt c:\" & strInspectPanelId & ".txt"
寫成Execute "", "get " & strInspectPanelId & ".txt c:\" & strInspectPanelId & ".txt"就行了!

㈧ vb 命令行

用bat文件
先寫一個bat文件,把要執行的命令寫在其中
然後shell bat文件路徑
如果想得到命令執行的結果,在命令後加 >文件名,就可以把執行的結果輸出到文件中。
例如:dir >a.txt
文件的讀寫我就不說了。

㈨ VB 通過命令行獲取多個文件路徑

dimx'x是任意
setx=createobject("WScript.Shell")'x=wscript
x.run"cmd/c。。。。"'運行相關命令,注意加/c

對了,提一下,你搞這個不用AUTOEXEC,那是DOS用的。。

㈩ 用VB如何編寫程序使打開命令提示符,同時能在命令提示符裡面寫下東西。

看你用來干什麼了如何在XP中使用「命令提示符」
對於一些還需要使用DOS程序的人來說,Windows XP中提供了一個類似Win9X的「MS-DOS方式」,現在又叫「命令提示符」,它在「開始/所有程序/附件」中。利用它我們就可以啟動許多程序,同時還提供了一個專門在DOS狀態下啟動程序的命令Start,它啟動單獨的「命令提示符」窗口來運行指定程序或命令。如果在沒有參數的情況下使用,start將打開第二個命令提示符窗口。start命令有許多參數,它的各個參數的含義如下:
"title" 指定在「命令提示符」窗口標題欄中顯示的標題。
/dPath 指定啟動目錄。
/i 將 Cmd.exe 啟動環境傳送到新的「命令提示符」窗口。
/min 啟動新的最小化「命令提示符」窗口。
/max 啟動新的最大化「命令提示符」窗口。
/separate 在單獨的內存空間啟動 16 位程序。
/shared 在共享的內存空間啟動 16 位程序。
/low 以空閑優先順序啟動應用程序。
/normal 以一般優先順序啟動應用程序。
/high 以高優先順序啟動應用程序。
/realtime 以實時優先順序啟動應用程序。
/abovenormal 以超出常規優先順序的方式啟動應用程序。
/belownormal 以低出常規優先順序的方式啟動應用程序。
/wait 啟動應用程序,並等待其結束。
/b 啟動應用程序時不必打開新的「命令提示符」窗口。除非應用程序啟用CTRL+C,否則將忽略 CTRL+C操作。使用 CTRL+BREAK 中斷應用程序。
其實,用start命令可以啟動任意的Windows程序,比如你要啟動 Notepad(記事本程序),而又在附件中找不到的話,在開始的運行菜單中鍵入start notepad,Windows XP就會打開記事本。

閱讀全文

與vb通過命令行下載文件相關的資料

熱點內容
自己購買雲主伺服器推薦 瀏覽:414
個人所得稅java 瀏覽:756
多餘的伺服器滑道還有什麼用 瀏覽:184
pdf劈開合並 瀏覽:21
不能修改的pdf 瀏覽:745
同城公眾源碼 瀏覽:481
一個伺服器2個埠怎麼映射 瀏覽:288
java字元串ascii碼 瀏覽:69
台灣雲伺服器怎麼租伺服器 瀏覽:468
旅遊手機網站源碼 瀏覽:325
android關聯表 瀏覽:938
安卓導航無聲音怎麼維修 瀏覽:328
app怎麼裝視頻 瀏覽:427
安卓系統下的軟體怎麼移到桌面 瀏覽:89
windows拷貝到linux 瀏覽:765
mdr軟體解壓和別人不一樣 瀏覽:897
單片機串列通信有什麼好處 瀏覽:333
游戲開發程序員書籍 瀏覽:855
pdf中圖片修改 瀏覽:281
匯編編譯後 瀏覽:484