以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]BeforeAttachFile事件无法触发  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170697)

--  作者:流水
--  发布时间:2021/8/4 10:21:00
--  [求助]BeforeAttachFile事件无法触发
BeforeAttachFile事件无法触发,不知道自己哪里错了,求帮助

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

代码如下:
Select Case e.DataCol.Name
    Case "附件"
   MessageBox.Show(e.DataCol.Name) ‘测试触发
        Dim ext As String
        ext = e.FileName.SubString(e.FileName.LastIndexof(".") + 1) \'获得文件后缀名
        Select Case ext
            Case "pdf"
                If e.DataRow.Isnull("商品简码") = False AndAlso e.DataRow.Isnull("批次") = False Then
                    e.FileName = "检验报告_" & e.DataRow("商品简码") & "_" & e.DataRow("批次") & ".pdf"
                    e.SubFolder = ext
                Else
                    e.Cancel = True
                    MessageBox.Show("商品简码/批次 列不能为空!","提示")
                End If
            Case Else
                MessageBox.Show("此列只能能插入pdf文件!", "提示", MessageBoxButtons.OK,MessageBoxIcon.Information)
                e.Cancel = True \'取消插入
        End Select
End Select



--  作者:有点蓝
--  发布时间:2021/8/4 10:24:00
--  
如果是ftp,不能触发这个事件。其次必须在内置的文件管理器里添加文件才会触发
--  作者:流水
--  发布时间:2021/8/4 10:55:00
--  
就是FTP文件不知处;有没有其他办法完成这个功能;
--  作者:有点蓝
--  发布时间:2021/8/4 10:59:00
--  
设计窗口,到按钮里手工处理:http://www.foxtable.com/webhelp/topics/2697.htm
--  作者:流水
--  发布时间:2021/8/4 11:08:00
--  
好的,谢谢