| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 请教：表事件中弹出的对话框能否捕获？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=51514) |
| -- 作者：bahamute -- 发布时间：2014/5/27 23:32:00 -- 请教：表事件中弹出的对话框能否捕获？ 从“文件上传”窗口的文件管理器增加文件时，会自动重命名文件，并弹出对话框提示成功，但由于对话框是从表属性里的代码所触发，窗口如何知道用户是否点击了对话框的“确定”按钮，从而自动关闭呢（e.form.close）？ 后将表属性BeforeAttachFile代码如下： Dim ext As String ext = e.FileName.SubString(e.FileName.LastIndexof(".")) Dim dr As DataRow = e.DataRow If dr.IsNull("板块名称")=False AndAlso dr.IsNull("年月")=False Then e.FileName = dr("年月") & "-" & dr("板块名称") & "-" & _UserName & ext Dim Result As DialogResult Result = MessageBox.Show("文件 " & e.FileName &" 上传完毕!","提示", MessageBoxButtons.OK, MessageBoxIcon.Information) If Result = DialogResult.OK Then Forms("文件上传").Close End If End If 还是运行出错，求指教！ [此贴子已经被作者于2014-5-28 13:21:11编辑过]
|
| -- 作者：Bin -- 发布时间：2014/5/28 8:36:00 -- BeforeAttachFile 是添加文件之前, 这是并未开始上传文件,何来的上传成功呢. 这时关闭上传窗口肯定会报错的. |
| -- 作者：有点甜 -- 发布时间：2014/5/28 9:07:00 -- 不确定你的意思，把例子传上来，可能有办法变通 |
| -- 作者：bahamute -- 发布时间：2014/5/28 13:19:00 -- 多谢二楼提醒，问题已经解决。 在窗口设置一个定时器，当检测到文件管理器已经选择了文件后，也就是SelectedItem属性不为空时，关闭窗口即可。
|