我想下载网页页面的源文件，用VB应当怎样写代码？请告知，谢谢！ 问题补充：页面上不是有“查看”---“源文件”吗？就是要下载这个源文件。 我想在窗体上添加两个Textbox和一个命令按钮，Textbox1写页面URL地址，点击命令按钮后Textbox2显示页面中的源文件。
解答：如果是页面文件(竟服务器解析过的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)