求救:ASP中如何保留上传图片的原文件名?
我想将新上传的图片文件名命名为"原有文件名_自定义文件名.后缀名"的格式,而现在的代码是保存为“上传日期自定义的文件名”,上传页面的asp代码可以在这里查看——http://www.footballimage.net/UpLoadClass.txt
应该是在里面的这一段进行修改吧,尝试了几次,没有结果,请指教——
Public Function GetFileName()
Dim RanNum,MyDay,MyHou,MyMin,MySec,TmpTime,m
lngTime = lngTime+1
TmpTime = Array(Year(Now()),Month(Now()),Day(Now()),Hour(Now()),Minute(Now()),Second(Now()))
TmpTime(0) = String(4-Len(TmpTime(0)),"0")&TmpTime(0)
For m = 1 To Ubound(TmpTime)
TmpTime(m) = String(2-Len(TmpTime(m)),"0")&TmpTime(m)
Next
GetFileName = TmpTime(0)
For m = 1 To Ubound(TmpTime)
GetFileName = GetFileName&TmpTime(m)
Next
GetFileName = GetFileName & lngTime
End Function
不知道怎么修改,紧急,万分感谢!