   <% 
	data_path="../../" 'ACC连接数据库路径，对SQL无效
	numid="52"
	dir="../err.asp" 
  %>
<!--#include file="../../conn/conn.asp"-->
 <html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>操作成功</title>
<link rel="stylesheet" type="text/css" href="../css/style.css">
 </head>
<table cellpadding=2 cellspacing=1 border=0 width=400 class=tableBorder align=center><TR>
  <TH class=tableHeaderText colSpan=2 height=25>查看会员审核</TH>
<TR><tr><td height=85 align="center" valign=middle class=forumRow>
      <%
			 set rsd=server.CreateObject("adodb.recordset")
			 sqld="select * from Websen_vipgrade  order by roleid desc"
			 rsd.open sqld,conn,1,1
			 if not rsd.eof then
			 do while not rsd.eof 
			 %>
			    
			    
      <a href="/member/modify/xianshi.asp?gradename=<%=rsd("gradename")%>&gradeid=<%=rsd("roleid")%>" target="main"><%=rsd("gradename")%></a>
			    
      <%
			 rsd.movenext
			 loop
			 rsd.close			 
			 end if
			 %>
      </td>
              </tr>
			
</td></tr><tr align=center><td height=30 class=forumRowHighlight></td>
</tr></table>
</body>
</html>
