设为首页收藏本站
开启辅助访问 切换到窄版
搜索
第一问答网»论坛 › 中问网 › 问答 › 跪求高手帮忙改一段ASP代码，虽然很简单，但小弟确实玩 ...

跪求高手帮忙改一段ASP代码，虽然很简单，但小弟确实玩不来~

[复制链接]
查看11 | 回复3 | 2013-2-2 04:44:10 | 显示全部楼层 |阅读模式
回复

使用道具 举报

千问 | 2013-2-2 04:44:10 | 显示全部楼层

回复

使用道具 举报

千问 | 2013-2-2 04:44:10 | 显示全部楼层
!-- #include file=\\\"Upload.asp\\\" --%<br _extended=\\\"true\\\">Server.ScriptTimeout = 900formPath = \\\"UploadFiles/\\\"Set upload= New DoteyUploadUpload.SaveTo(formPath) \\\'将文件根据其文件名统一保存在某路径下If upload.ErrMsg = \\\"\\\" then<br _extended=\\\"true\\\">Response.Write (\\\"列出所有form数据:BR\\\")<br _extended=\\\"true\\\">For each formName in upload.Form \\\'\\\'列出所有form数据<br _extended=\\\"true\\\">Response.write formName\\\"=\\\"upload.Form(formName)\\\"br\\\"<br _extended=\\\"true\\\">nextResponse.Write (\\\"BRBR列出所有上传了的文件:BR\\\")<br _extended=\\\"true\\\">For Each formName In upload.Files \\\'\\\'列出所有上传了的文件<br _extended=\\\"true\\\">Set file = upload.Files(formName) \\\'\\\'生成一个文件对象<br _extended=\\\"true\\\">response.write file.FilePath\\\" (\\\"file.FileType\\\"/\\\"file.FileSize/1024 \\\"K) = a target=_blank href=\\\'\\\"formPathFile.FileName\\\"\\\'\\\"formPathFile.FileName\\\"/a 您所提交的文件已成功，我们在工作时间48小时内处理完毕，谢谢!br\\\"<br _extended=\\\"true\\\">response.write \\\"br /BR\\\"<br _extended=\\\"true\\\">Set file=nothing<br _extended=\\\"true\\\">Next<br _extended=\\\"true\\\">Else<br _extended=\\\"true\\\">Response.Write(\\\"上传过程中出现错误:br\\\"Upload.ErrMsg)<br _extended=\\\"true\\\">End IfSet upload=nothing<br _extended=\\\"true\\\">%<br _extended=\\\"true\\\">
回复

使用道具 举报

千问 | 2013-2-2 04:44:10 | 显示全部楼层
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

千问

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
回复楼主 返回列表
热门排行