www.gusucode.com > CC校友录贴吧 CCBar源码程序asp编程 > template_c/page_address_list.html.asp

    <!-- #include file="page_sub_header.html.asp" -->             
<!-- ##### 主栏目开始 ##### --->
<!-- #include file="page_address_menu.html.asp" -->
<%Call ActionView(CONST_ACTION_FUNC)%>
<table width="95%" border="0" align="center" cellpadding="2" cellspacing="1" class="list_table">
<tbody>
	<tr  class="list_title_tr"> 
		<td height="30" class="list_title_td" colspan=9>校友列表列表 (点击标题可排序查看)</td>
	</tr>
	<tr  class="list_title_tr"> 
		<td width="5%" class="list_title_td">序号</td>
		<td class="list_title_td"><%=MakeOrder("USER_ACCOUNT","注册名",TAG_strOrderUrl)%></td>
		<td width="10%" class="list_title_td"><%=MakeOrder("USER_REALNAME","姓名",TAG_strOrderUrl)%></td>
		<td class="list_title_td"><%=MakeOrder("USER_CLASS","班级",TAG_strOrderUrl)%></td>
		<td class="list_title_td"><%=MakeOrder("USER_WORK","职业领域",TAG_strOrderUrl)%></td>
		<td class="list_title_td"><%=MakeOrder("USER_LOGIN_COUNT","访问次数",TAG_strOrderUrl)%></td>
		<td class="list_title_td"><%=MakeOrder("USER_LAST_TIME","最近登陆",TAG_strOrderUrl)%></td>
		<td class="list_title_td">详细</td>
	</tr>
	<% 
If IsObject(TAG_objRS) Then 
Dim i : i = 0 
Do While Not TAG_objRS.Eof %>

	<tr class="list_td" onmouseover=BgChange(this,"list_td_change") onmouseout=BgChange(this,"list_td")> 
		<td class="list_td_change"><%=i+1%></td>
		<td><%=TAG_objRS("USER_ACCOUNT")%></td>
		<td class="list_td_change"><%=TAG_objRS("USER_REALNAME")%></td>
		<td><%=TAG_objRS("USER_CLASS")%></td>
		<td><%=TAG_objRS("USER_WORK")%></td>
		<td><%=TAG_objRS("USER_LOGIN_COUNT")%></td>
		<td><%=TAG_objRS("USER_LAST_TIME")%></td>
		<td class="list_td_change"><img src="../images/Ico/User_info.gif" style="cursor:hand;" onclick="window.open('../address/address_userinfo_pop.asp?intUserId=<%=TAG_objRS("USER_ID")%>','','left=5,top=5,width=450,height=410,scrollbars=yes,status=yes');" alt="查看用户信息" border="0" align="absmiddle" valign="middle"></td>
	</tr>
	
<% 
	i = i + 1 
	If i >= TAG_intPerPage Then  Exit Do 
	TAG_objRS.MoveNext
Loop
If IsObject(TAG_objRS) Then

	TAG_objRS.Close() 
	Set TAG_objRS = Nothing 
End If
End If
%>	
<input type="hidden" name="intPageNow" value="<%=TAG_intPageNow%>"  />

	<tr  class="list_title_tr"> 
		<td colspan=9><%=TAG_strPageNav%></td>
	</tr>
</tbody>
</table>

<!-- ##### 主栏目结束 ##### -->   
<!-- #include file="page_sub_footer.html.asp" -->