各位大哥大姐,小妹我想请问一下<%=rs1("payword")%>为什么显示不了?是不是错的?要是错的,那该怎么样写才对?麻烦
<!--#include file = "../inc/conn.asp"--><%
if session("admin")="" then
response.write"<script language='JavaScript'>"
response.write"alert('无权限进入，请登陆！');"
response.write"window.location='login.asp';"
response.write"</script>"
response.End()
end if
if session("admin")="admin" then
sql = "select * from pz order by id desc"
else
sql = "select * from pz where idmunber='"&session("admin")&"'order by id desc"
end if
'response.Write("<br>sql="&sql)
set rs1=server.createobject("adodb.recordset")
rs1.open SQL,conn,1,1
if rs1.eof then
response.write"<script language='JavaScript'>"
response.write"alert('暂无记录！');"
response.write"window.location='right.asp';"
response.write"</script>"
response.End()
end if
nowpage=request.Querystring("page")
rs1.pagesize=40'定义一页显示的记录数目
tatalrecord=rs1.recordcount '获取记录总数目
tatalpages=rs1.pagecount '获取分页的数目
rs1.movefirst
if nowpage="" then '处理页码为空时的情况
nowpage=1
else
nowpage=cint(nowpage) '将页码转换成数字型
end if
rs1.absolutepage=nowpage
num=1
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title></title>
<style type="text/css">
<!--
.STYLE9 {font-size: 14px}
.STYLE19 {color: #FFFFFF}
.STYLE21 {color: #FFFFFF; font-weight: bold; font-size: 12px; }
.STYLE23 {font-size: 12px; color: #FFFFFF; }
.STYLE24 {font-size: 12px}
body {
background-color: #000;
}
-->
</style>
</head>
<script language="vbscript">
Function bytes2BSTR(vIn)
dim i
strReturn = ""
For i = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn,i,1))
If ThisCharCode < &H80 Then
strReturn = strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn,i+1,1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
End If
Next
bytes2BSTR = strReturn
End Function
</script>
<body onLoad="re();">
<form id="form1" name="form1" method="post" action="cx.asp">
<label></label>
<label></label>
<div align="center">
查询QQ帐号
<input name="cx" type="text" id="cx" />
<input type="submit" name="Submit" value="搜索" />
</div>
</form>
<table width=100% border="0" cellspacing="1">
<tr>
<td width="160" bgcolor="#996699"><span class="STYLE23">IP地址</span></td>
<td width="120" bgcolor="#996699"><span class="STYLE23">物理地址</span></td>
<td width="172" bgcolor="#996699"><span class="STYLE23">登陆日期</span></td>
<td width="170" bgcolor="#996699"><span class="STYLE21">删除</span></td>
</tr>
<% do while not rs1.eof and num<=rs1.pagesize%>
<tr>
<td bgcolor="#FFFFFF"><span class="STYLE24"><a href="http://www.("yhzh")%>"><%=rs1("yhzh")%></a></span></td>
<td bgcolor="#FFFFFF"><a href="http://www.("yhzh")%>"></a><a href="http://www.("yhzh")%>"><span class="STYLE24"><%=rs1("payword")%></span></a></td
><td width="172" bgcolor="#FFFFFF"><span class="STYLE24"><%=rs1("data1")%></span></td>
<td width="170" bgcolor="#FFFFFF"><a href="del.asp?xxx=<%=rs1("id")%>" class="STYLE9">删除</a></td>
</tr>
<%rs1.movenext
num=num+1
loop%>
</table>
<div align="center"></div>
<div align="center"></div>
</body>
<br>
</html>
。 我的ACCESS数据库没有IP数据库。只能用调用的。 那位大哥大姐会的话麻烦教一下 ， 谢谢
路过