微信案例怎么使用？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

微信回掉按帮助里面是没有任何问题的，关键是用到微信接口案例的时候，根本找不到在哪里输入TOKEN

try

Select Case e.host

Case "39.106.35.51"

Dim dr As DataRow

Dim url As String

Dim wechatserv As WeChat.WeChatPublicNo

If e.Path > "" Then

url = "http://" & e.host & "/" & e.Path.replace("\","/").replace("'","''").replace("""","""""") & "/"

wechatserv = Functions.Execute("WeChat_GetServerByUrl",url) '查询是否有此地址的微信公众号

End If

If wechatserv IsNot Nothing Then '说明是微信接口回调消息

wechatserv.ProcessMessage(e,"WeChat_ProcessRequestMsg") '处理消息并获取返回值

'Functions.Execute("LogText","回复=" & weRet)

Else

'通用事件头

'如果网页路径定义了中间目录,如"ordertest/logon.htm" ,则下面的fl实际就是"d:\web\ordertest\weui\weui.me.js"

'因此你需要把WeUI框架三个文件复制到"d:\web\ordertest\weui"目录下

Dim fl As String = "C:\web\" & e.path

If filesys.FileExists(fl)

Dim idx As Integer = fl.LastIndexOf(".")

Dim ext As String = fl.SubString(idx)

Select Case ext

Case ".jpg",".gif",".png",".bmp",".wmf",".js",".css" ,".html",".htm",".zip",".rar"

e.WriteFile(fl)

Return '这里必须返回

End Select

End If

Select Case e.Path

Case "gettoken" '做为AccessToken中控服务

Dim atoken As WeChat.AccessToken = WeChat.WeChatAccessTokenController.GetServiceAccessToken(e.PlainText)

e.WriteString(atoken.ToJson()) '返回access_token的JSON数据

Case "scanlogon" '做为AccessToken中控服务

Functions.Execute("Http_ScanLogon" ,e)

Case Else

If e.Path.StartsWith("ordertest\") Then '公众号订单测试地址前缀都统一使用这个

Functions.Execute("Order_HttpRequest",e)

ElseIf e.Path.StartsWith("review\") Then '企业号订单审核地址前缀都统一使用这个

Functions.Execute("Order_HttpReview",e)

End If

End Select

End If

End Select

'记录接收的消息,方便分析

Dim str As new StringBuilder

'str.AppendLine("host=" & e.host)

str.AppendLine("path=" & e.Path)

str.AppendLine("HttpMethod=" & e.Request.HttpMethod)

'str.AppendLine("poststring=" & e.PlainText)

'str.AppendLine("ip=" & e.Request.RemoteEndPoint().Address.ToString())

For Each key As String In e.Values.Keys

str.AppendLine(key & "=" & e.Values(key))

Functions.Execute("logText",str.ToString)

catch ex As Exception

Functions.Execute("LogText",ex)

e.WriteString("")

End Try

这是服务器端 HTTP 代码

这段代码怎么通过微信回调验证的呢？

还是不需要验证直接在客服端填写调用呢？

你们的案例接口做的这么好，如果教会我们怎么用哪才是功德无量啊！

我们可以省去好多时间

建议官方多做些案例与案例指导教程，这样的直接可以使用做二次开发，对我们客户真的是最大的福利了！

还有你们的订单系统考试管理我没有一个能够移植使用的

只能在本机测试127.0.0.1的时候可以实现移植不到我的阿里云服务器

耗费了很多时间

又没有时间也没有能力开发你们那么完美框架，，，，

liuruihua	小大 3楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：四尾狐帖子：781 积分：9870 威望：0 精华：0 注册：2008/9/1 13:47:00	Post By：2018/4/30 9:14:00 [只看该作者] 用户已被锁定

主题：微信案例怎么使用？