你要理解一个知识点,你要访问的不是 jiyekrs.htm 网页
你要访问的,是这个地址,如 https://open.weixin.qq.com/connect/oauth2/authorize
先访问的是微信的地址,然后,成功以后,微信才会跳转回到你的 jiyekrs.htm 去的
下面代码,得出的是你要访问的地址
Dim ul1 As String = "https://open.weixin.qq.com/connect/oauth2/authorize?appid={0}&redirect_uri={1}&response_type=code&scope=snsapi_base&state={2}#wechat_redirect"
Dim ul2 As String = UrlEncode("验证成功后跳转的地址")
ul1 = CExp(ul1,"wxa31aba4cd83af57e",ul2,"123")
Output.Show(ul1)
http://www.foxtable.com/mobilehelp/scr/0237.htm