以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何本地选择图片上传到FTP服务器?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=84629)

--  作者:yangguojun
--  发布时间:2016/5/6 9:44:00
--  [求助]如何本地选择图片上传到FTP服务器?
第一:添加本地图片
第二:将选择的图片重新命名
第三:重命名的图片文件上传到FTP服务器,图片存储在 “订单” 表 的  “图片” 列(备注型),同时可以显示在 “订单” 窗口的 “PictureViewer2” 控件上

求帮忙, 之前绘图板上的绘制的图片  通过按键我能上传到后台FTP,上传本地图片弄不出来了

--  作者:大红袍
--  发布时间:2016/5/6 9:49:00
--  
Dim dlg As New OpenFileDialog
Dim piv As WinForm.PictureViewer = e.Form.Controls("PictureViewer1")
dlg.Filter= "图形文件|*.bmp;*.jpg;*.gif"
If dlg.ShowDialog = DialogResult.OK Then
    Dim fname As String = "/" & filesys.GetName(dlg.fileName)
    If piv.FTPclient.Upload(fname, dlg.FileName) Then
        msgbox("上传成功")
        piv.AddFile(fname)
    End If
End If

--  作者:yangguojun
--  发布时间:2016/5/6 10:25:00
--  
非常感谢,完成了