以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关于PopupForm提示窗口的的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83644) |
-- 作者:kendyqzj -- 发布时间:2016/4/13 20:57:00 -- 关于PopupForm提示窗口的的问题 上述问题明白了, 还有一个问题想咨询一下,如截图所示: 我想通过”保存当前行“这个按钮触发一个时间窗口, 窗口类型为PopupForm的提示窗口 客户端的ReceiveMessgae的判断代码如下: If User.Name = "yoko" And dr.DataTable.Name = "total" Then If dr IsNot Nothing AndAlso dr.IsNull("面试状态") Then ElseIf User.Name = "may" Then Forms("审核申请").Open() ElseIf User.Name = "anna" Then Forms("入职申请").Open() End If End If 保存当前行 这个的按钮的代码如下: Dim r As Row = Tables("total").Current Dim p As String = IIF(r.DataRow.RowState = DataRowState.Added, "A#", "U#") r.Save() QQClient.Send("yoko","+@|" & r("序号") & "|" & r("姓名") & "|" & User.Name) Dim msg As String = p & "total" & "#" & r("序号") For Each bd As QQBuddy In QQClient.Buddies If bd.Online Then QQClient.Send(bd.name, msg) End If Next MessageBox.Show("已成功保存!","提示", MessageBoxButtons.OK ,MessageBoxIcon.Information) Forms("人事详情").Close() 实际保存后并没有触发相应的PopupForm时间窗口,请问问题出在哪里?谢谢
|
-- 作者:大红袍 -- 发布时间:2016/4/13 21:00:00 -- 直接打开不就行了?
Forms("你的窗口名").Show |
-- 作者:kendyqzj -- 发布时间:2016/4/13 21:06:00 -- 我是想当不同的人登录该系统,其中一人更改当前某条信息后, 会指定发送一个PopupForm的提示窗口给另一个在使用该系统的人, 就是右下角弹窗提示,show只能在当前系统打开吧?
|
-- 作者:大红袍 -- 发布时间:2016/4/13 21:08:00 -- 去MessgaeReceive事件,加入msgbox弹出值看一看
msgbox(user.name) msgbox(dr.DataDataTable.Name) |
-- 作者:kendyqzj -- 发布时间:2016/4/13 21:23:00 -- 这个没用过呢,不知道怎么用? |
-- 作者:kendyqzj -- 发布时间:2016/4/13 21:23:00 -- 在线文档有没有一些参考说明之类的? |
-- 作者:大红袍 -- 发布时间:2016/4/13 21:49:00 -- 也就是在你的 MessgaeReceive 事件这样写代码,肯定要触发事件,触发里面的代码才能open窗口的啊。
msgbox(user.name) If User.Name = "yoko" And dr.DataTable.Name = "total" Then |