以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]接收上传文件时能否改名为编辑框的值?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=119944)

--  作者:aduydgd
--  发布时间:2018/6/4 16:41:00
--  [求助]接收上传文件时能否改名为编辑框的值?
For Each key As String In e.Files.Keys
                If key = "up1" Then
                    For Each fln As String In e.Files(key)
                        e.SaveFile(key, fln, ProjectPath & "Attachments\\" & fln)  这个fln能否修改为编辑框的值?
                    Next
                    dr.Lines("
照片") = e.Files(key)
                End If
            Next

--  作者:有点甜
--  发布时间:2018/6/4 16:43:00
--  
e.SaveFile(key, fln, ProjectPath & "Attachments\\" & e.values("文本框id")