www.gusucode.com > CC校友录贴吧 CCBar源码程序asp编程 > template_c/page_meet_detail.html.asp
<!-- #include file="page_sub_header.html.asp" -->
<!-- #include file="page_meet_menu.html.asp" -->
<!-- ##### 主栏目开始 ##### --->
<%Call ActionView(CONST_ACTION_FUNC)%>
<script language="Javascript">
//搜索表单校验
function verify(theform)
{
<%=TAG_strVerifyCode%>
return true;
}
</script>
<tr width="100%">
<td align="center" >
<br><%
If IsObject(TAG_objDicUnit) AND TAG_objDicUnit.Exists("Exist") Then
%>
<!--html_row DataRS=TAG_objDicUnit-->
<table cellspacing="0" cellpadding="0" width="98%" align="center" border="0">
<tbody>
<tr>
<td>
<table cellspacing="0" cellpadding="0" width="98%" align="center" border="0">
<tr>
<td align="left" height="20">
<font face="黑体" size="3" color="red">《<u><%=TAG_objDicUnit.Item("MEET_TITLE")%></u>》</font></td>
<td align="right" height="20">
<a href="meet_detail.asp?intMeetId=<%=TAG_intLastId%>">【上一聚会】</a>
<a href="meet_detail.asp?intMeetId=<%=TAG_intNextId%>">【下一聚会】</a></td>
</tr>
</table></td>
</tr>
<tr>
<td background="../images/album/line2.gif">
<img height="2" src="../images/album/line2.gif" width="6"></td>
</tr>
<tr>
<td height="10" align="center" valign="middle"></td>
</tr>
<tr>
<td>
<table cellspacing="1" cellpadding="4" width="90%" class="list_table" border="0">
<tbody>
<tr valign="top" >
<td width="30%" class="list_td">聚会状态：</td>
<td width="70%" class="list_td" align="left"><%=GetMeetStatusLogic(TAG_objDicUnit.Item("MEET_STATUS"))%></td>
</tr>
<tr valign="top" >
<td class="list_td">发起时间：</td>
<td align="left" class="list_td"><%=TAG_objDicUnit.Item("MEET_ADD_TIME")%></td>
</tr>
<tr valign="top" >
<td class="list_td">聚会类型：</td>
<td class="list_td" align="left"><%=TAG_objDicUnit.Item("MEET_TYPE")%></td>
</tr>
<tr valign="top" >
<td class="list_td">聚会时间：</td>
<td class="list_td" align="left"><%=TAG_objDicUnit.Item("MEET_TIME")%></td>
</tr>
<tr valign="top" >
<td class="list_td">所在地区：</td>
<td align="left" class="list_td"><%=TAG_objDicUnit.Item("MEET_AREA")%></td>
</tr>
<tr valign="top" >
<td class="list_td">聚会地点：</td>
<td align="left" class="list_td"><%=TAG_objDicUnit.Item("MEET_SPOT")%></td>
</tr>
<tr valign="top" >
<td class="list_td">邀请人数：</td>
<td align="left" class="list_td"><%=TAG_objDicUnit.Item("MEET_PEOPLE_NUM")%></td>
</tr>
<tr valign="top" >
<td class="list_td">发起人：</td>
<td align="left" class="list_td"><%=TAG_objDicUnit.Item("USER_REALNAME")%> <img src="../images/Ico/User_info.gif" style="cursor:hand;" onclick="window.open('../address/address_userinfo_pop.asp?intUserId=<%=TAG_objDicUnit.Item("USER_ID")%>','','left=5,top=5,width=450,height=410,scrollbars=yes,status=yes');" alt="查看用户信息" border="0" align="absmiddle" valign="middle"></td>
</tr>
<tr valign="top" >
<td class="list_td">联系方式：</td>
<td align="left" class="list_td"><%=TAG_objDicUnit.Item("MEET_CONTACT")%></td>
</tr>
<tr valign="top" >
<td class="list_td">聚会费用：</td>
<td align="left" class="list_td"><%=TAG_objDicUnit.Item("MEET_SPEND")%></td>
</tr>
<tr valign="top" >
<td class="list_td">聚会内容：</td>
<td align="left" class="list_td"><%=TAG_objDicUnit.Item("MEET_INTRO")%></td>
</tr>
<tr valign="top" >
<td class="list_td">聚会备注：</td>
<td align="left" class="list_td"><%=TAG_objDicUnit.Item("MEET_OTHER")%></td>
</tr>
<tr valign="top" >
<td class="list_td">聚会总结：</td>
<td align="left" class="list_td"><%=TAG_objDicUnit.Item("MEET_SUM")%></td>
</tr>
</table>
</td>
</tr>
<tr>
<td align="left" height="20"> <br></td>
</tr>
<tr>
<td align="left" height="20"> 交流留言:</td>
</tr>
<tr>
<td background="../images/album/line2.gif">
<img height="2" src="../images/album/line2.gif" width="6"></td>
</tr>
<tr>
<td align="left" height="20"> <br></td>
</tr>
<%
If IsObject(TAG_objRS) Then
Dim i : i = 0
Do While Not TAG_objRS.Eof %>
<tr>
<td>
<table style='word-break:break-all;' cellspacing="1" cellpadding="2" width="90%" class="list_table" border="0" align="center">
<tbody>
<tr valign="top" class="even">
<td width="12%" class="list_td_change" align="left">姓名：</td>
<td width="55%" class="list_td_change" align="left"><%=TAG_objRS("USER_REALNAME")%></td>
<td width="*" class="list_td_change"><font color="#aaaaaa"><%=TAG_objRS("MEET_BBS_TIME")%></font></td>
</tr>
<tr valign="top" class="even">
<td width="15%" class="list_td" align="left">交流留言：</td>
<td width="*" class="list_td" colspan="2" align="left"><%=TAG_objRS("MEET_BBS_CONTENT")%></td>
</tr>
<tr valign="top" class="list_td" class="even">
<td width="*" class="list_td" colspan="3" align="right">
<a href="../sms/sms_add_form.asp?IncepterId=<%=TAG_objRS("USER_ID")%>&strIncepter=<%=TAG_objRS("USER_REALNAME")%>" title="给其发短信" >
<img src="../images/ico/user_sms.gif" alt="给<%=TAG_objRS("USER_REALNAME")%>发站内短信" border="0" align="absmiddle" valign="middle"></a><span 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') style="cursor:hand"><img src="../images/ico/user_info.gif" alt="查看<%=TAG_objRS("USER_REALNAME")%>的信息" border="0" align="absmiddle" valign="middle"></span> <font color="#aaaaaa">第<%=i+1%>楼 <a href=#top>[回页顶]</a></font><% If GBL_intUserId = TAG_objRS("USER_ID") Then%> <img src="../images/ico/img_del.gif" border="0" align="absmiddle"><a href="meet_bbs_del.asp?intMeetId=<%=TAG_objRS("MEET_BBS_MEET_ID")%>&intMeetBBSId=<%=TAG_objRS("MEET_BBS_ID")%>" onclick="return confirm('您确认删除?')">[删除]</a><% End If%></td>
</tr>
</table>
</td>
</tr>
<tr>
<td align="left" height="10"></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>
<td align="center" valign="top"><%=TAG_strPageNav%></td>
</tr>
<tr>
<td align="left" height="20"> <br></td>
</tr>
<tr>
<td>
<table border="0" cellpadding="3" cellspacing="1" align="center" width="80%" >
<form action="meet_bbs_save.asp" method="post" id="vbform" name="vbform" onsubmit="return verify(this);">
<tr >
<td colspan="2" valign="top">
<input type="hidden" name="intMeetId" value="<%=TAG_intMeetId%>" >
<textarea name="txtContent" style="display:none;"></textarea>
<iframe id="mEditor" src="../meditor/mEditor_1.html?lnk=txtContent&uploadpath=../upload/"" width="500" height="200" frameborder="0" scrolling="no"></iframe>
<span class="asterisk">*</span></td>
</tr>
<tr >
<td colspan="2" >
<input class="submit" type="submit" value="提交留言">
<input class="reset" type="reset" value="重 来"> </td>
</tr>
</form>
</table></td>
</tr>
</tbody>
</table>
</td> <!--/html_row-->
<%
If IsObject(TAG_objDicUnit) Then
Set TAG_objDicUnit = Nothing
End If
End If
%>
</tr>
</table>
<!-- ##### 主栏目结束 ##### -->
<!-- #include file="page_sub_footer.html.asp" -->