📄 main.asp
字号:
<!--#include file="in.inc" -->
<%
Set Cnn = Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("ADODB.recordset")
set rs1 = Server.CreateObject("ADODB.recordset")
StrCnn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("..\base\dumm.mdb")
Cnn.Open StrCnn
%>
<%
ne = request("move")
if ne= "next" then
session ("currentpage") = session ("currentpage")+1
ne = ""
end if
if ne = "prev" then
session ("currentpage") = session ("currentpage")-1
ne = ""
end if
if session ("currentpage") = "" then
session ("currentpage") = 1
end if
%>
<html>
<head>
<title>社区交友</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript">
<!--
function openChromeslessWindow(openUrl, winName, wWidth, wHeight, wPosx, wPosy, wTIT,
windowBORDERCOLOR, windowBORDERCOLORsel, windowTITBGCOLOR, windowTITBGCOLORsel,
bCenter, sFontFamily, sFontSize, sFontColor){
openchromeless(openUrl,winName, wWidth, wHeight, wPosx, wPosy, wTIT, wTIT ,
windowBORDERCOLOR, windowBORDERCOLORsel, windowTITBGCOLOR, windowTITBGCOLORsel,
bCenter, sFontFamily, sFontSize, sFontColor);
}
//-->
</script>
<link rel="stylesheet" href="../format.css" type="text/css">
<script id="chromeless" src="pz_chromeless_2.1.js"></script>
<script language="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>
</head>
<body bgcolor="#FFFFFF" text="#000000" background="../../images/beijing.gif">
<div id="Layer1" style="position:absolute; left:304px; top:191px; width:53px; height:40px; z-index:1; visibility: hidden">
<script>
var tc_user="cenozoic1";
var tc_class="15";
var tc_union="";
var tc_type="1";
</script>
<script src="http://stat.t2t2.com/stat.js"></script>
</div>
<img src="../images/tou.gif" width="550" height="100"> <br>
<table width="750" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td>
<table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr align="center">
<td width="12%" height="12">| <a href="../main.asp">中央广场</a> |</td>
<td width="12%" height="12">| <a href="#" onClick="openChromeslessWindow('../music/index.htm','diange',550,300,null,null,'点歌', '#000000', '#000000', '#CCCCCC', '#CCCCCC' ,true,'宋体', '1','#000000')">点歌祝福</a>
|</td>
<td width="12%" height="12">| <a href="#" onClick="openChromeslessWindow('../qq/index.htm','qq',350,200,null,null,'发送消息', '#000000', '#000000', '#CCCCCC', '#CCCCCC' ,true,'宋体', '1','#000000')">发送消息</a>
|</td>
<td width="12%" height="12">| 社区交友 |</td>
<td width="12%" height="12">| <a href="#" onClick="openChromeslessWindow('../poan/index.asp','poan',500,500,null,null,'请你破案', '#CCCCCC', '#CCCCCC', '#666666', '#666666' ,true,'宋体', '1','#000000')">请你破案</a>
|</td>
<td width="12%" height="12">| <a href="#" onClick="openChromeslessWindow('../game/index.htm','game',400,500,null,null,'在线游戏', '#000000', '#000000', '#CCCCCC', '#CCCCCC' ,true,'宋体', '1','#000000')">在线游戏</a>
|</td>
<td width="14%" height="12">| 知识问答 |</td>
<td width="14%" height="12">| <a href="#" onClick="openChromeslessWindow('../shop/index.asp','shop',350,260,null,null,'社区商店', '#000000', '#000000', '#CCCCCC', '#CCCCCC' ,true,'宋体', '2','#000000')">社区商店</a>
|</td>
</tr>
</table>
</td>
</tr>
<tr>
<td><b>当前位置：梦想世界->社区交友 </b><font color="#FF0000">离开社区，请点击<a href="../exit.asp">退出社区</a>！！！</font>
<a href="#" onClick="openChromeslessWindow('../guize.htm','guize',350,500,null,null,'社区规则', '#000000', '#000000', '#CCCCCC', '#CCCCCC' ,true,'宋体', '2','#000000')">社区规则</a>
<% rs1.open "select * from midi where 接收人 = '" & session ("name1") & "' and 查看 = 0 order by 时间 desc",cnn
if not rs1.eof then
%>
<bgsound src="..\music\ri.mid" loop="-1"><a href="javascript:location.reload()" onClick="openChromeslessWindow('../music/lision.asp','zhufu',350,200,null,null,'祝福', '#000000', '#000000', '#CCCCCC', '#CCCCCC' ,true,'宋体', '1','#000000')"><marquee width="200">有人给你点歌了！</marquee></a>
<%
end if
rs1.close %>
<% rs1.open "select * from qq where 接收人 = '" & session ("name1") & "' and 查看 = 0 order by 时间 desc",cnn
if not rs1.eof then
%>
<bgsound src="..\music\ri.mid" loop="-1"><a href="javascript:location.reload()"><marquee width="200" onClick="openChromeslessWindow('../qq/look.asp','look',350,200,null,null,'查看消息', '#000000', '#000000', '#CCCCCC', '#CCCCCC' ,true,'Arial, Helvetica, sans-serif', '1','#000000')">你有新消息！</marquee></a>
<%
end if
rs1.close %>
</td>
</tr>
<tr>
<td height="332" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="33%" valign="top">
<form name="form1" method="post" action="find.asp" target=_blank>
<table width="100%" border="1" cellspacing="0" cellpadding="0" bordercolorlight="#FFFFFF" bordercolordark="#990000">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="3">
<tr bgcolor="#00CCFF" align="center">
<td colspan="2"><b>查找朋友方式（每次查找须20C）</b></td>
</tr>
<tr align="center">
<td width="32%">指定方式</td>
<td width="68%">查找内容</td>
</tr>
<tr>
<td width="32%">
<input type="radio" name="t1" value="name1" checked>
昵称</td>
<td width="68%">
<input type="text" name="name1">
</td>
</tr>
<tr>
<td width="32%">
<input type="radio" name="t1" value="qq">
qq</td>
<td width="68%">
<input type="text" name="qq">
</td>
</tr>
<tr>
<td width="32%" height="22">
<input type="radio" name="t1" value="mail">
E-mail</td>
<td width="68%" height="22">
<input type="text" name="mail">
</td>
</tr>
<tr>
<td width="32%">
<input type="radio" name="t1" value="sex">
性别</td>
<td width="68%">
<select name="sex">
<option value="男">男</option>
<option value="女" selected>女</option>
</select>
</td>
</tr>
<tr>
<td width="32%">
<input type="radio" name="t1" value="old">
年龄</td>
<td width="68%">
<select name="old" size="1">
<option value=" "></option>
<option value="16">16以下</option>
<option value="17">17-22</option>
<option value="23">23-30</option>
<option value="31">30以上</option>
</select>
</td>
</tr>
<tr>
<td width="32%">
<input type="radio" name="t1" value="zone">
地区</td>
<td width="68%">
<select name="zone">
<option value=" " selected> </option>
<option value="北京">北京</option>
<option value="上海">上海</option>
<option value="天津">天津</option>
<option value="重庆">重庆</option>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -