按键精灵开发教程：解决获取不到网页源文件

详细操作

药方一

此方法采用了Microsoft.XMLHttp组件( XMLHTTP是传送XML格式数据的超文本传输协议 )使用步骤一点也不麻烦：

1、创建XMLHTTP对象。2、输入要网址，并且指定你要对网页进行的操作：GET/Post （get是从服务器上获取数据，post是向服务器传送数据。）3、等待返回值。

代码：

网页源文件=取网页源码("http://bbs.anjian.com/forum.php")

TracePrint 网页源文件

Function 取网页源码(URL)

Set objXML=CreateObject("Microsoft.XMLHTTP")

objXML.Open "Get", Url, False

objXML.send

If objXML.readyState=4 then

取网页源码 =objXML.ResponseText

End If

objXML.Abort

Set objXML = Nothing

End Function

代码解析：

objXML.Open "Get", Url, False

XMLHTTP对象的Open方法，它的参数是这样的 bstrMethod, bstrUrl, varAsync, bstrUser, bstrPassword 一共五个参数：

bstrMethod： 数据传送方式，即GET或POST。我们要获取数据，所以使用GET方式。

bstrUrl： 服务网页的URL。

varAsync： 是否同步执行。缺省为True，即异步执行。False，即同步执行。我们选择False，同步执行，意思就是：发送完要获取网页源文件的指令之后，等待返回值，等值返回了才执行下一句代码。

bstrUser： 用户名，可省略。

bstrPassword：用户口令，可省略。

If objXML.readyState=4 then

XMLHTTP对象的readystate属性，它的值是0-4：

0 　：Response对象已经创建，但XML文档上载过程尚未结束

1 　：XML文档已经装载完毕

2 　：XML文档已经装载完毕，正在处理中

3 　：部分XML文档已经解析

4 　：文档已经解析完毕，客户端可以接受返回消息

药方二

使用按键自带的web网页插件的save命令保存网页源文件。

代码：

call Plugin.Web.Bind("wqm.exe")//绑定wqm

Call Plugin.Web.Save("http://bbs.anjian.com/forum.php", "C:\1.txt") //保存网页源文件到c盘下的1.txt文本中

RunApp "C:\1.txt"

注意：此方法有个缺点，那就是，运行过程中会弹出wqm窗口。

药方三

懒人插件、365插件都有读取网页源文件的命令，小编这里用365插件的GetWebText 命令做个例子。

使用方法：1、下载365插件2、解压之后将：Mini365.dll 这个文件放到按键精灵安卓目录下的plugin文件夹中 Plugin.Mini365.GetWebText URL,Mode GetWebText命令有两个参数：网址（URL）和 网页编码（Mode） 网页编码常见的是：GB2312和UTF-8 如何得知网页的编码是哪种呢？ 我们打开网页，按下F12调出网页代码分析器，绿色圈圈里的那个GBK就是当前网页的编码：

代码：

网页源文件= Plugin.Mini365.GetWebText ("http://bbs.anjian.com/forum.php", "GBk")

TracePrint 网页源文件

用户类似问题：

问题1：按键精灵~~源码怎么以网页链接跟新提示？

额！这样呀！ 我自己想到一个方法！ 你应该会获取网页源代码的吧！ 假如： 你写了一个xxx辅助1.0版本后 自己去弄一个个人网站（比如网址是：www.gengx.com）在网站里写上xxx辅助1.0版本！然后在你源码前面加上获取www.gengx.com里的源代码，查找... >>详细

问题2：按键精灵 获取网页按钮.click后生成的源码

无刷新加载了些源码，是因为网页采用的是 Ajax 技术，使用 Javascript 动态获取服务器的返回信息，然后写入网页之中。 想要获取这一段源码，那就只有执行这一段 JS 代码，否则只是获取网页源码是静态的。 执行 JS 解析一般用 Chrome 的 V8 引擎... >>详细

问题3：按键精灵获取动态网页

当然，因为 Rem aaa XXX Goto aaa 你goto aaa转回到上面从新获取同一个网页，就没有什么可变的 还有， 获得网页源文件 = BytesToBstr MessageBox 获得网页源文件 Set ObjStream = Nothing 这几句换个顺序看看 >>详细

问题4：怎样不打开网页直接获取网页标题的代码，能在按键...

这个貌似要用爬虫 >>详细

问题5：按键精灵 访问网站数据用Lib.网络.获得网页源文件(...

我是这样获取的 Set objXML=CreateObject("Microsoft.XMLHTTP") objXML.Open "Get", Url, False objXML.send If objXML.readyState=4 then 取网页源码加强 =objXML.ResponseText End If objXML.Abort Set objXML = Nothing 用这个就行，第一句是... >>详细