📄 top_write.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<%
if session("username")="" then
response.redirect "login.asp"
end if
set rs=server.CreateObject ("ADODB.Recordset")
rs.open "select * from admin where userid="&session("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">
<META http-equiv=robots content=all><LINK href="images/styles.css"
type=text/css rel=stylesheet>
<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 align=center border=0>
<TBODY>
<TR>
<TD>
<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> </TD>
<TD width="68%" height=2><IMG height=47 src="images/diary_title.jpg"
width=171></TD>
<TD width="29%" height=2> </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=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>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -