主题：上传图片后，图片自动命名问题

1.需求是：各项目上传照片后，该照片会自动重命名为：项目名称+时间戳

2.在该表的表事件BeforeAttachFile里面写了代码，但是上传图片后没有重命名，图片还是原名称

代码如下：

Dim now As String = Format(Date.now, "yyyyMMddHHmmss")
Dim dr As DataRow = e.DataRow
 If dr.IsNull("项目名称") Then
    MessageBox.Show("请先输入项目名称!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
     e.Cancel = True
 Else
     e.FileName = dr("项目名称") & now & ".jpg"
 End If

是的，ftp

在beforeupload事件里面写代码？有参考代码不？