HTTP 500 - 内部服务器错误
<%mydbpath="../"
%>
<%'//定义上传文件大小,单位KB
sc_dx=30
%>
<!--#include file="../configinc/conn.asp"-->
<!--#include file="../shop123admin/upfiles1.asp"-->
<!--#include file="../configinc/amount.asp"-->
<html>
<head>
<link href="../configinc/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=Request.Cookies(Rikee)("huiyuan")
wjj="images/rz/"&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.myform.xt.value='"&bh&"/"&tp&"'</script>"
response.write "上传成功 [<a href=# onclick=history.go(-1)>重新上传</a>]"
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){
form.file.outerHTML=form.file.outerHTML.replace(/value=\w/g,'');
alert("建议您使用IE6。0以上的浏览器,在非IE浏览器中上传功能不能正常使用。");
return;}
var IEversion=parseFloat(ua.substring(ua.indexOf("MSIE ")+5,ua.indexOf(";",ua.indexOf("MSIE "))));
if(IEversion< 6.0){
form.file.outerHTML=form.file.outerHTML.replace(/value=\w/g,'');
alert("系统检测到您的浏览器的版本比较低,建议您使用IE6。0以上的浏览器,否则上传功能不能正常使用。\n您可以http://www.免费获得IE的最新版本!");
return;}
//判断是否图片 inp为文本框id
form.btn.disabled=true;
if(img)img.removeNode(true);
img=document.createElement("img"); //创建img对象
img.style.position="absolute";
img.style.visibility="hidden";
img.attachEvent("onreadystatechange",orsc);
img.attachEvent("onerror",oe);
document.body.insertAdjacentElement("beforeend",img);
img.src=form.inp.value;}
function oe(){
//不是图片显示错误信息
alert("对不起,只能上传图片文件!");
form.file.outerHTML=form.file.outerHTML.replace(/value=\w/g,'');}
function orsc(){
//取得图片信息
var t
if(img.readyState!="complete")return false;
t=img.fileSize
form.img_s.value=t //这是filesize
if (t><%=sc_dx*1024%>) {
alert("对不起,上传图片不能超过指定大小<%=sc_dx%>kb!");
form.file.outerHTML=form.file.outerHTML.replace(/value=\w/g,'');
return false;}
form.btn.disabled=false;}
</script>
<form name="form" method="post" action="?chuan=yes" enctype="multipart/form-data" >
<input name="file" type="file" class="wenbenkuang" size="30" id="inp" onChange="sc()">
<input name="Submit" type="submit" class="wenbenkuang" value="上传" id=btn disabled><input name="img_s" type="hidden" id="img_s">
</form>
<%end if%></body></html>
只有上传这个页面报这个错
各位朋友看一下 这个上传 那里错了,
提示的错误信息是:
HTTP 500 - 内部服务器错误
Internet Explorer
请各位帅哥 靓姐 帮帮忙 看看