FCKeditor Asp版上传文件时自动重命名方法-至于FCK的精减就不说了.可以百度一下或者说哪天有时间了再写这个精减文章.(本版本为FCK 2.6.6) 首先打开FCKeditor\editor\filemanager\conn...

海南网站建设,网页设计
记忆工作中的点滴
首页>> editor编辑器 >>FCKeditor Asp版上传文件时自动重命名方法

至于FCK的精减就不说了.可以百度一下或者说哪天有时间了再写这个精减文章.(本版本为FCK 2.6.6)

首先打开FCKeditor\editor\filemanager\connectors\asp\config.asp文件.

ConfigIsEnabled = true '启用上传功能 把 false 改成 true

然后找到FCKeditor\editor\filemanager\connectors\asp\下的

commands.asp 与 io.asp文件

commands.asp

找到:sFileName = SanitizeFileName( sFileName )

在这行的下边一行添加:

sFileName = GetID("LwpCms") & "." & Split(sFileName,".")(1)

io.asp

找到:function SanitizeFileName( sNewFileName )

在该函数结束的end function下边添加

Function GetID(prefix)

dim YearStr , MonthStr , DayStr , HourStr , MinStr , SecStr , RndStr , NStr , i ,j , SupplyStr 'SupplyStr 为补位 防止出现位数少的情况 就自动补位

YearStr = year(date)

MonthStr = month(Date)

DayStr=day(Date)

HourStr = hour(time)

MinStr = minute(time)

SecStr = second(time)

if len(MonthStr)<2 then MonthStr="0" & MonthStr

if len(DayStr)<2 then DayStr="0" & DayStr

if len(HourStr)<2 then HourStr="0" & HourStr

if len(MinStr)<2 then MinStr="0" & MinStr

if len(SecStr)<2 then SecStr="0" & SecStr

Randomize

RndStr = Cstr(Fix(9000*rnd() +1000))

NStr = prefix&YearStr&MonthStr&DayStr&HourStr&MinStr&SecStr&RndStr

j = 20 - len(Nstr)

SupplyStr = ""

For i=1 to j

   Randomize

   SupplyStr = SupplyStr & fix(10*rnd())
 
Next

GetID = NStr & SupplyStr
 
end function

保存。关掉所有浏览器重新打开试下。此时上传的文件名

点击查看原图


×

感谢您的支持,我们会一直保持!

扫码支持
请土豪扫码随意打赏

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

打赏作者
版权所有,转载注意明处:不懂戀愛魚兒 » FCKeditor Asp版上传文件时自动重命名方法
标签: asp function fckeditor

发表评论

路人甲 表情
看不清楚?点图切换 Ctrl+Enter快速提交

网友评论(2)

非常感谢!
对酒当歌 9年前 (2010-09-23) 回复
@对酒当歌:8k7
不懂戀愛魚兒 9年前 (2010-09-24) 回复