以下代码在XP系统中运行时是能显示数据,而要2003系统中显示暂时没有信息!这是哪里受了限制,请各位老师指点一下.
文件夹的安全设置中我已经将Everyone权限全部打开了。
<!--#include file =conn2.asp-->
<SCRIPT language=JavaScript type=text/JavaScript>
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
function MM_callJS(jsStr) { //v2.0
return eval(jsStr)
}
//-->
function zc(obj) {
window.open('adduser.asp','Preview','status=no,toolbar=no,menubar=no,scrollbars=no,resizable=no,width=650,height=500,left=50,top=110');
return false;
}
</SCRIPT>
<%if session("pass")<>"ok" then
Response.Redirect "index.asp"
Response.End
end if
%>
<%
const MaxPerPage=30
dim totalPut
dim CurrentPage
dim TotalPages
dim i,j
dim typename
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
dim sql
dim rs
dim rstype
dim typesql
dim typeid,typename1
if not isEmpty(request("typeid")) then
typeid=request("typeid")
else
typeid=1
end if
%>
<%
user_lib="admin"
Set radmin = Server.CreateObject("ADODB.Recordset")
sql="select * from user_reg order by user_id desc"'"
radmin.open sql,conn,3,2
%>
<html>
<head>
<title>后台管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../style.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0" >
<!--#include file =houtai.asp-->
<table border="0" width="98%" cellspacing="0" cellpadding="0" height="72" align="center">
<tr>
<td width="14%" height="44" align=center><a href="adduser.asp" target="_blank" onclick="return zc(this)">添加用户</a>
<td width="63%" height="44" align=center>
<div align="center"> </div>
<td width="23%" height="44" align=center>
<tr>
<td align=center colspan="3">
<%
sql="select * from user_reg order by user_id desc"
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "<p align='center'>暂时没有信息！</p>"
else
后面略
