📄 write.asp
字号:
AddText(AddTxt);
AddTxt="[/move]";
AddText(AddTxt);
}
}
}
function shadow() {
if (helpstat) {
alert("阴影标记\n使文字产生阴影效果.\n用法: [SHADOW=宽度, 颜色, 边界]要产生阴影效果的文字[/SHADOW]");
} else if (basic) {
AddTxt="[SHADOW=255,blue,1][/SHADOW]";
AddText(AddTxt);
} else {
txt2=prompt("文字的长度、颜色和边界大小","255,blue,1");
if (txt2!=null) {
txt=prompt("要产生阴影效果的文字","文字");
if (txt!=null) {
if (txt2=="") {
AddTxt="[SHADOW=255, blue, 1]"+txt;
AddText(AddTxt);
AddTxt="[/SHADOW]";
AddText(AddTxt);
} else {
AddTxt="[SHADOW="+txt2+"]"+txt;
AddText(AddTxt);
AddTxt="[/SHADOW]";
AddText(AddTxt);
}
}
}
}
}
function glow() {
if (helpstat) {
alert("光晕标记\n使文字产生光晕效果.\n用法: [GLOW=宽度, 颜色, 边界]要产生光晕效果的文字[/GLOW]");
} else if (basic) {
AddTxt="[glow=255,#003399,2][/glow]";
AddText(AddTxt);
} else {
txt2=prompt("文字的长度、颜色和边界大小","255,red,2");
if (txt2!=null) {
txt=prompt("要产生光晕效果的文字.","文字");
if (txt!=null) {
if (txt2=="") {
AddTxt="[glow=255,blue,2]"+txt;
AddText(AddTxt);
AddTxt="[/glow]";
AddText(AddTxt);
} else {
AddTxt="[glow="+txt2+"]"+txt;
AddText(AddTxt);
AddTxt="[/glow]";
AddText(AddTxt);
}
}
}
}
}
function openscriphtml()
{
if (navigator.appName!="Microsoft Internet Explorer")
alert("此功能 Netscape 用户不能使用！")
else
{newwin=window.open('htmledit/editor.html','','width=544,height=294');
newwin.focus();
}
}
function runEx(){
//alert('请注意，按下确定将生成页面，按下后请稍后....');
var winEx = window.open("", "winEx", "width=300,height=200,status=yes,menubar=yes,scrollbars=yes,resizable=yes"); winEx.document.open("text/html", "replace");
winEx.document.write(unescape(event.srcElement.parentElement.children[2].value));
winEx.document.close();
}
function insertsmilie(smilieface){
document.frmadd.guestcontent.value+=smilieface;
}
function FrontPage_Form1_Validator(theForm)
{
if (theForm.name.value == "")
{
alert("请写上您的姓名!");
theForm.name.focus();
return (false);
}
if (theForm.title.value == "")
{
alert("请写上您的留言标题!");
theForm.title.focus();
return (false);
}
var checkOK = "0123456789abcdefghijklmnopqrstuvwxyz@._";
var checkStr = theForm.email.value;
var allValid = true;
var decPoints = 0;
var allNum = "";
for (i = 0; i < checkStr.length; i++)
{
ch = checkStr.charAt(i);
for (j = 0; j < checkOK.length; j++)
if (ch == checkOK.charAt(j))
break;
if (j == checkOK.length)
{
allValid = false;
break;
}
if (ch != ".")
allNum += ch;
}
if (!allValid)
{
alert("您的信箱地址中有非法字符!");
theForm.email.focus();
return (false);
}
if (theForm.email.value !== "")
{
var checkOK2 = theForm.email.value;
var checkStr2 = "@.";
var allValid2 = true;
var decPoints2 = 0;
var allNum2 = "";
for (i = 0; i < checkStr2.length; i++)
{
ch2 = checkStr2.charAt(i);
for (j = 0; j < checkOK2.length; j++)
if (ch2 == checkOK2.charAt(j))
break;
if (j == checkOK2.length)
{
allValid2 = false;
break;
}
if (ch2 != ".")
allNum2 += ch2;
}
if (!allValid2)
{
alert("您的信箱地址中缺少有效字符!");
theForm.email.focus();
return (false);
}
}
if (theForm.guestcontent.value == "")
{
alert("请写入您的留言!");
theForm.guestcontent.focus();
return (false);
}
return (true);
}
</script>
<BODY bgColor=#ffffff onkeydown="if(event.keyCode==13 && event.ctrlKey)frmadd.submit()" text=#000000>
<% header() %>
<FORM action=save.asp method=post name=frmadd onsubmit="return FrontPage_Form1_Validator(this)">
<TABLE width="661" align=center cellspacing="6" class="table002" height="435">
<TBODY>
<TR>
<TD align=middle colSpan=4 height=24 width="620">发表留言(有<FONT
color=#ff0000>*</FONT>号的必填)</TD>
</TR>
<TR>
<TD align=left height=25 width="154"> 姓名： </TD>
<TD height=25 colspan="3" width="481"> <INPUT maxLength=15 name=name size=15>
<FONT color=#ff0000> *</FONT> 请填写您发表留言的姓名 <FONT
color=#ff0000>*</FONT></TD>
</TR>
<TR>
<TD align=left height=25 width="154"> 性别：</TD>
<TD height=25 colspan="3" width="481"><select name="sex" id="sex">
<option value="帅哥" selected>帅哥</option>
<option value="美女">美女</option>
</select></TD>
</TR>
<TR>
<TD align=left height=25 width="154"> 来自：</TD>
<TD height=25 colspan="3" width="481"> <SELECT name=from size=1>
<OPTION
selected value=北京>北京</OPTION>
<OPTION value=上海>上海</OPTION>
<OPTION
value=天津>天津</OPTION>
<OPTION value=重庆>重庆</OPTION>
<OPTION
value=黑龙江>黑龙江</OPTION>
<OPTION value=吉林>吉林</OPTION>
<OPTION
value=辽宁>辽宁</OPTION>
<OPTION value=内蒙古>内蒙古</OPTION>
<OPTION
value=宁夏>宁夏</OPTION>
<OPTION value=新疆>新疆</OPTION>
<OPTION
value=河北>河北</OPTION>
<OPTION value=山西>山西</OPTION>
<OPTION
value=陕西>陕西</OPTION>
<OPTION value=山东>山东</OPTION>
<OPTION
value=河南>河南</OPTION>
<OPTION value=青海>青海</OPTION>
<OPTION
value=湖北>湖北</OPTION>
<OPTION value=湖南>湖南</OPTION>
<OPTION
value=安徽>安徽</OPTION>
<OPTION value=江苏>江苏</OPTION>
<OPTION
value=浙江>浙江</OPTION>
<OPTION value=江西>江西</OPTION>
<OPTION
value=福建>福建</OPTION>
<OPTION value=广东>广东</OPTION>
<OPTION
value=广西>广西</OPTION>
<OPTION value=云南>云南</OPTION>
<OPTION
value=贵州>贵州</OPTION>
<OPTION value=西藏>西藏</OPTION>
<OPTION
value=四川>四川</OPTION>
<OPTION value=甘肃>甘肃</OPTION>
<OPTION
value=海南>海南</OPTION>
<OPTION value=香港>香港</OPTION>
<OPTION
value=澳门>澳门</OPTION>
<OPTION value=台湾>台湾</OPTION>
<OPTION
value=其他地区>其他地区</OPTION>
</SELECT> </TD>
</TR>
<TR>
<TD align=left height=25 width="154"> E-mail地址：</TD>
<TD height=25 colspan="2" width="353"> <INPUT name=email size=30> </TD>
<TD height=91 rowspan="3" width="118" align="center"> <img id=face src="<%=face%>" alt="Head portrait">
<a href="allface.asp" target=_blank><br>
查看头像列表</a></TD>
</TR>
<TR>
<TD align=left height=25 width="154"> 主页地址： </TD>
<TD height=25 width="231"> <INPUT name=homepage size=30 value=http://>
</TD>
<TD width="112" height="25">头像 <select name="face" onChange="document.images['face'].src=options[selectedIndex].value;" class="box">
<% for i=1 to 36
Response.Write "<option "
facestr="face/" & i & ".gif"
if facestr= RS("M_Face") then Response.Write "SELECTED "
Response.Write "value='" & facestr &"'>头像" &i &"</option>"
next%>
</select></TD>
</TR>
<TR>
<TD align=left height=25 width="154"> Q Q：</TD>
<TD height=25 width="231"> <INPUT maxLength=13 name=oicq onKeypress="if (event.keyCode < 45 || event.keyCode > 57) event.returnValue = false;">
</TD>
<TD height=25 width="112">悄悄话
<select name="hide">
<option value="1">是</option>
<option value="0" selected>否</option>
</select></TD>
</TR>
<TR>
<TD align=left height=25> 留言标题：</TD>
<TD height=25 colspan="3"><input type="text" name="title" size="40"></TD>
</TR>
<TR>
<TD align=left height=25 width="154"><b>当前心情</b><br><li>将放在帖子的前面</TD>
<TD height=25 colspan="3" width="481">
<% for i=0 to 17 %>
<input type="radio" value="<%=(i)%>" name="em" <%if i=0 then response.write "checked"%>><img src="<%="title/face" &(i) & ".gif"%>" >
<%if i>0 and ((i+1) mod 9=0) then response.write "<br>"%>
<%next%>
</TD>
</TR>
<TR>
<TD width="154" height=1 align=left> 留言内容：<BR> <BR> </TD>
<TD height=1 colspan="3" width="481"> <TABLE cellPadding=0 cellSpacing=6 height=60 width="76%">
<TBODY>
<TR>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:bold()>粗体</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:italicize()>斜体</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:underline()>下划</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:center()>居中</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:hyperlink()>链接</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:mail()>邮件</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:image()>图片</A></TD>
</TR>
<TR>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:quote()>引用</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:list()>目录</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:setfly()>飞行</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:glow()>发光</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:move()>移动</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:shadow()>阴影</A></TD>
<TD align=middle class=table002 vAlign=bottom><A href=javascript:flash()>Flash</A></TD>
</TR>
</TBODY>
</TABLE>
<TEXTAREA class=testarea1 cols=60 name=guestcontent rows=5 wrap=VIRTUAL></TEXTAREA>
<FONT color=#ff0000> *</FONT> </TD>
</TR>
<TR>
<TD align=middle colSpan=4 height=37 width="620">点击表情图即可在贴子中加入相应的表情<BR>
<%
for i=1 to 31
response.write "<img src=em/em"&(i)&".gif border=0 onclick=""insertsmilie('[em"&i&"]')"" style=""CURSOR: hand""> "
next %> </TD>
</TR>
<TR>
<TD align=middle colSpan=4 height=27 width="620">
<INPUT name=Submit type=submit value=提交留言>
<INPUT name=Submit2 type=reset value=重新填写>
[ctrl+enter可直接提交]</TD>
</TR>
</TBODY>
</TABLE>
<BR><BR>
<DIV></DIV><BR>
</FORM>
<% footer()
rsclose()
connclose() %>
</BODY>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -