张志松
记录工作点滴,留下人生轨迹。(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 张志松 阅读(645) 评论(0)  编辑 收藏 引用 所属分类: VB/VBS

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



<2011年8月>
31123456
78910111213
14151617181920
21222324252627
28293031123
45678910

常用链接

留言簿(2)

随笔分类

随笔档案

文章分类

文章档案

转载

搜索

  •  

最新评论

阅读排行榜

评论排行榜