📄 head.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<!--#include file="sql_in.asp"-->
<%
'=========================================================
' 随然日记本（多用户版） Version:3.0
' Date: 2004-11-15
' Script Written by 随然(dampure)
' 随然日记本演示地址：http://www.suiran.cn
'=========================================================
' Copyright (C) 2003,2004 真露无香. All rights reserved.
' Web: www.yongzi.com
' Diary:http://www.suiran.cn
'=========================================================
if copy<>1 then
session("admindiary")=""
response.redirect "index.asp"
end if
If request("user")<>"" then
username=trim(request("user"))
Elseif session("username")<>"" then
username=session("username")
Else
response.redirect "index.asp"
End If
set rs=server.createobject("adodb.recordset")
sql="select * from admin where user='"& username &"'"
rs.open sql,conn,1,1
if rs.eof then
%>
<script language=vbscript>
MsgBox "系统中没有该用户，请返回首页注册！"
location.href = "index.asp"
</script>
<%
response.end
end if
id=rs("userid")
rs.close
set rs2=server.createobject("adodb.recordset")
sql2="select * from admin where userid="&id
rs2.open sql2,conn,1,1
dim k,t
if rs2("picshow")=0 then
k=rs2("pic")
else
randomize
k=cint(rnd*41)
if k=0 then
k=k+1
end if
end if
%>
<HTML><HEAD><TITLE><%=rs2("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 {
FONT-SIZE: 10.5pt; LINE-HEIGHT: 16pt; TEXT-DECORATION: none
}
A:link { COLOR: #666666;text-decoration:none}
A:visited { COLOR: #666666;text-decoration:none}
A:hover {
FONT-SIZE: 10.5pt; LINE-HEIGHT: 16pt; TEXT-DECORATION: underline
}
P {
FONT-SIZE: 10.5pt
}
TABLE {
FONT-SIZE: 10.5pt; LINE-HEIGHT: 16pt
}
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 vAlign=top bgColor=#ffffff height=16>
<TABLE cellSpacing=0 cellPadding=0 width=617 border=0>
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width=609 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=609 align=center
bgColor=#ffffff border=0>
<TBODY>
<TR>
<TD bgColor=#f7f7f7>
<TABLE cellSpacing=0 cellPadding=2 width="100%" border=0>
<TBODY>
<TR bgColor=#ffffff>
<TD width="40%"><IMG height=47
src="images/diary_title.jpg" width=171></TD>
<TD vAlign=bottom width="30%">
<DIV align=right>名 称： </DIV></TD>
<TD vAlign=bottom width="30%"><FONT
color=#000000><B><FONT
color=#990000><%=rs2("title")%></FONT></B></FONT></TD></TR>
<TR>
<TD width="40%"> </TD>
<TD width="30%">
<DIV align=right><FONT color=#000000>作
者： </FONT></DIV></TD>
<TD width="30%"><A
href="http://www.yongzi.com" target="_blank"><FONT
color=#000000><%=rs2("nickname")%></FONT></A></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -