手机站
网通分站
电信主站
密 码:
用户名:
当前位置 : 主页>程序设计>VB>列表

用Visual Basic设计browser及ftp程序(三)

来源:互联网 作者:west263.com 时间:2008-02-23
西部数码-全国虚拟主机10强!40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!
Web browser程序设计

step 2:开始设计程序

---------------------------------------------------------------------


search(执行CGI命令) search

go(执行前往web address的动作) go to

showdoc(显示html文字结果) show document

接着将inet1的各项属性设置如下:

Accesstype=2-icnamedproxy

protocol=4-ichttp

proxy=172.18.16.65:8080

在go_click()中加入以下程序代码, 这个动作是连接到所想要去的web server,并将屏幕显示在web1的方块区域内:

private sub go_click()

web1.navigate webname.text

end sub

以上程序是运用web1的navigate,这个method将屏幕连接到web name textbox中所指定的网络站点。

在htmlshow _click()加入以下的程序代码:

private sub htmlshow _click()

a$ = web1.locationurl

showdoc.text = inet1.openurl(a$)

end sub


  以上程序,是先将web1所连接到的url address,通过locationurl这个property读出,并将它暂存于字符串a。接着使用openurl()命令来将所接收到的html程序代码,显示在showdoc这个textbox中。

在cGISerch _click()中加入以下程序代码:

private sub cgiserch _click()

web1.navigate "http://search.yahoo.com/bin/search ? p=" cgi.text

end sub

这个动作是用cgi命令来查询文件。在这里我们将查询命令指定传送到yahoo 这个网络搜寻站。


这样我们就完成了一个小型的web browser。

step 3:测试程序


  执行刚设计完的web browser,并在web name这个textbox中填入所要去的网址。这里我们将它设置为http://www.microsoft.com。接着按下go button,将会看到在web1 control的方块区域内显示了microsoft的homepage。

  按下showdoc button,将可以在htmlshow这个textbox中看到microsoft homepage的html程序代码。

  接下来让我们试试cgi搜寻功能。在cgiserch textbox中加入communication,结果我们发觉查询的结果显示在web1方形区域中。

  同样的,我们也可以按下showdoc button,将可以在htmlshow这个textbox中,看到查询结果所传回的html程序代码。

  恭喜您成功了!

上一篇: 用Visual Basic设计browser及ftp程序(四)
下一篇: 用Visual Basic设计e-mail程序

文章整理:西部数码--专业提供域名注册虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!