当AutoSave=1的时候
我在修改一个ASP上传的文件. 因为有的时候需要原文件名上传,有的时候不需要.现在遇到下面这个问题
select case request("action")
'■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■上传新闻附件
case "news":
if Request.QueryString("submit")="news" then
uploadpath="up/news/" '■■■■■■■■上传新闻附件文件目录
uploadsize=1024 '■■■■■■■■上传新闻附件文件大小
uploadtype="txt/rar" '■■■■■■■■上传新闻附件文件类型
Set yecaorequest=new UpLoadClass
yecaorequest.SavePath=uploadpath
yecaorequest.MaxSize=uploadsize*1024
yecaorequest.FileType=uploadtype
yecaorequest.AutoSave=1
yecaorequest.open
if yecaorequest.form("file_Err")<>0 then
select case yecaorequest.form("file_Err")
case 1:str="<div style=""padding-top:5px;padding-bottom:5px;""><font color=red>上传不成功!文件超过"&uploadsize&"k [<a href='javascript:history.go(-1)'>重新上传</a>]</font></div>"
case 2:str="<div style=""padding-top:5px;padding-bottom:5px;""><font color=red>上传不成功!文件格式不对 [<a href='javascript:history.go(-1)']>重新上传</a>]</font></div>"
case 3:str="<div style=""padding-top:5px;padding-bottom:5px;""><font color=red>上传不成功!文件太大且格式不对 [<a href='javascript:history.go(-1)'>重新上传</a>]</font></div>"
end select
response.write str
else
response.write "<script language=""javascript"">parent.form.pic.value='"&yecaorequest.SavePath&yecaorequest.Form("file")&"';"
response.write "</script>"
response.write "<script language=""javascript"">"
response.write "parent.IframeID.document.body.innerHTML+='<img align=left src="&yecaorequest.SavePath&yecaorequest.Form("file")&" width=200>';"
response.write "</script>"
size=round((yecaorequest.Form("file_size")/1024),2)&"kb"
response.write "<script language=""javascript"">parent.form.size.value='"&size&"';"
response.write "</script>"
response.write "<center><div style=""padding-top:5px;padding-bottom:5px;""><font size=2>文件上传成功! [<a href='javascript:history.go(-1)'>重新上传</a>]</font></p></div></center>"
end if
Set yecaorequest=nothing
end if
%>
<form name=form action=?action=news&submit=news method=post enctype=multipart/form-data>
选择文件:<input type=file name=file class="border" value size="35" >
<input type=submit name=submit value=开始上传 class="border">
<input type="checkbox" name="AutoSave" value="0"<%If AutoSave=1 Then Response.Write " checked=""checked"""%> /> 不自动更名
</form></div>
下面是上传的函数,太多了.我就不发出来了..
问题是这样的.
我需要在上传的时候,选择自动或不自动命名.
就是当yecaorequest.AutoSave=1的时候文件不自动命名,=0或者其他的时候,文件按照时间命名.请问这样应该怎么写呀??
谢谢各位了