| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 434 人关注过本帖
标题:当AutoSave=1的时候
只看楼主 加入收藏
幽灵男孩
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2007-11-25
收藏
 问题点数:0 回复次数:0 
当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或者其他的时候,文件按照时间命名.请问这样应该怎么写呀??
谢谢各位了
搜索更多相关主题的帖子: AutoSave 
2007-11-25 22:02
快速回复:当AutoSave=1的时候
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017753 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved