Internet Transfer 控件支持超文本傳輸協(xié)議 (HTTP) 和文件傳輸協(xié)議 (FTP)，它們是 Internet 網上使用最廣泛的兩種協(xié)議。
創(chuàng)新互聯(lián)公司成立于2013年，先為威遠等服務建站，威遠等地企業(yè)，進行企業(yè)商務咨詢服務。為威遠企業(yè)網站制作PC+手機+微官網三網同步一站式服務解決您的所有建站問題。
使用 HTTP 協(xié)議，可以連接全球信息網（World Wide Web）服務器，以檢索 HTML 文檔。使用 FTP 協(xié)議可以在 FTP 服務器上登錄，以下載和加載文件。UserName 和 Password 屬性可讓您在要求驗證身份的私有的服務器上進行登錄。另外，也可以連接公用的 FTP 服務器，并下載文件。Execute 方法支持普通的 FTP 命令，如 CD 和 GET。
webbrowser就是一個瀏覽器。
主要的區(qū)別：
inet沒有界面，webbrowser有，inet可以使用：請求、回應的方式發(fā)送web指令實現(xiàn)，而webbrowser是一個瀏覽器。
inet不負責解析HTML的內容，但是webbrowser可以解析
1.ifconfig 查看網絡接口狀態(tài)ifconfig 如果不接任何參數，就會輸出當前網絡接口的情況；[root@ubuntu ~]# ifconfigeth0 Link encap:Ethernet HWaddr 00:03:0E:25:36:41inet addr:192.168.17.110 Bcast:192.168.17.255 Mask:255.255.255.0inet6 addr: fe80::203:dff:fe27:8641/64 Scope:LinkUP BROADCAST RUNNING MULTICAST MTU:1500 Metric:1RX packets:618 errors:0 dropped:0 overruns:0 frame:0TX packets:676 errors:0 dropped:0 overruns:0 carrier:0collisions:0 txqueuelen:1000RX bytes:491238 (479.7 KiB) TX bytes:86286 (84.2 KiB)Interrupt:5 Base address:0x8c00lo Link encap:Local Loopbackinet addr:127.0.0.1 Mask:255.0.0.0inet6 addr: ::1/128 Scope:HostUP LOOPBACK RUNNING MTU:16436 Metric:1RX packets:1692 errors:0 dropped:0 overruns:0 frame:0TX packets:1692 errors:0 dropped:0 overruns:0 carrier:0collisions:0 txqueuelen:0RX bytes:3174550 (3.0 MiB) TX bytes:3174550 (3.0 MiB)eth0 表示第一塊網卡， 其中 HWaddr 表示網卡的物理地址，可以看到目前這個網卡的物理地址(MAC地址）是 00:03:0E:25:36:41; inet addr 用來表示網卡的IP地址，此網卡的 IP地址是 192.168.17.110，廣播地址， Bcast:192.168.17.255，掩碼地址Mask:255.255.255.0lo 是表示主機的回壞地址，這個一般是用來測試一個網絡程序，但又不想讓局域網或外網的用戶能夠查看，只能在此臺主機上運行和查看所用的網絡接口。比如把 HTTPD服務器的指定到回壞地址，在瀏覽器輸入 127.0.0.1 就能看到你所架WEB網站了。但只是您能看得到，局域網的其它主機或用戶無從知道；如果想知道主機所有網絡接口的情況，請用下面的命令；[root@ubuntu ~]#ifconfig -a如果想查看某個端口，比如查看eth0 的狀態(tài)，就可以用下面的方法；[root@ubuntu ~]#ifconfig eth02.ifconfig 配置網絡接口ifconfig 可以用來配置網絡接口的IP地址、掩碼、網關、物理地址等；值得一說的是用ifconfig 為網卡指定IP地址，這只是用來調試網絡用的，并不會更改系統(tǒng)關于網卡的配置文件。如果您想把網絡接口的IP地址固定下來，目前有三個方法：一是通過各個 發(fā)行和版本專用的工具來修改IP地址；二是直接修改網絡接口的配置文件；三是修改特定的文件，加入ifconfig 指令來指定網卡的IP地址，比如在redhat或Fedora中，把ifconfig 的語名寫入/etc/rc.d/rc.local文件中；ifconfig 配置網絡端口的方法：ifconfig 工具配置網絡接口的方法是通過指令的參數來達到目的的，我們只說最常用的參數；ifconfig 網絡端口 IP地址 hw MAC地址 netmask 掩碼地址 broadcast 廣播地址 [up/down]＊ 實例一：比如我們用ifconfig 來調試 eth0網卡的地址[root@ubuntu ~]#ifconfig eth0 down[root@ubuntu ~]#ifconfig eth0 192.168.17.100 broadcast 192.168.17.255 netmask 255.255.255.0[root@ubuntu ~]#ifconfig eth0 up[root@ubuntu ~]#ifconfig eth0eth0 Link encap:Ethernet HWaddr 00:03:0E:25:36:41inet addr:192.168.17.110 Bcast:192.168.17.255 Mask:255.255.255.0inet6 addr: fe80::203:dff:fe27:8641/64 Scope:LinkUP BROADCAST RUNNING MULTICAST MTU:1500 Metric:1RX packets:618 errors:0 dropped:0 overruns:0 frame:0TX packets:676 errors:0 dropped:0 overruns:0 carrier:0collisions:0 txqueuelen:1000RX bytes:491238 (479.7 KiB) TX bytes:86286 (84.2 KiB)Interrupt:5 Base address:0x8c00第一行：ifconfig eth0 down 表示如果eth0是激活的，就把它DOWN掉。此命令等同于 ifdown eth0；第二行：用ifconfig 來配置 eth0的IP地址、廣播地址和網絡掩碼；第三行：用ifconfig eth0 up 來激活eth0 ； 此命令等同于 ifup eth0第四行：用 ifconfig eth0 來查看 eth0的狀態(tài)；當然您也可以用直接在指令IP地址、網絡掩碼、廣播地址的同時，激活網卡；要加up參數；比如下面的例子；[root@ubuntu ~]#ifconfig eth0 192.168.17.110 broadcast 192.168.17.255 netmask 255.255.255.0 up＊ 實例二：在這個例子中，我們要學會設置網絡IP地址的同時，學會設置網卡的物理地址（MAC地址）；比如我們設置網卡eth1的IP地址、網絡掩碼、廣播地址，物理地址并且激活它；[root@ubuntu ~]#ifconfig eth1 192.168.17.252 hw ether 00:03:0E:25:36:41 netmask 255.255.255.0 broadcast 192.168.17.255 up或[root@ubuntu ~]#ifconfig eth1 hw ether 04:64:03:00:12:51[root@ubuntu ~]#ifconfig eth1 192.168.17.252 netmask 255.255.255.0 broadcast 192.168.17.255 up其中 hw 后面所接的是網絡接口類型， ether表示乙太網， 同時也支持 ax25 、ARCnet、netrom等，詳情請查看 man ifconfig ；3.如何用ifconfig 來配置虛擬網絡接口有時我們?yōu)榱藵M足不同的需要還需要配置虛擬網絡接口，比如我們用不同的IP地址來架運行多個HTTPD服務器，就要用到虛擬地址；這樣就省卻了同一個IP地址，如果開設兩個的HTTPD服務器時，要指定端口號。虛擬網絡接口指的是為一個網絡接口指定多個IP地址，虛擬接口是這樣的 eth0:0 、 eth0:1、eth0:2 ... .. eth1N。當然您為eth1 指定多個IP地址，也就是 eth1:0、eth1:1、eth1:2 ... ...以此類推；其實用ifconfig 為一個網卡配置多個IP地址，就用前面我們所說的ifconfig的用法，這個比較簡單；看下面的例子；[root@ubuntu ~]#ifconfig eth1:0 192.168.17.251 hw ether 00:03:0E:25:36:41 netmask 255.255.255.0 broadcast 192.168.17.255 up或[root@ubuntu ~]#ifconfig eth1 hw ether 00:03:0E:25:36:41[root@ubuntu ~]#ifconfig eth1 192.168.17.251 netmask 255.255.255.0 broadcast 192.168.17.255 up注意：指定時，要為每個虛擬網卡指定不同的物理地址；在 Redhat/Fedora 或與Redhat/Fedora類似的系統(tǒng)，您可以把配置網絡IP地址、廣播地址、掩碼地址、物理地址以及激活網絡接口同時放在一個句子中，寫入/etc/rc.d/rc.local中。比如下面的例子；ifconfig eth1:0 192.168.17.250 hw ether 00:11:22:33:44:55 netmask 255.255.255.0 broadcast 192.168.17.255 upifconfig eth1:1 192.168.17.249 hw ether 00:11:00:33:11:55 netmask 255.255.255.0 broadcast 192.168.17.255 up解說：上面是為eth1的網絡接口，設置了兩個虛擬接口；每個接口都有自己的物理地址、IP地址... ...4.如何用ifconfig 來激活和終止網絡接口的連接激活和終止網絡接口的用 ifconfig 命令，后面接網絡接口，然后加上 down或up參數，就可以禁止或激活相應的網絡接口了。當然也可以用專用工具ifup和ifdown 工具；[root@ubuntu ~]#ifconfig eth0 down[root@ubuntu ~]#ifconfig eth0 up[root@ubuntu ~]#ifup eth0[root@ubuntu ~]#ifdown eth0
引自MSDN
StateChanged 事件
連接中狀態(tài)發(fā)生改變，就會引發(fā)該事件。
語法
object_StateChanged(ByVal State As Integer)
StateChanged 事件的語法包含下面部分：
部分 描述
object 對象表達式，其值是“應用于”列表中的對象。
State 整數。如下面的“設置值”所示，指定狀態(tài)。
設置值
State 的設置值：
常數 值 描述
icNone 0 無狀態(tài)可報告。
icHostResolvingHost 1 該控件正在查詢所指定的主機的 IP 地址。
icHostResolved 2 該控件已成功地找到所指定的主機的 IP 地址。
icConnecting 3 該控件正在與主機連接。
icConnected 4 該控件已與主機連接成功。
icRequesting 5 該控件正在向主機發(fā)送請求。
icRequestSent 6 該控件發(fā)送請求已成功。
icReceivingResponse 7 該控件正在接收主機的響應。
icResponseReceived 8 該控件已成功地接收到主機的響應。
icDisconnecting 9 該控件正在解除與主機的連接。
icDisconnected 10 該控件已成功地與主機解除了連接。
icError 11 與主機通訊時出現(xiàn)了錯誤。
icResponseCompleted 12 該請求已經完成，并且所有數據均已接收到。
說明
一般來說，使用 StateChanged 事件決定何時使用 GetChunk 方法來檢索數據。要這樣做，須使用 Select Case 語句，并測試 icResponseReceived (8) 或 icResponseCompleted (12)。
注意，當該控件已完成一個操作時，且此操作在緩沖區(qū)中沒有產生任何數據，此時 icResponseReceived 狀態(tài)也可能出現(xiàn)。例如，當與某個 FTP 站點進行連接時，該控件將與此 FTP 站點“握手”，但沒有在緩沖區(qū)中產生任何數據，此時會出現(xiàn) icResponseReceived 狀態(tài)。
另一方面，一個操作完全完成后，會出現(xiàn) icResponseCompleted 狀態(tài)。例如，如果正在使用 Execute 方法和 GET 操作來檢索某個文件，在此文件被完全檢索之后，將出現(xiàn) icResponseCompleted 事件，且僅出現(xiàn)一次。
實際上，使用 icResponseReceived 狀態(tài)可以對數據做語法分析，直到檢索到所需信息為止（例如，檢索 HTML 文件時，只對標頭進行檢索）。獲得該信息后，就可以取消這次檢索。另一方面，如果想檢索整個文件，icResponseCompleted 狀態(tài)還會通知傳輸已經完成，可以繼續(xù)。
===================================
Private Sub Inet1_StateChanged(ByVal State As Integer)
Select Case State
Case icNone '無狀態(tài)可報告。
Debug.Print "無狀態(tài)可報告。
"
Case icHostResolvingHost
Debug.Print "該控件正在查詢所指定的主機的 IP 地址。"
Case icHostResolved
Debug.Print "該控件已成功地找到所指定的主機的 IP 地址。"
Case icConnecting
Debug.Print "該控件正在與主機連接。"
Case icConnected
Debug.Print "該控件已與主機連接成功。"
Case icRequesting
Debug.Print "該控件正在向主機發(fā)送請求。"
Case icRequestSent
Debug.Print "該控件發(fā)送請求已成功。"
Case icReceivingResponse
Debug.Print "該控件正在接收主機的響應。"
Case icResponseReceived
Debug.Print "該控件已成功地接收到主機的響應。"
Case icDisconnecting
Debug.Print "該控件正在解除與主機的連接。"
Case icDisconnected
Debug.Print "該控件已成功地與主機解除了連接。"
Case icError
Debug.Print "與主機通訊時出現(xiàn)了錯誤。"
Case icResponseCompleted
Debug.Print "該請求已經完成，并且所有數據均已接收到。"
End Select
End Sub
在工具箱的而某一個菜單上右鍵選擇項
進去要么選擇已經有的
要么自己瀏覽dll文件，添加進去再選擇
Imports System.Net
Imports System.IO
Module FtpSample
Sub Main(ByVal args() As String)
If args.Length = 0 OrElse args(0).Equals("/?") Then
DisplayUsage()
ElseIf args.Length = 1 Then
Download(args(0))
ElseIf args.Length = 2 Then
If args(0).Equals("/list") Then
List(args(1))
Else
Upload(args(0), args(1))
End If
Else
Console.WriteLine("Unrecognized argument.")
End If
End Sub
Private Sub DisplayUsage()
Console.WriteLine("USAGE:")
Console.WriteLine(" FtpSample [/? | FTP download URL | local file")
Console.WriteLine(" FTP upload URL | /list FTP list URL]")
Console.WriteLine()
Console.WriteLine("where")
Console.WriteLine(" FTP download URL URL of a file to download from an FTP server.")
Console.WriteLine(" FTP upload URL Location on a FTP server to upload a file to.")
Console.WriteLine(" FTP list URL Location on a FTP server to list the contents of.")
Console.WriteLine(" local file A local file to upload to an FTP server.")
Console.WriteLine()
Console.WriteLine(" Options:")
Console.WriteLine(" /? Display this help message.")
Console.WriteLine(" /list Specifies the list command.")
Console.WriteLine()
Console.WriteLine("EXAMPLES:")
Console.WriteLine(" Download a file FtpSample ")
Console.WriteLine(" Upload a file FtpSample upload.txt ")
End Sub
Private Sub Download(ByVal downloadUrl As String)
Dim responseStream As Stream = Nothing
Dim fileStream As FileStream = Nothing
Dim reader As StreamReader = Nothing
Try
Dim downloadRequest As FtpWebRequest = _
WebRequest.Create(downloadUrl)
Dim downloadResponse As FtpWebResponse = _
downloadRequest.GetResponse()
responseStream = downloadResponse.GetResponseStream()
Dim fileName As String = _
Path.GetFileName(downloadRequest.RequestUri.AbsolutePath)
If fileName.Length = 0 Then
reader = New StreamReader(responseStream)
Console.WriteLine(reader.ReadToEnd())
Else
fileStream = File.Create(fileName)
Dim buffer(1024) As Byte
Dim bytesRead As Integer
While True
bytesRead = responseStream.Read(buffer, 0, buffer.Length)
If bytesRead = 0 Then
Exit While
End If
fileStream.Write(buffer, 0, bytesRead)
End While
End If
Console.WriteLine("Download complete.")
Catch ex As UriFormatException
Console.WriteLine(ex.Message)
Catch ex As WebException
Console.WriteLine(ex.Message)
Catch ex As IOException
Console.WriteLine(ex.Message)
Finally
If reader IsNot Nothing Then
reader.Close()
ElseIf responseStream IsNot Nothing Then
responseStream.Close()
End If
If fileStream IsNot Nothing Then
fileStream.Close()
End If
End Try
End Sub
Private Sub Upload(ByVal fileName As String, ByVal uploadUrl As String)
Dim requestStream As Stream = Nothing
Dim fileStream As FileStream = Nothing
Dim uploadResponse As FtpWebResponse = Nothing
Try
Dim uploadRequest As FtpWebRequest = WebRequest.Create(uploadUrl)
uploadRequest.Method = WebRequestMethods.
' UploadFile is not supported through an Http proxy
' so we disable the proxy for this request.
uploadRequest.Proxy = Nothing
requestStream = uploadRequest.GetRequestStream()
fileStream = File.Open(fileName, FileMode.Open)
Dim buffer(1024) As Byte
Dim bytesRead As Integer
While True
bytesRead = fileStream.Read(buffer, 0, buffer.Length)
If bytesRead = 0 Then
Exit While
End If
requestStream.Write(buffer, 0, bytesRead)
End While
' The request stream must be closed before getting the response.
requestStream.Close()
uploadResponse = uploadRequest.GetResponse()
Console.WriteLine("Upload complete.")
Catch ex As UriFormatException
Console.WriteLine(ex.Message)
Catch ex As IOException
Console.WriteLine(ex.Message)
Catch ex As WebException
Console.WriteLine(ex.Message)
Finally
If uploadResponse IsNot Nothing Then
uploadResponse.Close()
End If
If fileStream IsNot Nothing Then
fileStream.Close()
End If
If requestStream IsNot Nothing Then
requestStream.Close()
End If
End Try
End Sub
Private Sub List(ByVal listUrl As String)
Dim reader As StreamReader = Nothing
Try
Dim listRequest As FtpWebRequest = WebRequest.Create(listUrl)
listRequest.Method = WebRequestMethods.
Dim listResponse As FtpWebResponse = listRequest.GetResponse()
reader = New StreamReader(listResponse.GetResponseStream())
Console.WriteLine(reader.ReadToEnd())
Console.WriteLine("List complete.")
Catch ex As UriFormatException
Console.WriteLine(ex.Message)
Catch ex As WebException
Console.WriteLine(ex.Message)
Finally
If reader IsNot Nothing Then
reader.Close()
End If
End Try
End Sub
End Module
可以通過設置 Credentials 屬性來指定用于連接服務器的憑據，也可以將它們包含在傳遞給 Create 方法的 URI 的 UserInfo 部分中。
從 FTP 服務器下載文件時，如果命令成功，所請求的文件的內容即在響應對象的流中。通過調用 GetResponseStream 方法，可以訪問此流。
如果使用 FtpWebRequest 對象向服務器上載文件，則必須將文件內容寫入請求流，請求流是通過調用 GetRequestStream 方法或其異步對應方法（BeginGetRequestStream 和 EndGetRequestStream 方法）獲取的。必須寫入流并在發(fā)送請求之前關閉該流。
請求是通過調用 GetResponse 方法或其異步對應方法（BeginGetResponse 和 EndGetResponse 方法）發(fā)送到服務器的。請求的操作完成時，會返回一個 FtpWebResponse 對象。FtpWebResponse 對象提供操作的狀態(tài)以及從服務器下載的所有數據。
企業(yè)版應該有的，用法 工程-----部件-------勾選Microsoft internet transfer control 6.0---應用----確定，工具箱里就會有inet控件。找不到Microsoft internet transfer control 6.0的話，下載msinet.ocx 放到c:\windows\system32\下，注冊，然后用法同上
重慶分公司
重慶分公司
