新微赢技术网

标题: fckeditor 2.5 上传图片会自动改名 [打印本页]

作者: 风声鹤唳 时间: 2009-11-24 00:45
标题: fckeditor 2.5 上传图片会自动改名
找到command.asp
查找
sFileName = oUploader.File( "NewFile" ).Name
看清楚了，这个就是文件名啦，我们来把它改掉，当然得有个生成文件名的函数才行，改成下面这样
sFileName = GetNewID() &"."& split(oUploader.File( "NewFile" ).Name,".")(1)
把下面这个函数放到最后面
'autorename
Function GetNewID()
dim ranNum
dim dtNow
randomize
Dim nn:nn=Now()
GetNewID=Year(nn)&Month(nn)&Day(nn)&Hour(nn)&Minute(nn)&Second(nn)&Int(8999*Rnd +1000)
End Function

欢迎光临新微赢技术网 (http://bbs.weiying.cn/)