关于ASP无组件上传 (上传后获取到的新文件名)
文件比较大,所以没上传完,这是文件上传后命名为月和天的组合,我现在想得到文件原名月和天的组合应该怎么写需要源文件的朋友说下!!把新上传的文件从新命名-->原文件名加上月和...
文件比较大,所以没上传完,这是文件上传后命名为月和天的组合,我现在想得到文件原名月和天的组合应该怎么写 需要源文件的朋友说下!!
把新上传的文件从新命名-->原文件名加上月和天
Private Function Getname()
Dim y, m, d, h, mm, S, r
Randomize
y = Year(Now)
m = right("0" & Month(Now),2)
d = right("0" & Day(Now),2)
h = right("0" & Hour(Now),2)
mm =right("0" & Minute(Now),2)
S = right("0" & Second(Now),2)
r = CInt(Rnd() * 10000)
r = right("0000" & r,4)
Getname = & m & d
End Function
%> 展开
把新上传的文件从新命名-->原文件名加上月和天
Private Function Getname()
Dim y, m, d, h, mm, S, r
Randomize
y = Year(Now)
m = right("0" & Month(Now),2)
d = right("0" & Day(Now),2)
h = right("0" & Hour(Now),2)
mm =right("0" & Minute(Now),2)
S = right("0" & Second(Now),2)
r = CInt(Rnd() * 10000)
r = right("0000" & r,4)
Getname = & m & d
End Function
%> 展开
若以下回答无法解决问题,邀请你更新回答
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询