| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 391 人关注过本帖
标题:[求助]文件复制问题
取消只看楼主 加入收藏
rodney520
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2006-10-7
收藏
 问题点数:0 回复次数:0 
[求助]文件复制问题

if request("action")="jpg" then
if request("submit")="jpg" then
dim strtype,strname,strnum
img=request.Form("file")这里为什么取不到值??
Set fs=server.CreateObject("Scripting.FileSystemObject")
fs.copyfile img,Server.MapPath("\img")& "\"'复制文件


strnum=instrRev(img,"/")'判断"/"在字符串中出现的次数
strname=mid(img,strnum+1)'"/"后面的文件名

response.Write "<script language=javaScript>alert('上传成功!');admin.asp?edit=edit&ico=strname</script>"
end if

response.write "<form name='form' action=?action=jpg&submit=jpg method=post enctype=multipart/form-data>"
response.write "<input type=file name=file class='tx' size='20'>&nbsp;"
response.write "<input type=submit name=submit value=上传 class=""tx1"">"
response.write "</form>"
end if%>

搜索更多相关主题的帖子: 文件 
2006-12-03 10:57
快速回复:[求助]文件复制问题
数据加载中...
 
   



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

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