张志松
记录工作点滴,留下人生轨迹。(zezese@163.com)
posts - 68,  comments - 11,  trackbacks - 0
Const WinHttpRequestOption_URL = 1
Const WinHttpRequestOption_URLCodePage = 2
Dim WinHttpReq
Set WinHttpReq = CreateObject("WinHttp.WinHttpRequest.5.1")
WinHttpReq.Option(WinHttpRequestOption_URLCodePage) = 936 ‘国标GB2312
WinHttpReq.Open "GET", "http://www.baidu.com/s?wd=嘟嘟牛"
MsgBox WinHttpReq.Option(WinHttpRequestOption_URL)
posted on 2011-08-10 10:30 张志松 阅读(642) 评论(0)  编辑 收藏 引用 所属分类: VB/VBS

只有注册用户登录后才能发表评论。
网站导航: 博客园   IT新闻   BlogJava   知识库   博问   管理



<2012年2月>
2930311234
567891011
12131415161718
19202122232425
26272829123
45678910

常用链接

留言簿(2)

随笔分类

随笔档案

文章分类

文章档案

转载

搜索

  •  

最新评论

阅读排行榜

评论排行榜