⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 top.asp

📁 日记本(多用户版)V3.0 主要功能: 1、日记本基本功能:添加、修改日记等。 2、日记加密:当日记添加时
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<%
id=request("id")
if id="" then
userid=session("userid")
else

set rs=server.CreateObject ("ADODB.Recordset")
    rs.open "select * from diary where id="&id,conn,1,3
    userid=rs("userid")
    rs.close

end if
    
set rs=server.CreateObject ("ADODB.Recordset")
    rs.open "select * from admin where userid="&userid,conn,1,3
    dim k,t
  if rs("picshow")=0 then
  k=rs("pic")
  else
  
  randomize
  k=cint(rnd*41)
  if k=0 then 
    k=k+1
  end if
  
  end if
%>
<HTML><HEAD><TITLE><%=rs("nickname")%>的网络日记本</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="images/styles.css" type=text/css rel=stylesheet>
<STYLE type=text/css>A:hover {
	FONT-SIZE: 10.5pt; LINE-HEIGHT: 22pt; TEXT-DECORATION: underline
}
A {
	FONT-SIZE: 10.5pt; LINE-HEIGHT: 22pt; TEXT-DECORATION: none
}
P {
	FONT-SIZE: 10.5pt
}
TABLE {
	FONT-SIZE: 10.5pt; LINE-HEIGHT: 25pt
}
UL {
	FONT-SIZE: 10.5pt; TEXT-DECORATION: none
}
</STYLE>

<script language=javascript runat=server>
function vbunescape(s)
{return unescape(s);}
function vbescape(s)
{return escape(s);}
</script>

<META content="MSHTML 6.00.2800.1106" name=GENERATOR></HEAD>
<NOSCRIPT> <IFRAME SRC="*.html;*.htm;*.mht;*.txt"> </IFRAME> </NOSCRIPT>
<BODY leftMargin=0 background=images/bg.gif topMargin=0>
<TABLE cellSpacing=0 cellPadding=0 width=617 align=center border=0>
  <TBODY>
  <TR>
    <TD height=2><IMG height=8 src="images/top01.gif" 
  width=617></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=617 align=center bgColor=#ffffff 
border=0>
  <TBODY>
  <TR>
    <TD width="3%" height=2>&nbsp; </TD>
    <TD width="68%" height=2><IMG height=47 src="images/diary_title.jpg" 
      width=171></TD>
    <TD width="29%" height=2>&nbsp;</TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=617 align=center bgColor=#ffffff 
border=0>
  <TBODY>
  <TR>
    <TD>
      <DIV align=center><IMG height=204 src="pic/diy0<%=k%>.jpg" 
      width=609></DIV></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=617 height=18  align=center bgColor=#ffffff 
border=0>
  <TBODY>
  <TR>
    <TD><DIV align=center>
            <TABLE cellSpacing=0 cellPadding=0 width=609 height=18 align=center 
            bgColor=#636562 border=0>
              <TBODY>
              <TR>
                <TD width=319></TD>
                <TD width=290>
                  <DIV align=center><IMG height=16 src="images/top_words.gif" 
                  width=244></DIV></TD></TR></TBODY></TABLE>
</DIV></TD></TR></TBODY></TABLE>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -