比如我按时间来命名该文件。

解决方案 »

  1.   

    upupup,谁能给一段代码我参考一下吗?谢谢了。
      

  2.   

    If filAttach.PostedFile.ContentLength <> 0 Then
                '以当前的时间作为保存附件的名称以防止文件重名
                Dim AttachMark As String = Now.Year.ToString & Now.Month.ToString & Now.Day.ToString & Now.Hour.ToString & Now.Minute.ToString & Now.Second.ToString & Now.Millisecond.ToString
                Dim filesplit() As String = filAttach.PostedFile.FileName.Split("\")
                Dim filename As String = filesplit(filesplit.Length - 1)
                '获得文件的扩展名
                Dim AttachFileExtension As String = filename.Substring(filename.LastIndexOf("."))
                Dim newFilename As String = AttachMark & AttachFileExtension
                '以新文件名保存文件
                filAttach.PostedFile.SaveAs(Server.MapPath("attachments\") & newFilename)