28,406
社区成员
发帖
与我相关
我的任务
分享upload_5xSoft上传组件的问题！！
我想在上传图片时自动将图片进行重命名，只知道大致的思路，但是具体操作起来好像比较麻烦，给个建议或意见！！
...全文
请发表友善的回复…
发表回复
nbchp 2004-01-17
- 打赏
- 举报
randomize
ranNum=int(900*rnd)+100
filename=SavePath&year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&ranNum&"."&fileExt
file.SaveToFile Server.mappath(FileName)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
自动重命名为年月日时分秒+随机的文件名
fileext为扩展名
ranNum=int(900*rnd)+100
filename=SavePath&year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&ranNum&"."&fileExt
file.SaveToFile Server.mappath(FileName)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
自动重命名为年月日时分秒+随机的文件名
fileext为扩展名
windancer 2004-01-17
- 打赏
- 举报
假设你的5xsoft的对象是upload
获取了文件对象
set file=upload.file(formName)
Dim LastName:LastName=GetLastName(file.FileName)'获取文件名,截取后缀名
file.SaveAs date() & LastName
'获取后缀命的函数自己写一下了:)找找也有
获取了文件对象
set file=upload.file(formName)
Dim LastName:LastName=GetLastName(file.FileName)'获取文件名,截取后缀名
file.SaveAs date() & LastName
'获取后缀命的函数自己写一下了:)找找也有
jhlgxyxl 2004-01-17
- 打赏
- 举报
文件是可以传上去了，就是想把文件名按照日期命名，即重命名！！
windancer 2004-01-17
- 打赏
- 举报
你现在做到什么程度了,文件上传做好了吗?
有什么具体的问题可以详细描述下
有什么具体的问题可以详细描述下
jhlgxyxl 2004-01-17
- 打赏
- 举报
不太懂，可以详细一点说吗？
我原上传这一块还是比较陌生的
我原上传这一块还是比较陌生的
windancer 2004-01-17
- 打赏
- 举报
upload.saveAs filename
