⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index.asp

📁 WEB2.0圈子交友平台,以用户影音创意和分享为主导, 为用户提供:圈子,个人空间,博客,话题,相册,分类信息,短信,交友等免费服务,致力打造中国第一套 WEB2.0交友系统开源网站.
💻 ASP
字号:
<!--#include file="../main.asp" -->
<!--#include file="../IsLogin.asp" -->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd">
<HTML xmlns="http://www.w3.org/1999/xhtml"><HEAD><TITLE>发送站内快速消息 - <%=citytitle%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content=follow,index name=robots>
<LINK href="<%=cityurl%>images/style.css" 
type=text/css rel=stylesheet>
<LINK href="<%=cityurl%>images/msg.css" type=text/css 
rel=stylesheet>
<SCRIPT language=JavaScript src="<%=cityurl%>images/main.js" type=text/JavaScript></SCRIPT>

<SCRIPT language=javascript src="<%=cityurl%>images/memu.js" type=text/JavaScript></SCRIPT>

<SCRIPT language=javascript src="<%=cityurl%>images/menu.js" type=text/JavaScript></SCRIPT>

<SCRIPT language=javascript src="<%=cityurl%>images/common.js" type=text/javascript></SCRIPT>
<STYLE>#flashcontent P {
	COLOR: #000
}
#foot {
	DISPLAY: block; MARGIN: 0px auto; WIDTH: 720px
}
</STYLE>
<SCRIPT language=JavaScript>
<!--
    

    function checkForm() {
        if(document.edit.title.value == "") {
		alert("标题不能为空,请重新输入!");
		edit.title.focus();
		return false;
	}

        
	if(document.edit.content.value == "") {
		alert("留言内容不能为空!");
		edit.content.focus();
		return false;
	}
	return true;
    }
    
    function textLimitCheck(thisArea, maxLength){
    if (thisArea.value.length > maxLength){
      alert(maxLength + ' 个字限制. \r超出的将自动去除.');
      thisArea.value = thisArea.value.substring(0, maxLength);
      thisArea.focus();
    }
    /*回写span的值,当前填写文字的数量*/
    messageCount.innerText = thisArea.value.length;
}

-->
</SCRIPT>
<META content="MSHTML 6.00.3790.0" name=GENERATOR></HEAD>
<BODY>
<DIV id=append_parent></DIV>
<DIV id=wrap>
<!--#include file="../top.asp" -->
<DIV class=main>
<!--#include file="../person/right.asp" -->
<DIV class=main-box-4>
<DIV class=box-top>
<DIV></DIV></DIV>
<DIV class=nav>我的位置:<A href="<%=cityurl%>">首页</A> &raquo; <A 
href="<%=cityurl%>person">个人中心</A> &raquo; <STRONG>发送站内短消息</STRONG></DIV>
<DIV class=box>
<TABLE class=title cellSpacing=0 cellPadding=0 width="100%" border=0>
  <TBODY>
  <TR>
    <TD class=title-l></TD>
    <TD>发送站内短消息</TD>
    <TD class=title-r></TD></TR></TBODY></TABLE>
	
<%if request("Cid")<>"" then%>
<TABLE width=760 
border=0 align="center" cellPadding=0 cellSpacing=0 bgColor=white class=border3>
  <FORM name=edit action=Cserver.asp method=post>
    <input type="hidden" name="Cuser" value="<%set rs=server.createobject("adodb.recordset")
sql="select * from "&WebSqlType&"_Cmember  where "&WebSqlType&"_Cid="&request("Cid")&""
rs.open sql,conn,1,1
do while not rs.eof%><%=trim(rs(""&WebSqlType&"_Cuserid"))%>,<%
rs.movenext
loop
rs.close%>5327">
  <TBODY>
  <TR>
    <TD width="5%"></TD>
    <TD colSpan=5 height=15></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD bgColor=#006699 colSpan=5 height=1></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD class=con3 align=left colSpan=3 
