以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]如何动态的设置附件的服务器目录? (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=178401) |
-- 作者:moseser -- 发布时间:2022/7/3 9:31:00 -- [求助]如何动态的设置附件的服务器目录? 如题, 我想动态的设置 上传附件的目录,该如何设置 |
-- 作者:有点蓝 -- 发布时间:2022/7/3 20:34:00 -- 参考:http://www.foxtable.com/webhelp/topics/2210.htm |
-- 作者:moseser -- 发布时间:2022/7/3 23:03:00 -- 回复:(有点蓝)参考:http://www.foxtable.com/webh... 我是远程存放文件的,在服务器上怎么增加文件夹? |
-- 作者:有点蓝 -- 发布时间:2022/7/3 23:11:00 -- ftp?这种要自己写代码控制,参考:http://www.foxtable.com/webhelp/topics/1410.htm [此贴子已经被作者于2022/7/3 23:11:36编辑过]
|
-- 作者:moseser -- 发布时间:2022/7/4 7:43:00 -- 回复:(有点蓝)ftp?这种要自己写代码控制,参考:h... 我创建一层目录的时候没有问题,但是创建2层目录的时候,就创建不成功,代码如下,麻烦帮忙看下 Dim pv As WinForm.PictureViewer = e.Form.Controls("PictureViewer1") Dim r As Row = CurrentTable.Current Dim tn As String = CurrentTable.Name pv.BindingField = tn & ".问题影像" Dim name As String = r("问题反馈人") Dim filter As String = "\\" & name & "\\" & "问题影像" Dim ftp1 As New FtpClient ftp1.Host = "188.888.888.88" ftp1.Account = "ftpuser" ftp1.Password = "299kk999" If ftp1.DirExists(filter) Then MessageBox.show("目录已经存在", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information) Else ftp1.MakeDir(filter) End If pv.FTPClient.RootDir = filter |
-- 作者:有点蓝 -- 发布时间:2022/7/4 8:34:00 -- 目录要一层一层的创建,先创建第一层,再创建第二层 |