我做了几天都没成功，那位帮帮忙，改改我的代码，将未实现的功能添加上，谢了
要求达到这种效果：
用户登录能查看自己提交的信息，用户信息放在表t_spd中（已实现）
某超级用户登录能查看表t_xtcs中字段xtjsxq以“华北”开头的用户信息，用户信息放在表t_spd中（未实现）
附数据库结构
库名jobs
表名company记录用户资料 字段uname记录用户注册名 字段zptext记录用户权限，为1则为超级用户
表名t_spd记录用户信息 字段qyzgz也记录用户注册名
表名t_xtcs 记录用户地区信息 字段xtjsxq记录用户所在地区
以下是我的代码
<% Response.Buffer=True %>
<!--#include file="../inc/company.inc"-->
<% uname=session("cuid")
set rs=nothing
set rs=server.createobject("adodb.recordset")
sql2="select * from company,t_spd where uname='"&uname&"'"
rs.open sql2,conn,1,1
click=rs("click") %>
<html>
<head>
<title>登录首页</title>
</head>
<script language="JavaScript" src="../inc/window.js"></script>
<form action="search.asp" method="post">
<body topmargin="0" leftmargin="0">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="780" height="445">
<tr>
</tr>
<tr>
<td height="214" colspan="3" valign="top" bordercolor="#000000" bordercolorlight="#C6CEDE" bordercolordark="#C6CEDE" bgcolor="#EBEEF3"><br>
尊敬的用户:<font color="#ff0000"><%=uname%></font>，您好！欢迎使用网上查询系统，请妥善保管您的密码，合作愉快。<br>
<% set rs=server.createobject("adodb.recordset")
sql3="select * from t_spd where qyzgz='"&uname&"'"
rs.open sql3,conn,1,1%>
<div align="left">
<table border="1" cellpadding="0" cellspacing="0" width="650" height="24" bordercolor="#FFFFFF" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF">
<!--DWLayoutTable-->
<% do while not rs.eof %>
<tr>
这里是列表显示用户信息省略
<% c=c+1
rs.movenext
if c>=50 then exit do
loop
rs.close
set rs=nothing %>
</table>
</div></td>
<td> </td>
</tr>
</table>
</center>
</div>
</body>
</form>
</html>
