- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 如何自动改名并添加图片。 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=103437)
-- 发布时间：2017/7/8 9:47:00
-- 如何自动改名并添加图片。
需要上传相关的图片到指定的列中，但原来的图片名五花八门，手工改名也费时费力。 请问狐爸，如何做到，上传的图片会自动改名，并添加至列中，谢谢您。
此主题相关图片如下：画板 1.png
-- 发布时间：2017/7/8 9:51:00
--
参考：http://www.foxtable.com/webhelp/scr/2210.htm
-- 发布时间：2017/7/8 15:30:00
--
老师您好。 Dim dr As DataRow = e.DataRow If dr.IsNull("订单编号") Then MessageBox.Show("请先输入订单编号!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) e.Cancel = True Else e.FileName = dr("订单编号") & ".jpg" End If 它只能改名上传一张图片，我希望能上传多张图片，且是改名的，例如：订单编号1.JPG, 订单编号2.JPG, 订单编号3.jpg，，，， 麻烦您老师，写个代码， 万分感谢。。。
-- 发布时间：2017/7/8 15:33:00
--
老师您好，另外我回复的文字，怎么成了一行过了，没有向您们那边断句呢
[此贴子已经被作者于2017/7/8 15:33:56编辑过]
-- 发布时间：2017/7/8 15:56:00
--
BeforeAddFile事件
vars("Count") = e.DataRow.Lines("入库单据").Count
BeforeAttachFile事件
Dim dr As DataRow = e.DataRow
vars("Count") += 1
e.FileName = dr("订单编号") & vars("Count") & ".jpg"
[此贴子已经被作者于2017/7/8 15:56:27编辑过]
-- 发布时间：2017/7/8 16:06:00
--
简洁明了， 谢谢老师，请收下我的双膝吧！ 膜拜。。。。。。
-- 发布时间：2018/11/30 8:43:00
--
您好，蓝老师，现在用这个代码不行了，以前是可以的。
BeforeAddFile事件
vars("Count") = e.DataRow.Lines("入库单据").Count
BeforeAttachFile事件
Dim dr As DataRow = e.DataRow
vars("Count") += 1
e.FileName = dr("订单编号") & vars("Count") & ".jpg"
唯一不同的是，这次上传至云服务器上的。
[此贴子已经被作者于2018/11/30 8:45:33编辑过]
-- 发布时间：2018/11/30 8:51:00
--
以下是引用发哥在2018/11/30 8:43:00的发言：
唯一不同的是，这次上传至云服务器上的。
[此贴子已经被作者于2018/11/30 8:45:33编辑过]
1、上传代码如果是自己写的话，那就直接修改代码；
2、如果用自带的上传功能，你可以在beforeUpload、afterUpload，写代码处理，比如 afterUpload 之后，再写代码重命名。
http://www.foxtable.com/webhelp/scr/3258.htm
http://www.foxtable.com/webhelp/scr/3259.htm
-- 发布时间：2018/11/30 9:27:00
--
您好，甜老师，我是个程序小白，也不太懂了，使用狐表，以实用为主。
看了半天没也没明白，
麻烦您写一下代码给我好吗，我的要要求如题。
谢谢谢谢。谢谢谢谢。我这管理，就差这一点，领导们崔得急了。
-- 发布时间：2018/11/30 10:02:00
--
1、只有【高级开发版】或者【永久开发版】才有 beforeUpload、afterUpload 事件。
重命名代码参考 http://www.foxtable.com/webhelp/scr/1410.htm
2、你也可以单独做一个按钮，点击这个按钮的时候，循环所有行，重命名ftp上面的文件名称。
http://www.foxtable.com/webhelp/scr/1410.htm