主题：[求助]页面跳转

授权后跳转回来的页面，是你自己定义的吧？红色的就是跳转回来的路径。

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("http://wexin.foxtable.com")
ul1 = CExp(ul1,"wxa31aba4cd83af57e",ul2,"123")
Output.Show(ul1)

1、你连接那里，redirect_uri赋值是http://fxsim.nbxus.com:81/，如果授权成功，就会调整到这个地址；

2、但你这个地址应该是无法访问的才对吧？目前你遇到什么问题？返回code了没有？得到userid了没有？最后跳转到哪里去了？

在你httprequest那里，加入代码 output.show(e.path) 或者 msgbox(e.path)

看分别弹出什么，最后弹出的是什么。

在httprequest事件第一行，加入 output.show(e.path)

打开命令窗口，在你手机企业微信那里进入测试，看分别弹出什么。

在httprequest事件第一行，加入 output.show(e.path)

打开命令窗口，在你手机企业微信那里进入测试，看分别弹出什么。

肯定必须弹出正确的e.path，才会跳转到对应的地方去的。

1、你企业微信那里访问哪个地址？

2、e.path分别弹出什么？弹出多少次？

1、你把permity设置成false，是直接在项目那里（编写httprequest代码的项目）设置成false还是在数据库那里设置成false的？

根据代码，设置成false之后，肯定不能进入首页的。

2、如果重复验证了，你弹出每次的UserId看看，看其值是否正确；弹出dr("permit")的值看看，看是否正确。

如果你用update语句执行的，你需要修改代码，把find改成sqlFind后台查询数据。

关键看你的项目能否正常运行，比如加入msgbox能否正常弹出数据，如果可以，那就没问题。