Foxtable(狐表)用户栏目专家坐堂 → 微信案例中无法添加自己的公众号?


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

主题:微信案例中无法添加自己的公众号?

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


加好友 发短信
等级:六尾狐 帖子:1218 积分:8451 威望:0 精华:0 注册:2016/2/2 21:52:00
微信案例中无法添加自己的公众号?  发帖心情 Post By:2017/3/1 9:21:00 [只看该作者]

如下图,点击 编辑公众号  无任何反应,   注:数据库已还原

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

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/1 9:26:00 [只看该作者]

 你截图想说明什么?你的问题是什么?

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


加好友 发短信
等级:超级版主 帖子:106809 积分:543246 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/1 9:33:00 [只看该作者]

点击编辑公众号

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


加好友 发短信
等级:六尾狐 帖子:1218 积分:8451 威望:0 精华:0 注册:2016/2/2 21:52:00
  发帖心情 Post By:2017/3/1 9:41:00 [只看该作者]

点了,没有任何反应啊,就是这个问题啊

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


加好友 发短信
等级:超级版主 帖子:106809 积分:543246 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/1 10:03:00 [只看该作者]

编辑窗口WeChatPubNoManagement,编辑公众号click事件改改

 

Dim lsvPubNos As WinForm.ListView = e.Form.Controls("lsvPubNos")
Dim name As String
If lsvPubNos.Current IsNot Nothing Then
    name = lsvPubNos.Current.Name
End If
'向编辑窗口传值
Dim frmname = "WeChatPubNoEditor"
Functions.Execute("Form_Data_Do", frmname, 1, name)
Forms(frmname).Open()
'编辑后刷新公众号信息,
e.Form.Controls("btnFind").PerformClick()


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/1 10:04:00 [只看该作者]

以下是引用ycwk在2017/3/1 9:41:00的发言:
点了,没有任何反应啊,就是这个问题啊

 

调试下咯。进入代码,加上msgbox定位一下错误位置。


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


加好友 发短信
等级:六尾狐 帖子:1218 积分:8451 威望:0 精华:0 注册:2016/2/2 21:52:00
  发帖心情 Post By:2017/3/1 12:21:00 [只看该作者]

If lsvPubNos.Current IsNot Nothing Then

表是空的,这个条件始终不满足啊,无法往里面添加数据啊。 强行通过数据表WeChatPubNos 插数据,报错(不能将null值插入 PublicNoID),表WeChatAppDB.dbo.WeChatPubNos  列不允许有Null值

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/1 12:57:00 [只看该作者]

 去掉那个判断。看5楼。
[此贴子已经被作者于2017/3/1 12:57:24编辑过]

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


加好友 发短信
等级:超级版主 帖子:106809 积分:543246 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/1 13:30:00 [只看该作者]

进入编辑窗口后点击新建,就可以录入了

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


加好友 发短信
等级:六尾狐 帖子:1218 积分:8451 威望:0 精华:0 注册:2016/2/2 21:52:00
  发帖心情 Post By:2017/3/1 14:20:00 [只看该作者]

我上午就试过了,去掉判断报错,还是弹不出来。
Functions.Execute("Form_Data_Do", frmname, 1, name)  ,这行是要传name的,当前行为空,肯定 报错啊 
[此贴子已经被作者于2017/3/1 14:20:32编辑过]

 回到顶部
总数 20 1 2 下一页