大橙子网站建设,新征程启航

为企业提供网站建设、域名注册、服务器等服务

包含vb.netinet的词条

VB如何添加inet控件?

VB添加inet控件步骤:

10年积累的网站制作、成都网站制作经验,可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你,你也不认识我。但先网站设计后付款的网站建设流程,更有项城免费网站建设让你可以放心的选择与我们合作。

运行VB6.0,新建工程。

菜单工程-部件,在Microsoft Internet Transfer Control 6.0部件前勾选,确定,就可将Inet控件添加到工具箱。

双击工具箱Inet控件,窗体上就添加了该控件。

Microsoft Internet Transfer 控件:

Internet Transfer 控件支持超文本传输协议 (HTTP) 和文件传输协议 (FTP),它们是 Internet 网上使用最广泛的两种协议。

使用 HTTP 协议,可以连接全球信息网(World Wide Web)服务器,以检索 HTML 文档。使用 FTP 协议可以在 FTP服务器上登录,以下载和加载文件。UserName 和 Password 属性可让您在要求验证身份的私有的服务器上进行登录。另外,也可以连接公用的 FTP 服务器,并下载文件。Execute 方法支持普通的 FTP

命令,如 CD 和 GET。

VB 中 inet 控件问题

帮你加上注释吧,晕倒... On Error Resume Next '发生错误时继续下一步Inet1.AccessType = 2 '访问类型

Inet1.RequestTimeout = 60 '请求超时

Inet1.Proxy = "HTTP=" "59.74.42.152" ":" "8080" '代理

Inet1.OpenURL (" ") '打开的网址

MsgBox Val(Mid(Trim(Inet1.GetHeader), 10, 3))

If Err Then

If Err.Number = 35756 Then MsgBox "代理不可用"

MsgBox Err.Number ":" Err.Description

End If

End Sub

vb中inet的用法(连接一个ftp)

Inet1.Protocol = icFTP

Inet1.RemoteHost = ServerName'服务器地址

Inet1.RemotePort = 21'FTP端口

Inet1.UserName = uName'用户名

Inet1.Password = uPWS'密码下载文件:

Inet1.Execute "", "GET 1.txt d:\1.txt"

ri = Inet1.StillExecuting

Do While ri

ri = Inet1.StillExecuting

DoEvents

Loop

上传文件:

Inet1.Execute "", "PUT d:\1.txt 1.txt"

ri = Inet1.StillExecuting

Do While ri

ri = Inet1.StillExecuting

DoEvents

Loop

VB中的inet控件

引自MSDN

StateChanged 事件

连接中状态发生改变,就会引发该事件。

语法

object_StateChanged(ByVal State As Integer)

StateChanged 事件的语法包含下面部分:

部分 描述

object 对象表达式,其值是“应用于”列表中的对象。

State 整数。如下面的“设置值”所示,指定状态。

设置值

State 的设置值:

常数 值 描述

icNone 0 无状态可报告。

icHostResolvingHost 1 该控件正在查询所指定的主机的 IP 地址。

icHostResolved 2 该控件已成功地找到所指定的主机的 IP 地址。

icConnecting 3 该控件正在与主机连接。

icConnected 4 该控件已与主机连接成功。

icRequesting 5 该控件正在向主机发送请求。

icRequestSent 6 该控件发送请求已成功。

icReceivingResponse 7 该控件正在接收主机的响应。

icResponseReceived 8 该控件已成功地接收到主机的响应。

icDisconnecting 9 该控件正在解除与主机的连接。

icDisconnected 10 该控件已成功地与主机解除了连接。

icError 11 与主机通讯时出现了错误。

icResponseCompleted 12 该请求已经完成,并且所有数据均已接收到。

说明

一般来说,使用 StateChanged 事件决定何时使用 GetChunk 方法来检索数据。要这样做,须使用 Select Case 语句,并测试 icResponseReceived (8) 或 icResponseCompleted (12)。

注意,当该控件已完成一个操作时,且此操作在缓冲区中没有产生任何数据,此时 icResponseReceived 状态也可能出现。例如,当与某个 FTP 站点进行连接时,该控件将与此 FTP 站点“握手”,但没有在缓冲区中产生任何数据,此时会出现 icResponseReceived 状态。

另一方面,一个操作完全完成后,会出现 icResponseCompleted 状态。例如,如果正在使用 Execute 方法和 GET 操作来检索某个文件,在此文件被完全检索之后,将出现 icResponseCompleted 事件,且仅出现一次。

实际上,使用 icResponseReceived 状态可以对数据做语法分析,直到检索到所需信息为止(例如,检索 HTML 文件时,只对标头进行检索)。获得该信息后,就可以取消这次检索。另一方面,如果想检索整个文件,icResponseCompleted 状态还会通知传输已经完成,可以继续。

===================================

Private Sub Inet1_StateChanged(ByVal State As Integer)

Select Case State

Case icNone '无状态可报告。

Debug.Print "无状态可报告。

"

Case icHostResolvingHost

Debug.Print "该控件正在查询所指定的主机的 IP 地址。"

Case icHostResolved

Debug.Print "该控件已成功地找到所指定的主机的 IP 地址。"

Case icConnecting

Debug.Print "该控件正在与主机连接。"

Case icConnected

Debug.Print "该控件已与主机连接成功。"

Case icRequesting

Debug.Print "该控件正在向主机发送请求。"

Case icRequestSent

Debug.Print "该控件发送请求已成功。"

Case icReceivingResponse

Debug.Print "该控件正在接收主机的响应。"

Case icResponseReceived

Debug.Print "该控件已成功地接收到主机的响应。"

Case icDisconnecting

Debug.Print "该控件正在解除与主机的连接。"

Case icDisconnected

Debug.Print "该控件已成功地与主机解除了连接。"

Case icError

Debug.Print "与主机通讯时出现了错误。"

Case icResponseCompleted

Debug.Print "该请求已经完成,并且所有数据均已接收到。"

End Select

End Sub

vb.net中有没有Inet1控件,在哪里如何弄出来?

在工具箱的而某一个菜单上右键选择项

进去要么选择已经有的

要么自己浏览dll文件,添加进去再选择


网站栏目:包含vb.netinet的词条
网站URL:http://dzwzjz.com/article/hjdjps.html
在线咨询
服务热线
服务热线:028-86922220
TOP