甜老师：问题解决了，说明书的代码没有问题。出问题的原因是，我在服务器上放有两个项目A和B,A和B认证的跳转post是一样的，两个项目里都有获取 openid的过程，其中A跳转链接的时候，没有跳转到自己的项目上，而是跳转到B项目上。另还有一个问题想问一下：
这是接收用户消息的代码，我理解的是：接入认证与解密、解析消息根据代码逻辑并不能同时进行，也就是说两步工作只能做一个，做了认证的时候就不能解析消息，哪认证还有什么作用？要么是解析是不用认证的。还是我的理解有问题。
Select
Case
e.path
Case
"wefox"
Dim
wbiz
As
New
WXBizCrypt("wxa31aba4cd83af57e","foxtable","ilsmyivvRPNj0qxSiSzWCnqm7cy1w1RcS6w2LBhsh7J")
If
e.Request.HttpMethod
= "GET"
Dim
ret
As
Integer =
wbiz.CheckQYSignature(e)
If
ret <>
0
Then
'如果接入验证失败
Dim
err
As
String = wbiz.GetErorDesc(ret)
'获取错误描述
End
If
ElseIf
e.Request.HttpMethod = "Post" '
Dim
st
As
New
Date(1970,1,1,8,0,0)
Dim
msg As
String = wbiz.DecryptMsg(e)
'解密消息
If IsNumeric(msg) Then
'如果解密失败
Dim
err
As
String = wbiz.GetErorDesc(CInt(msg))
'获取错误描述
Return
End
If
Dim
xo
As
XObject = XObject.Parse(msg)
Select
Case
xo("MsgType")
Case
"text","image","voice","video","shortvideo"
Dim
dr
As
DataRow =
DataTables("Message").AddNew()
End
Select
End
If
End
Select
加好友 
发短信
Post By：2019/6/9 17:18:00 [只看该作者]