height=30>&nbsp;&nbsp;<B>发站内快速消息</B></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD bgColor=#006699 colSpan=5 height=1></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD class=a2 align=right width=159 height=30><B>标题*</B><BR>(不要超过20个汉字)</TD>
    <TD class=a2 align=middle width=12>&nbsp;</TD>
    <TD width=359 height=30><INPUT maxLength=40 size=50 name=title> </TD>
    <TD width=1 bgColor=#006699></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD class=a2 align=right width=159><B>内容*</B></TD>
    <TD class=a2 align=middle width=12>&nbsp;</TD>
    <TD width=359 height=30><FONT color=#666666>(限1-500个汉字)</FONT> 已输入<FONT 
      color=#cc0000><SPAN id=messageCount>0</SPAN></FONT>个字<BR><TEXTAREA name=book cols=50 rows=15 id="book" onKeyUp="textLimitCheck(this, 500);"></TEXTAREA> 
    </TD>
    <TD width=1 bgColor=#006699></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD class=a2 align=right width=159 height=30><B>链接地址</B><BR></TD>
    <TD class=a2 align=middle width=12>&nbsp;</TD>
    <TD width=359 height=30><INPUT name=web id="web" value="<%=usertwourl%>" size=50 maxLength=200> </TD>
    <TD width=1 bgColor=#006699></TD>
    <TD width="5%"></TD></TR>
  <TR align=middle>
    <TD width="5%"></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD></TD>
    <TD></TD>
    <TD class=a2 align=left height=72><INPUT onClick="return checkForm();" type=submit value=发消息 border=0 name=submit> 
    </TD>
    <TD width=1 bgColor=#006699></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD bgColor=#006699 colSpan=5 height=1></TD>
    <TD width="5%"></TD></TR></FORM>
  <TR height=20>
    <TD></TD></TR></TBODY></TABLE>
	<%else%>


<TABLE width=760 
border=0 align="center" cellPadding=0 cellSpacing=0 bgColor=white class=border3>
  <FORM name=edit action=server.asp method=post>
  <INPUT type=hidden value=<%=request("username")%> name=S_user>
  <TBODY>
  <TR>
    <TD width="5%"></TD>
    <TD colSpan=5 height=15></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD bgColor=#006699 colSpan=5 height=1></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD class=con3 align=left colSpan=3 
height=30>&nbsp;&nbsp;<B>发站内快速消息</B></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD bgColor=#006699 colSpan=5 height=1></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD class=a2 align=right width=159 height=30><B>标题*</B><BR>(不要超过20个汉字)</TD>
    <TD class=a2 align=middle width=12>&nbsp;</TD>
    <TD width=359 height=30><INPUT maxLength=40 size=50 name=title> </TD>
    <TD width=1 bgColor=#006699></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD class=a2 align=right width=159><B>内容*</B></TD>
    <TD class=a2 align=middle width=12>&nbsp;</TD>
    <TD width=359 height=30><FONT color=#666666>(限1-500个汉字)</FONT> 已输入<FONT 
      color=#cc0000><SPAN id=messageCount>0</SPAN></FONT>个字<BR><TEXTAREA name=book cols=50 rows=15 id="book" onKeyUp="textLimitCheck(this, 500);"></TEXTAREA> 
    </TD>
    <TD width=1 bgColor=#006699></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD class=a2 align=right width=159 height=30><B>链接地址</B><BR></TD>
    <TD class=a2 align=middle width=12>&nbsp;</TD>
    <TD width=359 height=30><INPUT name=web id="web" value="<%=usertwourl%>" size=50 maxLength=200> </TD>
    <TD width=1 bgColor=#006699></TD>
    <TD width="5%"></TD></TR>
  <TR align=middle>
    <TD width="5%"></TD>
    <TD width=1 bgColor=#006699></TD>
    <TD></TD>
    <TD></TD>
    <TD class=a2 align=left height=72><INPUT onClick="return checkForm();" type=submit value=发消息 border=0 name=submit> 
    </TD>
    <TD width=1 bgColor=#006699></TD>
    <TD width="5%"></TD></TR>
  <TR>
    <TD width="5%"></TD>
    <TD bgColor=#006699 colSpan=5 height=1></TD>
    <TD width="5%"></TD></TR></FORM>
  <TR height=20>
    <TD></TD></TR></TBODY></TABLE> 
	
	<%end if%>
<BR>
</DIV>
<DIV class=box-bot>
<DIV></DIV></DIV></DIV></DIV>
<DIV id=bot><!--#include file="../bottom.asp" --></DIV>
<DIV id=wrap-bot>
<DIV></DIV></DIV></DIV>
</BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -