📄 mydirlylook.asp
字号:
<%
if Request.Cookies("NC")="" or Request.Cookies("NC")="访客" then
Response.Write("对不起，您不是社区用户，请先注册！")
Response.End
end if%>
<!-- #include file="mydirdlysetup.asp" -->
<%
username=Request.Cookies("NC")
%>
<script>function checkclick(msg){if(confirm(msg)){event.returnValue=true;}else{event.returnValue=false;}}</script>
<title>察看日记</title>
<script language=JavaScript>
var currentpos,timer;
function initialize()
{
timer=setInterval("scrollwindow()",10);
}
function sc()
{
clearInterval(timer);
}
function scrollwindow()
{
currentpos=document.body.scrollTop;
window.scroll(0,++currentpos);
if (currentpos != document.body.scrollTop)
sc();
}
document.onmousedown=sc
document.ondblclick=initialize
</script>
<style>TABLE{BORDER-TOP:0px;BORDER-LEFT:0px;BORDER-BOTTOM:1px}TD{BORDER-RIGHT:0px;BORDER-TOP:0px}</style>
</head>
<body background="../images/bg.gif">
<div align="center">
<center>
<table width="700" border="0" cellspacing="0" cellpadding="0" height="352" style="border-collapse: collapse" bordercolor="#111111">
<tr valign="top" align="center">
<td colspan="2"><br><br>
<%
menu=request("menu")
if menu="" then
menu="alladd"
end if
select case menu
case "looklinkadd"
succtitle="详细信息"
looklinkadd
end select
sub looklinkadd
%>
<fieldset style="WIDTH: 650">
<legend>欢 迎 您 <%=username%></legend>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3">
<tr>
<td width="2%">
<center>
<table cellspacing=0 cellpadding=0>
</table>
</center>
</td>
<td width="98%" align="right" valign="top">
<div align="left">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="98%" id="AutoNumber2">
<tr>
<td width="100%"><br>文章文字颜色：（直接从下面的颜色表中单击选择） <BR><script language="JavaScript">
<!--
// Copyright (c) 1996-1997 Tomer Shiran. All rights reserved.
// Permission scripts can be found at http://www.geocities.com/~yehuda/
// create 6-element array
var hex = new Array(6)
// assign non-dithered descriptors
hex[0] = "FF"
hex[1] = "CC"
hex[2] = "99"
hex[3] = "66"
hex[4] = "33"
hex[5] = "00"
// accept triplet string and display as background color
function display(triplet) {
// set color as background color
document.fgColor = '#' + triplet
// display the color hexadecimal triplet
}
// draw a single table cell based on all descriptors
function drawCell(red, green, blue) {
// open cell with specified hexadecimal triplet background color
document.write('<TD BGCOLOR="#' + red + green + blue + '">')
// open a hypertext link with javascript: scheme to call display function
document.write('<A HREF="javascript:display(\'' + (red + green + blue) + '\')">')
// print transparent image (use any height and width)
document.write('<IMG SRC="place.gif" BORDER=0 HEIGHT=12 WIDTH=12>')
// close link tag
document.write('</A>')
// close table cell
document.write('</TD>')
}
// draw table row based on red and blue descriptors
function drawRow(red, blue) {
// open table row
document.write('<TR>')
// loop through all non-dithered color descripters as green hex
for (var i = 0; i < 6; ++i) {
drawCell(red, hex[i], blue)
}
// close current table row
document.write('</TR>')
}
// draw table for one of six color cube panels
function drawTable(blue) {
// open table (one of six cube panels)
document.write('<TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0>')
// loop through all non-dithered color descripters as red hex
for (var i = 0; i < 6; ++i) {
drawRow(hex[i], blue)
}
// close current table
document.write('</TABLE>')
}
// draw all cube panels inside table cells
function drawCube() {
// open table
document.write('<TABLE CELLPADDING=5 CELLSPACING=0 BORDER=1><TR>')
// loop through all non-dithered color descripters as blue hex
for (var i = 0; i < 6; ++i) {
// open table cell with white background color
document.write('<TD BGCOLOR="#FFFFFF">')
// call function to create cube panel with hex[i] blue hex
drawTable(hex[i])
// close current table cell
document.write('</TD>')
}
// close table row and table
document.write('</TR></TABLE>')
}
// call function to begin execution
drawCube()
// -->
</script>
</td>
</tr>
<tr>
<td width="100%" style="FONT-SIZE: 9pt">选择背景图片:<SELECT onChange="document.body.style.background=this.options[this.selectedIndex].value">
<OPTION VALUE="" SELECTED>选择背景
<OPTION VALUE="url('../images/bg.gif')">不要图案
<OPTION VALUE="url('images/dirly/bg1.gif')"> 图案 1
<OPTION VALUE="url('images/dirly/bg2.gif')"> 图案 2
<OPTION VALUE="url('images/dirly/bg3.gif')"> 图案 3
<OPTION VALUE="url('images/dirly/bg4.gif')"> 图案 4
<OPTION VALUE="url('images/dirly/bg5.gif')"> 图案 5
<OPTION VALUE="url('images/dirly/bg6.gif')"> 图案 6
<OPTION VALUE="url('images/dirly/bg7.gif')"> 图案 7
<OPTION VALUE="url('images/dirly/bg8.gif')"> 图案 8
<OPTION VALUE="url('images/dirly/bg9.gif')"> 图案 9
<OPTION VALUE="url('images/dirly/bg10.gif')"> 图案 10
<OPTION VALUE="url('images/dirly/bg11.gif')"> 图案 11
<OPTION VALUE="url('images/dirly/bg12.gif')"> 图案 12
<OPTION VALUE="url('images/dirly/bg13.gif')"> 图案 13
<OPTION VALUE="url('images/dirly/bg14.gif')"> 图案 14
<OPTION VALUE="url('images/dirly/bg15.gif')"> 图案 15
<OPTION VALUE="url('images/dirly/bg16.gif')"> 图案 16
<OPTION VALUE="url('images/dirly/bg17.gif')"> 图案 17
<OPTION VALUE="url('images/dirly/bg18.gif')"> 图案 18
<OPTION VALUE="url('images/dirly/bg19.gif')"> 图案 19
<OPTION VALUE="url('images/dirly/bg20.gif')"> 图案 20
</SELECTED><BR>
</select></td>
</tr>
<tr>
<td width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="AutoNumber1" height="94">
<tr>
<%
rs.Open "select * from mydirly where username='"&username&"' and fileboxid="&request("id")&" and id="&request("dirlyid")&"",Conn,1,3
if rs.eof then
Response.Write "<font color='#00FF00'>SORRY！找不到指定的日记!</font>"
end if
while not rs.eof
%>
<tr>
<td width="100%" bgcolor="#000000" height="22"style="FONT-SIZE: 9pt"><font color="#FFFF00"> 标题：</font><font color="#FFFFFF"><%=rs("link")%> </font></td>
</tr>
<tr>
<td width="100%" bgcolor="#000000" height="16"style="FONT-SIZE: 9pt; FILTER: alpha(opacity=65,style=0)"><font color="#00FF00">
</font><font color="#FFFFFF">内容如下：</font><font color="#00FF00">(若看不清，可随时改变文章文字颜色)</font></td>
</tr>
<tr>
<td width="100%" height="1"></td>
</tr>
<tr>
<td width="100%" height="32" colspan="3" style=WIDTH:580;WORD-WRAP:break-word><span id=yu>
<br><font style="font-size:14px"><%=rs("beizu")%></font></span></td>
</tr>
</table>
</center>
</div>
<%
rs.movenext
wend
rs.close
%></td>
</tr>
</table>
</div>
</td>
</tr>
</table>
<p><br>
</p>
</fieldset>
<%
end sub
%>
<br><br>
</td>
</tr>
</table>
</center>
</div>
<%
htmlend
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -