- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 微信案例怎么使用？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=118336)
-- 发布时间：2018/4/29 18:34:00
-- 微信案例怎么使用？
微信案例，按使用案例方法和步骤，在微信验证回掉的时候怎么也不能通过，各位大神怎么办，谁能发个教程啊
-- 发布时间：2018/4/29 21:21:00
--
同时服务器端发布也是失败的啊
-- 发布时间：2018/4/30 15:52:00
--
首先测试
http://www.foxtable.com/mobilehelp/scr/0174.htm
http://www.foxtable.com/mobilehelp/scr/0175.htm
如果使用本机测试，这样搭建公网
-- 发布时间：2018/5/1 15:01:00
--
微信回掉按帮助里面是没有任何问题的，关键是用到微信接口案例的时候，根本找不到在哪里输入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))
Next
Functions.Execute("logText",str.ToString)
catch ex As Exception
Functions.Execute("LogText",ex)
e.WriteString("")
End Try
这是服务器端 HTTP 代码
这段代码怎么通过微信 回调验证的呢？
还是不需要验证 直接在客服端填写 调用呢？
你们的案例接口做的这么好，如果教会我们怎么用 哪才是功德无量啊！
我们可以省去好多时间
建议官方多做些案例 与案例指导 教程，这样的直接可以使用做二次开发，对我们客户真的是最大的福利了！
还有你们的订单系统 考试管理 我没有一个能够 移植使用的
只能在本机测试127.0.0.1的时候可以实现 移植不到我的阿里云 服务器
耗费了很多时间
又没有时间也没有能力开发你们那么完美框架，，，，
-- 发布时间：2018/5/1 18:21:00
--
案例的使用，结合帮助文档来看，先把帮助文档研究一下
http://wechat.foxtable.com:9009/WebHelp/scr/we0200.htm
-- 发布时间：2018/5/1 22:57:00
--
说真心话，帮助文档全部看过，基本里面的代码也大部分试验过，基本没有什么问题，可是就是理解不了你们案例程序，更不知道如何利用你们案例二次开发，
因为帮助里面都是一个个的小知识点，我们普通用户根本没有能力编织成你们案例的样子，
这么好的案例，不推广使用，实在太可惜！ 我也知道，按照你们帮助，可以做出一个相似的软件，可是我们不是专业人士，还有更多其它工作去做。
做出一个相似的软件起码要好几个月的努力，，任何一件事都是站在巨人肩膀上 更容易出成果，
恳请官方用你们更专业，更神速的案例 给我们指引一条开发之路的捷径之途吧，，，我们广大吃瓜群众感激不尽哦！
-- 发布时间：2018/5/2 8:47:00
--
在客户端里维护好公众号的信息即可，token也在公众号编辑窗口维护的。代码里不需要写token。
另外建议还是按照这里帮助的用法使用吧：http://www.foxtable.com/mobilehelp/scr/0175.htm
微信变化太快，这个案例不更新的了，仅作为一个例子供参考。
-- 发布时间：2018/5/2 21:15:00
--
此主题相关图片如下：nzus8d%)r6%c5jdwz7h1}qw.png
-- 发布时间：2018/5/2 21:30:00
--
去看对应的函数，加入msgbox定位错误位置
http://www.foxtable.com/webhelp/scr/1485.htm
然后，在帮助文档那里搜索对应的关键字，看相关知识点。
-- 发布时间：2018/5/3 8:17:00
--
看看Initialize事件是不是有这一句
WeChat.WeChatServer.SetAccessTokenGetMode（........）
看看后台使用的什么方式做中控服务，设置一下：http://wechat.foxtable.com:9009/WebHelp/scr/we0011.htm