- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 微信案例中无法添加自己的公众号？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=96854)
-- 发布时间：2017/3/1 9:21:00
-- 微信案例中无法添加自己的公众号？
如下图，点击 编辑公众号 无任何反应， 注：数据库已还原
此主题相关图片如下：1.png
-- 发布时间：2017/3/1 9:26:00
--
你截图想说明什么？你的问题是什么？
-- 发布时间：2017/3/1 9:33:00
--
点击编辑公众号
-- 发布时间：2017/3/1 9:41:00
--
点了，没有任何反应啊，就是这个问题啊
-- 发布时间：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()
-- 发布时间：2017/3/1 10:04:00
--
以下是引用ycwk在2017/3/1 9:41:00的发言：
点了，没有任何反应啊，就是这个问题啊
点了，没有任何反应啊，就是这个问题啊
调试下咯。进入代码，加上msgbox定位一下错误位置。
-- 发布时间：2017/3/1 12:21:00
--
If lsvPubNos.Current IsNot Nothing Then
表是空的，这个条件始终不满足啊，无法往里面添加数据啊。 强行通过数据表WeChatPubNos 插数据，报错(不能将null值插入 PublicNoID)，表WeChatAppDB.dbo.WeChatPubNos 列不允许有Null值
-- 发布时间：2017/3/1 12:57:00
--
去掉那个判断。看5楼。
[此贴子已经被作者于2017/3/1 12:57:24编辑过]
-- 发布时间：2017/3/1 13:30:00
--
进入编辑窗口后点击新建，就可以录入了
-- 发布时间：2017/3/1 14:20:00
--
我上午就试过了，去掉判断报错，还是弹不出来。
Functions.Execute("Form_Data_Do", frmname, 1, name) ，这行是要传name的，当前行为空，肯定 报错啊
[此贴子已经被作者于2017/3/1 14:20:32编辑过]