Foxtable(狐表)用户栏目专家坐堂 → 微信案例,更换微信公众号报错.


  共有3331人关注过本帖树形打印复制链接

主题:微信案例,更换微信公众号报错.

帅哥哟,离线,有人找我吗?
ycwk
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1228 积分:8561 威望:0 精华:0 注册:2016/2/2 21:52:00
微信案例,更换微信公众号报错.  发帖心情 Post By:2017/3/1 16:21:00 [显示全部帖子]

跟踪到全局类    curstomclass  


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

报如下错误:

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

看样子converthelper 是wechat的成员,不知道往下怎么改了,请指教








 回到顶部
帅哥哟,离线,有人找我吗?
ycwk
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1228 积分:8561 威望:0 精华:0 注册:2016/2/2 21:52:00
  发帖心情 Post By:2017/3/1 20:02:00 [显示全部帖子]


执行   f.SetValue(entity,o,Nothing)   报错,由于o用IsNumeric()检测得知是数值型,但不知entity用什么函数检查是什么型,不知道怎么改代码了,请教。

'把DataRow值赋值到对象的实体对象
Public Shared Sub FromDataRow(ByVal dr As DataRow, ByRef entity As WeChat.EntityBase)
Dim fs As System.Reflection.PropertyInfo() = entity.Gettype.GetProperties
Dim f As System.Reflection.PropertyInfo
For Each f In fs
    If ((Not dr.DataTable Is Nothing) AndAlso dr.DataTable.DataCols.Contains(f.Name)) Then
        Dim o As Object = dr(f.Name)
         
        If (Not o Is DBNull.Value) Then
            f.SetValue(entity,o,Nothing)       '此函数报错

        End If
    End If
Next
End Sub



 回到顶部
帅哥哟,离线,有人找我吗?
ycwk
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1228 积分:8561 威望:0 精华:0 注册:2016/2/2 21:52:00
  发帖心情 Post By:2017/3/2 8:25:00 [显示全部帖子]

1.没有改表结构,
2.用msgbox(dr.DataTable.Name & " " & f.name)检测
   弹以下提示:    PubNos   PublicNoID
                           PubNos   WechatNumber
                           PubNos   BindingEmail
                                 ******
                           
但数据库中只有 WechatPubNos这个表,没有PubNos这个表,是不是这里有问题?

 回到顶部
帅哥哟,离线,有人找我吗?
ycwk
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1228 积分:8561 威望:0 精华:0 注册:2016/2/2 21:52:00
  发帖心情 Post By:2017/3/2 9:31:00 [显示全部帖子]

附件已上传
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:3. 微信管理客户端.part3.rar

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:3. 微信管理客户端.part2.rar

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:3. 微信管理客户端.part1.rar

[此贴子已经被作者于2017/3/2 9:34:55编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
ycwk
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1228 积分:8561 威望:0 精华:0 注册:2016/2/2 21:52:00
  发帖心情 Post By:2017/3/2 10:48:00 [显示全部帖子]

蓝版发的客户端,运行还是报下面这个错误啊!

类型“System.Int32”的对象无法转换为类型“System.Int16”。

 回到顶部
帅哥哟,离线,有人找我吗?
ycwk
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1228 积分:8561 威望:0 精华:0 注册:2016/2/2 21:52:00
  发帖心情 Post By:2017/3/2 11:03:00 [显示全部帖子]

感谢各位帮忙调试,增加了一个测试号,切换不再报错,能问下是什么问题不?

 回到顶部
帅哥哟,离线,有人找我吗?
ycwk
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1228 积分:8561 威望:0 精华:0 注册:2016/2/2 21:52:00
  发帖心情 Post By:2017/3/2 11:14:00 [显示全部帖子]

原因是  :帐号维护 服务器类型 必填,不填就会报那个错误

 回到顶部