麻烦来看一下
日期：2014-05-17 浏览次数：21104 次
麻烦各位高手来看一下！
Active Server Pages 错误 'ASP 0113 '
脚本超时
/members/upload3.asp
超过了脚本运行的最长时间。可以为 Server.ScriptTimeOut 属性指定新值或更改 IIS 管理工具中的相应值来更改此限制。
=============================================
而upload3.asp 代码是：
-----------
<% '//定义上传文件大小，单位KB
sc_dx=100
%>
<!--#include file= "../inc/conn.asp "-->
<!--#include file= "../inc/fso.asp "-->
<!--#include file= "../inc/je.asp "-->
<html>
<head>
<link href= "../inc/css.css " rel= "stylesheet " type= "text/css ">
<meta http-equiv= "Content-Type " content= "text/html; charset=gb2312 "> </head>
<body>
<%hy "/members/login.asp "
if request( "chuan ") = "yes " then
server_v1=Cstr(Request.ServerVariables( "HTTP_REFERER "))
server_v2=Cstr(Request.ServerVariables( "SERVER_NAME "))
if not mid(server_v1,8,len(server_v2))=server_v2 then
Response.Write " <script language=JavaScript> {window.alert( '错误：拒绝从非本服务器页面提交信息! ');window.history.go(-1);} </script> "
response.end
end if
'生成文件夹名
bh=year(date) & right( "00 "&month(date),2)
wjj= "/members/images/upimages/ "&bh
add_myfso(wjj)
set c=new clsUp
c.AllowExt= "gif;jpg; " '限制文件格式
c.SetFileSize(sc_dx*1024) '最大文件大小
randomize
ranNum=int(900*rnd)+100
wj=trim(year(date()))&right( "0 "&trim(month(date)),2)&right( "0 "&trim(day(date)),2)&right( "0 "&trim(hour(time())),2)&right( "0 "&trim(minute(time())),2)&right( "0 "&trim(second(time())),2)&ranNum
wz=wjj& "/ "&wj
FSPath=server.MapPath(wz)
fn=c.AutoSave( "file ",FSPath& "/ ")
if not c.iserr then
tp=fn
dx=c.Filesize
else
Response.Write c.errmessage
Response.end
end if
set c=nothing
response.write " <script> parent.form.dt.value= ' "&bh& "/ "&tp& " ' </script> "
'将上传图片记录入数据库以备审核
if Request.ServerVariables( "HTTP_X_FORWARDED_FOR ") = " " then
ip=Request.ServerVariables( "REMOTE_ADDR ")
else
ip=Request.ServerVariables( "HTTP_X_FORWARDED_FOR ")
end if
conn.execute( "Insert into shangchuan(tp,dx,name,lx,ip)values( '../images/upimages/ "&bh& "/ "&tp& " ', "&dx& ", ' "&replace(Request.Cookies(shop)( "huiyuan "), " ' ", " ")& " ',0, ' "&ip& " ') ")
'结束上传
response.write "产品图片已经成功上传！ "
response.end
else%>
<script>
var img=null;
function sc(){
//判断游览器及版本
var ua=navigator.userAgent;
var ie=false;
if(navigator.appName== "Microsoft Internet Explorer "){
ie=true;}
if(!ie){
Active Server Pages 错误 'ASP 0113 '
脚本超时
/members/upload3.asp
超过了脚本运行的最长时间。可以为 Server.ScriptTimeOut 属性指定新值或更改 IIS 管理工具中的相应值来更改此限制。
=============================================
而upload3.asp 代码是：
-----------
<% '//定义上传文件大小，单位KB
sc_dx=100
%>
<!--#include file= "../inc/conn.asp "-->
<!--#include file= "../inc/fso.asp "-->
<!--#include file= "../inc/je.asp "-->
<html>
<head>
<link href= "../inc/css.css " rel= "stylesheet " type= "text/css ">
<meta http-equiv= "Content-Type " content= "text/html; charset=gb2312 "> </head>
<body>
<%hy "/members/login.asp "
if request( "chuan ") = "yes " then
server_v1=Cstr(Request.ServerVariables( "HTTP_REFERER "))
server_v2=Cstr(Request.ServerVariables( "SERVER_NAME "))
if not mid(server_v1,8,len(server_v2))=server_v2 then
Response.Write " <script language=JavaScript> {window.alert( '错误：拒绝从非本服务器页面提交信息! ');window.history.go(-1);} </script> "
response.end
end if
'生成文件夹名
bh=year(date) & right( "00 "&month(date),2)
wjj= "/members/images/upimages/ "&bh
add_myfso(wjj)
set c=new clsUp
c.AllowExt= "gif;jpg; " '限制文件格式
c.SetFileSize(sc_dx*1024) '最大文件大小
randomize
ranNum=int(900*rnd)+100
wj=trim(year(date()))&right( "0 "&trim(month(date)),2)&right( "0 "&trim(day(date)),2)&right( "0 "&trim(hour(time())),2)&right( "0 "&trim(minute(time())),2)&right( "0 "&trim(second(time())),2)&ranNum
wz=wjj& "/ "&wj
FSPath=server.MapPath(wz)
fn=c.AutoSave( "file ",FSPath& "/ ")
if not c.iserr then
tp=fn
dx=c.Filesize
else
Response.Write c.errmessage
Response.end
end if
set c=nothing
response.write " <script> parent.form.dt.value= ' "&bh& "/ "&tp& " ' </script> "
'将上传图片记录入数据库以备审核
if Request.ServerVariables( "HTTP_X_FORWARDED_FOR ") = " " then
ip=Request.ServerVariables( "REMOTE_ADDR ")
else
ip=Request.ServerVariables( "HTTP_X_FORWARDED_FOR ")
end if
conn.execute( "Insert into shangchuan(tp,dx,name,lx,ip)values( '../images/upimages/ "&bh& "/ "&tp& " ', "&dx& ", ' "&replace(Request.Cookies(shop)( "huiyuan "), " ' ", " ")& " ',0, ' "&ip& " ') ")
'结束上传
response.write "产品图片已经成功上传！ "
response.end
else%>
<script>
var img=null;
function sc(){
//判断游览器及版本
var ua=navigator.userAgent;
var ie=false;
if(navigator.appName== "Microsoft Internet Explorer "){
ie=true;}
if(!ie){
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
