如下,是该页面的代码:
--------------------------------------------------------------------------------------
<%@ Language=VBScript %><!--#include file="../sysparam.asp" --><!--#include FILE="./upload_5xsoft.inc"-->
<html><head><meta http-equiv="Content-Type" content="text/html;charset=gb2312"></head>
<body><form name="frm1" action="ExtraServiceMmsAdd_ftpput.asp" method="post">
<!--附件上传代码---------------------------start---><%set upload=new upload_5xsoftset file=upload.file("mmsupfile")
if file.fileSize<1 then response.write"<script language=javascript>alert('请选择文件!');history.back()</script>" response.end end if
if file.fileSize<10 or file.fileSize>500*1024 then '修改默认的数值 100 单位(KB) response.write "<br><br><br><br><br>错误:上传的文件大小超过了500k限制! <a href='javascript:history.go(-1)'>退回上一步</a>" response.endend If
upfilename = split(file.FileName,".")upfileext = upfilename(Ubound(upfilename))
if upfileext<>"rar" and upfileext<>"zip" and upfileext<>"txt" and upfileext<>"doc" and upfileext<>"RAR" and upfileext<>"ZIP" and upfileext<>"TXT" and upfileext<>"JPG" and upfileext<>"jpg" And upfileext<>"bmp" And upfileext<>"gif" And upfileext<>"png" then response.write "<br><br><br><br><br>错误:上传的文件格式不对! <a href='javascript:history.go(-1)'>退回上一步</a>" response.endend if
ufp=Year(now)&Month(now)&Day(now)&Hour(now)&Minute(now)&Second(now)&"."&upfilename(UBound(upfilename))file.saveas Server.mappath("../mmssendtemp/"&ufp)tempfile=Server.mappath("../mmssendtemp/"&ufp)
If trim(upload.Form("mmssubject"))<>"" Then mmssubject=trim(upload.Form("mmssubject")) End IfIf trim(upload.Form("priority"))<>"" Then priority=trim(upload.Form("priority")) End IfIf trim(upload.Form("mmscontent"))<>"" Then mmscontent=trim(upload.Form("mmscontent")) End IfIf Trim(upload.Form("remark"))<>"" Then Remark=Trim(upload.Form("remark")) End If
mmsfilepath="D:\MMS Attachment\send\"&ufpmmsfilepath=Trim(mmsfilepath)
set file=nothingset upload=nothing
Dim AppealNum,AppealCount AppealNum=30 '页面60秒打开网页次数的限制AppealCount=Request.Cookies("AppealCount") If AppealCount="" Then response.Cookies("AppealCount")=1AppealCount=1response.cookies("AppealCount").expires=dateadd("s",60,now()) Else response.Cookies("AppealCount")=AppealCount+1response.cookies("AppealCount").expires=dateadd("s",60,now())End If if int(AppealCount)>int(AppealNum) then response.write "为防止恶意上传文件,请您等待60秒后再上传文件.<br>为您带来不便,请谅解!" response.end End If %>
<script language="Javascript"> function minipic(smileface) { window.opener.document.form1.minipic.value = smileface; } function pic(smileface) { window.opener.document.form1.pic.value = smileface; }</script><!--附件上传代码---------------------------end----->
<%response.Write(mmssubject&"----"&mmscontent&"----"&priority&"----"&Remark&"----"&tempfile&"----"&mmsfilepath&"----"&ufp)'response.End%>
</form>
<script type="text/javascript"> frm1.submit();</script>
</body></html>
--------------------------------------------------------------------------------------
在页面“ExtraServiceMmsAdd_ftpput.asp” 用“request.form("mmssubject")”怎么也获取不到这个值,之前能使用的,悲剧啊,各位帮忙找找原因啊,我要喷血了··
- 2 回答
- 0 关注
- 382 浏览
添加回答
举报
0/150
提交
取消