community_free_view.asp

泡泡堂服务端内有建站说明,喜欢玩泡泡堂的朋友下载开发.

<%menutype = "community"%>

<!-- #include virtual = /common/top.asp -->

<%menu_down1 = "yes"%>
<%menu_down1_4 = "yes"%>

<!-- #include virtual = /community/community_menu.asp -->

<table width="100%" border="0" cellspacing="0" cellpadding="0" background="/community/images/bg_subbody.gif" height="100%">
	<tr> 
	  <td> 
		<div align="center"><img src="images/community_title_board_free.gif"></div>
	  </td>
	</tr>
	<tr> 
	  <td valign="top"> 

<!-- #include virtual="/common/BombConnDB.asp" -->
<!-- #include virtual="/common/SiteUtils.asp" -->

<%
		index = request("index")
		page = request("page")
		stype = request("stype")
		searchstr = request("searchstr")

		sql = "SELECT date, readNum, title, name, comment FROM FreeBBS "
		sql = sql & " WHERE idx = " & index & " "
		set rs = DbCon.Execute (sql)

		if not rs.EOF then
			sql = "UPDATE FreeBBS SET readNum=readNum+1 WHERE idx=" & index
			DBCon.Execute (sql)
			name = trim(rs("name"))
			if name = "包府磊" or name = "nako" then name = "<a href=mailto:[e-mail]><img src=/common/images/bomi.gif border=0></a>"
			text = trim(rs("comment"))
			text = replace(text, CRLF, "<br>")
			text = replace(text,"''","'")
			text = replace(text,"&amp;","&")
			text = replace(text,"&lt;","<")
			text = replace(text,"&gt;",">")	
			text = replace(text,"&nbsp;"," ")	
%>

			<script language=javascript>
			function action (mode)
			{
				if (mode == "modify" || mode == "delete")
				{
					document.board.mode.value = mode;
					if (mode=='delete')
					{
						if (confirm ("昏力 窍矫摆嚼聪鳖?"))
						{
							document.board.action = "community_free_write.asp";
						}
						else
						{
							return;
						}
					}
					document.board.submit ();
				}
			}
			</script>

				  <table width="550" border="0" cellspacing="0" cellpadding="0" align="center">
                    <tr> 
                      <td>&nbsp;</td>
                    </tr>
                    <tr> 
                      <td> 
                        <div align="right" class="boardtext01"><%=rs("date")%>, 炼雀:<%=rs("readNum")%></div>
                      </td>
                    </tr>
                    <tr> 
                      <td> 
                        <table width="550" border="0" cellspacing="0" cellpadding="3" class="boardtext_title" >
                          <tr> 
                            <td height="4" bgcolor="#D0D0D0" colspan="3"></td>
                          </tr>
                          <tr bgcolor="#4780A3"> 
                            <td height="26" width="13" class="boardtext_title"><img src="/community/images/title_icon.gif" width="13" height="13"></td>
                            <td height="26" width="422" class="boardtext_title" valign="bottom"><%=rs("title")%></td>
                            <td height="26" class="boardtext_title" width="97" valign="bottom"> 
                              <div align="right"><%=name%></div>
                            </td>
                          </tr>
                          <tr> 
                            <td bgcolor="#D0D0D0" colspan="3" height="3"></td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                    <tr> 
                      <td height="300" valign="top" class="boardtext03">
                        <table width="96%" border="0" cellspacing="0" cellpadding="5" align="center" class="boardtext03">
                          <tr> 
                            <td><%=text%></td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                    <tr> 
                      <td height="1" bgcolor="#9A9A9A"></td>
                    </tr>
                    <tr> 
                      <td><br> 
                        <table width="96%" border="0" cellspacing="0" cellpadding="0" align="center">
                          <tr> 
                            <td> 
                              <div align="right"><a href="community_free.asp?index=<%=index%>&page=<%=page%>&stype=<%=stype%>&searchstr=<%=searchstr%>"><img src="/community/images/list.gif" width="51" height="20" border="0"></a></div>
                            </td>
                            <td width="436" valign="bottom"> 
                              <div align="center"></div>
                            </td>
						<form name=board method=post action="community_free_modify.asp">
						<input type=hidden name=mode value="">
						<input type=hidden name=index value="<%=index%>">
                            <td><a href="community_free_modify.asp?mode=reply&index=<%=index%>"><img src="/community/images/reply.gif" width="51" height="20" border="0"></a></td>
                            <td width="10">&nbsp;</td>
                            <td><a href="javascript:action('modify')"><img src="/community/images/modify.gif" width="51" height="20" border=0></a></td>
                            <td width="10">&nbsp;</td>
                            <td><a href="javascript:action('delete')"><img src="/community/images/delete.gif" width="51" height="20" border=0></a></td>
                            <td width="10">&nbsp;</td>
                            <td><a href="community_free_modify.asp?mode=insert"><img src="/community/images/write.gif" width="51" height="20" border="0"></a></td>
						</form>
                          </tr>
                        </table>
                      </td>
                    </tr>
                  </table>
<%
		else
%>
			<script language="javascript">
			<!--
				alert("臂捞 绝嚼聪促.");
				location.href = "community_free.asp";
			//-->
			</script>
<%
		end if
%>	  
	  </td>
	</tr>
  </table>

<!-- #include virtual = /common/bottom.asp -->