📄 index.asp
字号:
<%
Function bschg(content) '//大小写转换
content=Replace(content,"<","<" )
bschg=Replace(content,">",">" )
End Function
Function conn() '''''定义连接函数'''''''''''
dim dbpath
set conn=server.createobject("adodb.connection")
DBPath =Server.MapPath("databases\databases.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
End function
%>
<%
call conn()
name=request("name")
content=request("content")
qq=request("qq")
email=request("email")
address=request("address")
homepage=request("homepage")
if content<>"" then
content=Replace(content,"<","<" )
content=Replace(content,">",">" )
set rss= server.CreateObject("adodb.recordset")
rss.open "select * from index",conn,1,3
rss.addnew
rss("content")=left(content,50)
rss("data")=now
rss("name")=name
rss("qq")=qq
rss("email")=email
rss("homepage")=homepage
rss("address")=address
rss.update
response.Buffer
'window.open('.asp','_self')
rss.close
set rss=nothing
end if
if request("action")="del" and request("id")<>"" then
set del=server.CreateObject("adodb.recordset")
sql="delete * from index where id="&request("id")
conn.execute(sql)
response.redirect"index.asp"
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0020)http://www.ao18.com/ -->
<HTML><HEAD><TITLE>浪狐网－☆星语心愿☆※</TITLE>
<META http-equiv=Content-Language content=zh-cn>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE type=text/css>BODY {
FONT-SIZE: 11px; COLOR: #666666; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif
}
TD {
FONT-SIZE: 11px; COLOR: #666666; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif
}
TH {
FONT-SIZE: 11px; COLOR: #666666; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif
}
BODY {
BACKGROUND-IMAGE: url(images/index_32.gif);
MARGIN: 0px;
background-color: #055786;
}
.bg {
BORDER-RIGHT: #cfedf7 1px solid; BORDER-TOP: #cfedf7 1px solid; FONT-SIZE: 12px; BORDER-LEFT: #cfedf7 1px solid; COLOR: #4b4b4b; BORDER-BOTTOM: #cfedf7 1px solid; BACKGROUND-REPEAT: no-repeat; BACKGROUND-COLOR: #f3fdff
}
.style13 {
COLOR: #ff0000
}
.distance {
LINE-HEIGHT: 20px
}
A:link {
COLOR: #333333; TEXT-DECORATION: none
}
A:visited {
COLOR: #333333; TEXT-DECORATION: none
}
A:hover {
COLOR: #ff6600; TEXT-DECORATION: none
}
A:active {
COLOR: #ff6600; TEXT-DECORATION: none
}
.style14 {
COLOR: #378cb5
}
.itable {
TABLE-LAYOUT: fixed; BACKGROUND-POSITION: 50% top; WORD-BREAK: break-all; WORD-WRAP: break-word
}
.style15 {
FONT-SIZE: 24px
}
</STYLE>
<SCRIPT language=JavaScript type=text/JavaScript>
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</SCRIPT>
<SCRIPT language=javascript>
<!--
function check(){
if(document.form1.name.value.length<1){
alert("你不留下你的名字，不会有人约的哟！^_^");
document.form1.name.focus();
return false;
}else if(document.form1.content.value.length<1){
alert("你不想有人约你嘛！？^_^");
document.form1.content.focus();
return false;
}else if(document.form1.content.value.length>300){
document.form1.content.focus();
alert("你的愿望太长啦，情人记不住的！^_^");
return false;
}else if(document.form1.qq.value=="") {
alert("不留你的QQ,有人约你怎么联系你啊！！^_^");
document.form1.qq.focus();
return false;
}else if(isNaN(document.form1.qq.value)) {
alert("不是吧，你的QQ不是数字节！！^_^");
document.form1.qq.focus();
return false;
} else{
return true;
}
}
-->
</SCRIPT>
<SCRIPT language=JavaScript>
<!--
function test(){
if (document.form2.page.value=="" || isNaN(document.form2.page.value)) {
alert("输入页数必须为数值型");
document.form2.page.focus();
return false;
}
return true;
}
function MM_displayStatusMsg(msgStr) { //v1.0
status=msgStr;
document.MM_returnValue = true;
}
//-->
</SCRIPT>
<BGSOUND src="images/zqyy.wma" loop=infinite>
<META content="MSHTML 6.00.2900.2668" name=GENERATOR>
</HEAD>
<BODY
onload="MM_displayStatusMsg('顺祝每一位朋友天天快乐!);return document.MM_returnValue">
<TR>
<TD>
<TABLE height=250 width=1002 border=0>
<TBODY>
<TR>
<TD background=images/a011.jpg>
<DIV id=Layer1
style="Z-INDEX: 1; LEFT: 141px; VISIBILITY: visible; WIDTH: 769px; POSITION: absolute; TOP: 14px; HEIGHT: 198px">
<OBJECT
codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0
height=200 width=761 align=right
classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000><PARAM NAME="movie" VALUE="images/snow.swf"><PARAM NAME="quality" VALUE="high"><PARAM NAME="wmode" VALUE="transparent">
<embed
src="images/snow.swf" quality="high"
pluginspage="http://www.macromedia.com/go/getflashplayer"
type="application/x-shockwave-flash" width="761" height="200"
wmode="transparent"></embed>
</OBJECT></DIV>
</TD></TR>
</TBODY></TABLE>
</TD></TR>
</TBODY></TABLE>
<DIV align=center>
<TABLE cellSpacing=0 cellPadding=0 width=776 border=0>
<TBODY>
<TR>
<TD width=251><IMG height=121 src="images/zq_1.gif" width=251></TD>
<TD width=284><IMG height=121 src="images/zq_2.gif" width=284></TD>
<TD width=235><IMG height=121 src="images/zq_3.gif"
width=241></TD></TR>
</TBODY></TABLE></DIV>
<DIV align=center></DIV>
<TABLE cellSpacing=0 cellPadding=0 width=776 align=center
background=images/index_33.gif border=0>
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<TBODY>
<TR>
<TD width=6></TD>
<TD vAlign=top>
<TABLE cellSpacing=0 cellPadding=0 width=192
background=images/index_25.gif border=0>
<TBODY>
<TR>
<TD><IMG id=index_07 height=13 alt=""
src="images/index_07.gif" width=192>
</TD>
</TR>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -