简单asp程序问题,500服务器内部错误,马克斯maxcms
下面所有的包含conn.asp/check.asp和调用make_view_play.asp都是正常使用中的,我改一个asp页,用“for zt_id=100 to 150,next替代了其它内容.
<!--#include file="conn.asp"-->
<!-- #include file="check.asp" -->
for zt_id=100 to 150
<%
response.write "
<script language=javascript>
location.href='make_view_play.asp?zt_id="&zt_id&"&posturl=add';
</script>
"
%>
next
原页是这样的:
<!--#include file="conn.asp"-->
<!-- #include file="check.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>后台管理中心</title>
<LINK href="admin.css" type=text/css rel=stylesheet>
</head><BODY>
<script language="javascript" type="text/javascript">
var xmlHttp = false;
try {
xmlHttp = new ActiveXObject("Msxml2.XMLHTTP");
} catch (e) {
try {
xmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
} catch (e2) {
xmlHttp = false;
}
}
if (!xmlHttp && typeof XMLHttpRequest != 'undefined') {
xmlHttp = new XMLHttpRequest();
}
function callServer() {
var u_name = document.getElementById("zt_name").value;
if ((u_name == null) || (u_name == "")) return;
var url = "?action=re&name=" + u_name;
xmlHttp.open("GET", url, true);
xmlHttp.onreadystatechange = updatePage;
xmlHttp.send(null);
}
function updatePage() {
if (xmlHttp.readyState < 4) {
zt_name_ok.innerHTML="loading...";
}
if (xmlHttp.readyState == 4) {
var response = xmlHttp.responseText;
zt_name_ok.innerHTML=response;
}
}
</script>
<script>
function setid()
{
str='';
if(!document.all.no.value)
document.all.no.value=1;
for(i=1;i<=document.all.no.value;i++)
{
if(document.all.no.value<10)
{
str+=document.all.no1.value+'0'+i+''+document.all.no2.value+'\r';
}
else if(document.all.no.value<100)
{
if(i<10)
{
str+=document.all.no1.value+''+'0'+i+''+document.all.no2.value+'\r';
}
else
{
str+=document.all.no1.value+''+i+''+document.all.no2.value+'\r';
}
}
else if(document.all.no.value<1000)
{
if(i<10)
{
str+=document.all.no1.value+''+'00'+i+''+document.all.no2.value+'\r';
}
else if(i<100)
{
str+=document.all.no1.value+''+'0'+i+''+document.all.no2.value+'\r';
}
else
{
str+=document.all.no1.value+''+i+''+document.all.no2.value+'\r';
}
}
}
form2.zt_url.value=''+str+'';
}
</script><%
action=replace(trim(request("Action")),"'","''")
set rs=server.createobject("adodb.recordset")
if action="save" then
zt_type=trim(request.form("zt_type"))
zt_name=trim(request.form("zt_name"))
zt_url=trim(request.form("zt_url"))
zt_url1=trim(request.form("zt_url1"))
zt_pic=trim(request.form("pic"))
zt_dy=trim(request.form("zt_dy"))
zt_dy1=trim(request.form("zt_dy1"))
zt_color=trim(request.form("zt_color"))
zt_dq=trim(request.form("zt_dq"))
zt_zy=trim(request.form("zt_zy"))
zt_lz=trim(request.form("zt_lz"))
zt_content=trim(request.form("zt_content"))
zt_content=replace(zt_content,"'","‘")
conn.execute("insert into zt_data(zt_type,zt_name,zt_color,zt_url,zt_url1,zt_content,zt_pic,zt_tj,zt_hits,zt_date,zt_dy,zt_dy1,zt_dq,zt_zy,zt_lz) values("&zt_type&",'"&zt_name&"','"&zt_color&"','"&zt_url&"','"&zt_url1&"','"&zt_content&"','"&zt_pic&"',0,0,'"&now()&"','"&zt_dy&"','"&zt_dy1&"','"&zt_dq&"','"&zt_zy&"','"&zt_lz&"')")
zt_id=conn.execute("select top 1 zt_id from zt_data order by zt_id desc")(0)
response.write "<script language=javascript>location.href='make_view_play.asp?zt_id="&zt_id&"&posturl=add';</script>"
%><table width="330" border="0" align="center" cellpadding="0" cellspacing="1" class="tableBorder">
<tr align="center">
....................
</tr>
<tr>
<td class="forumRow" colspan=2 align=center><input type=Submit class=button value="确认保存" name=Submit> <input type=reset name=Submit2 class=button value="清 除"></td>
</tr>
</form>
</table>
<%end if%>
</body></html>