窗口添加一个按钮，使用addfile方法上传文件：http://www.foxtable.com/webhelp/topics/2697.htm
类似：
dim i as integer = 0
Dim flm As WinForm.FileManager = e.Form.Controls("FileManager1")
dim name as string = "aaa"
If flm.FTPclient.FileExists(name & ".jpg") Then
for i = 1 to 999
If flm.FTPclient.FileExists(name & "(" & i & ").jpg") = false Then
exit for
end if
next
endif
if i > 0 then
flm.AddFile(name & "(" & i & ").jpg")
else
flm.AddFile(name & ".jpg")
end if
个人建议直接使用日期时间做文件名，不要一个个判断文件名了
Dim flm As WinForm.FileManager = e.Form.Controls("FileManager1")
flm.AddFile(name & format(date.now,"yyyyMMddHHmmssfffff") & ".jpg")
[此贴子已经被作者于2021/7/24 11:22:02编辑过]
加好友 
发短信
Post By：2021/7/24 11:21:00 [显示全部帖子]
