?? wenzhangxs.asp
字號:
<%@ Language=VBScript %>
<!-- #include file="../ADOVBS.INc" -->
<%
set conn=server.createobject("adodb.connection")
conn.open Application("DBCon_ConnectionString")
set rs=server.createobject("adodb.recordset")
rs.LockType=adLockOptimistic
id=request("id")
if id=0 then
sqlstr="select top 1 * from loveshenghuo order by id desc"
rs.open sqlstr,conn
id=rs("id")
'response.write id
'response.end
rs.close
set conn=nothing
end if
set conn=server.createobject("adodb.connection")
conn.open Application("DBCon_ConnectionString")
set rs=server.createobject("adodb.recordset")
rs.LockType=adLockOptimistic
sqlstr="select * from loveshenghuo where id='"& id &"'"
rs.open sqlstr,conn
rs("cishu")=rs("cishu")+1
bm=rs("bm")
rs.update
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<style type="text/css">
<!--
.botton { font-size: 12px; color: #000000; background-color: #FFFFF8}
.title { color: #006600; font-size: 14px; font-weight: bold; cursor: hand; line-height: 18px}
.red { color: #990066}
.green { color: #006600}
.white { color: #FFFFFF}
.black { color: #000000}
.block { font-size: 14px; line-height: 17px; text-align: justify}
-->
</style>
<link rel="stylesheet" href="3508.css">
</HEAD>
<BODY bgcolor="#FFFFF8">
<table width="740" border="0" cellspacing="0" cellpadding="0" align="center" height="40">
<tr>
<td width="192" height="39" align="center" valign="bottom"><img src="../images/newzhao1zhao.gif" width="140" height="50"></td>
<td colspan="2" align="right" height="39" valign="bottom">
<table width="480" border="1" bordercolordark="#FFFFFF" bordercolorlight="#FFFFFF" bgcolor="#CCCCFF" cellpadding="0" cellspacing="0" height="22">
<tr align="center">
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="../html/navigator.asp" class="black">本站導(dǎo)航</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18">
<a href="../sh/search.asp" class="black">二手市場</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="../chat/default.asp" class="black">供求信息</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="../news/index.asp" class="black">精品生活</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18">
<a href="default.asp" class="black">我愛生活</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="../xhtj/index.asp" class="black">笑話天地</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="../diaocha1/diaocha1.asp" class="black">調(diào)查生活</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="../club/Default.asp" class="black">生活社區(qū)</a></td>
</tr>
</table>
</td>
</tr>
<tr>
<td colspan="3" height="1" bgcolor="006600"></td>
</tr>
</table>
<table width="740" border="0" cellspacing="0" cellpadding="0" align="center" height="18" bgcolor="#3399FF">
<tr>
<td width="320" valign="bottom"><span class="black">【本站導(dǎo)航】</span><a href="../default.asp">本站首頁</a>
>> <span class="red">我愛生活</span></td>
<td width="70">●<a href=default.asp?fenlei=1 class="white">人生感悟</a> </td>
<td width="70">●<a href=default.asp?fenlei=2 class="white">情感天地</a></td>
<td width="70">●<a href=default.asp?fenlei=3 class="white">故事天空</a></td>
<td width="70">●<a href=default.asp?fenlei=4 class="white">生活體驗</a></td>
<td width="70">●<a href=default.asp?fenlei=5 class="white">消費心得</a></td>
<td width="70">●<a href=default.asp?fenlei=6 class="white">道聽途說</a></td>
</tr>
<tr>
<td colspan="7" bgcolor="006600"></td>
</tr>
</table>
<table width="740" border="0" cellspacing="0" cellpadding="0" align="center">
<tr align="right">
<td height="37"><a href="fabiaowz.asp" target="_blank">我要發(fā)表文章</a> <span class="title"><span class="title"></span></span>
</td>
</tr>
</table>
<table width="580" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td colspan="3" height="1"></td>
</tr>
<tr align="center">
<td width="18%" class="title"> </td>
<td class="title" width="60%" bgcolor="#99CCCC"><%
if rs("biaoti")="" then
response.write "無題"
else
response.write rs("biaoti")
end if
%></td>
<td width="22%" class="title"> </td>
</tr>
<%
if not isnull(rs("fbiaoti")) then
%>
<tr>
<td height="25" colspan="2"> </td>
<td width="22%" nowrap height="25"><%=rs("fbiaoti")%></td>
</tr>
<%
end if
%>
</table>
<table width="600" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#FFFFFF" bordercolordark="#000000">
<tr valign="top">
<td bgcolor="#FFFFCC" height="127" class="block"><br>
<%=rs("text")%></td>
</tr>
</table>
<p> </p><table width="89%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td colspan="5" height="1" bgcolor="006600"></td>
</tr>
<tr>
<td width="27%" align="center">發(fā)表日期：<%=formatdatetime(rs("fbriqi"),1)%></td>
<%
zz=""
if rs("bm")<>"" then
zz=zz+" 作者："&rs("bm")
end if
%>
<td width="22%"><%=zz%></td>
<td width="23%">瀏覽次數(shù)：<%=rs("cishu")%></td>
<td width="19%" nowrap> <%
if not isnull(rs("zzxm")) then
response.write "轉(zhuǎn)載者："&rs("zzxm")
else
response.write " "
end if
%></td>
<td width="9%" nowrap><a href=mailto:<%=rs("mail")%>>聯(lián)系作者</a></td>
</tr>
</table>
<table border=0 align="center" width="427" height="33" cellpadding="0" cellspacing="0" >
<%
set conn=nothing
set conn=server.createobject("adodb.connection")
conn.open Application("DBCon_ConnectionString")
set rs=server.createobject("adodb.recordset")
rs.LockType=adLockOptimistic
sqlstr="select * from loveshenghuo where id<>'"& id &"'and bm='"& bm &"'"
rs.open sqlstr,conn
if not rs.eof then
%>
<tr>
<td height="33"> </td>
</tr>
<tr>
<td>〖該作者發(fā)表的其它文章〗</td>
</tr>
<tr>
<td height="1" bgcolor="FF0000"></td>
</tr>
<%
while not rs.eof
%>
<tr>
<td nowrap> <a href=wenzhangxs.asp?id=<%=rs("id")%>><%= rs("xm")%> </a></td>
</tr>
<%
rs.movenext
wend
set conn=nothing
end if
%>
<tr>
<td align="right">
<input type="button" name="Button" value="關(guān)閉窗口" onclick="window.close()" class="botton">
</td>
</tr>
</table>
<!-- #include file="../include/end.htm" -->
</BODY>
</HTML>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -