📄 edit.asp
字号:
txt=prompt("下划线文字.","文字");
if (txt!=null) {
AddTxt="[u]"+txt;
AddText(AddTxt);
AddTxt="[/u]";
AddText(AddTxt);
}
}
}
function setfly() {
if (helpstat){
alert("飞翔标记\n使文字飞行.\n用法: [fly]文字为这样文字[/fly]");
} else if (basic) {
AddTxt="[fly][/fly]";
AddText(AddTxt);
} else {
txt=prompt("飞翔文字","文字");
if (txt!=null) {
AddTxt="[fly]"+txt;
AddText(AddTxt);
AddTxt="[/fly]";
AddText(AddTxt);
}
}
}
function move() {
if (helpstat) {
alert("移动标记\n使文字产生移动效果.\n用法: [move]要产生移动效果的文字[/move]");
} else if (basic) {
AddTxt="[move][/move]";
AddText(AddTxt);
} else {
txt=prompt("要产生移动效果的文字","文字");
if (txt!=null) {
AddTxt="[move]"+txt;
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.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=manage.asp?style=edit method=post name=frmadd onsubmit="return FrontPage_Form1_Validator(this)">
<TABLE width="661" align=center cellspacing="6" class="table002">
<TR align="center">
<TD height=20 colspan="4" width="645">编辑留言</TD>
</TR>
<TR>
<TD align=left height=20 width="163"> 姓名： </TD>
<TD height=20 colspan="3" width="472"> <INPUT maxLength=15 name=name size=15 value=<%=rs("user")%>> <FONT color=#ff0000> *</FONT>
请填写您发表留言的姓名 <FONT
color=#ff0000>*</FONT></TD>
</TR>
<TR>
<TD align=left height=22 width="163"> 性别：</TD>
<TD height=22 colspan="3" width="472"><select name="sex" id="sex">
<option value="帅哥" <% if rs("sex")="帅哥" then Response.Write(" selected")%>>帅哥</option>
<option value="美女"<% if rs("sex")="美女" then Response.Write(" selected")%>>美女</option>
</select></TD>
</TR>
<TR>
<TD align=left height=22 width="163"> 来自：</TD>
<TD height=22 colspan="3" width="472"> <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=22 width="163"> E-mail地址：</TD>
<TD height=22 colspan="2" width="344"> <INPUT name=email size=30 value=<%=rs("mail")%>> </TD>
<TD width="118" height=68 rowspan="3" 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=23 width="163"> 主页地址： </TD>
<TD width="225" height=23> <INPUT name=homepage size=30 value=<%=rs("url")%>> </TD>
<TD width="109">头像 <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("Face") then Response.Write "SELECTED "
Response.Write "value='" & facestr &"'>头像" &i &"</option>"
next%>
</select></TD>
</TR>
<TR>
<TD align=left height=23 width="163"> Q Q： <input type="hidden" name="id" value="<%=Request.QueryString("id")%>"></TD>
<TD height=23 width="225"> <INPUT maxLength=13 name=oicq onKeypress="if (event.keyCode < 45 || event.keyCode > 57) event.returnValue = false;" value=<%=rs("qq")%>>
</TD>
<TD height=23 width="109">悄悄话
<select name="hide">
<option value="1" <% if rs("hide")=1 then Response.Write(" selected")%>>是</option>
<option value="0" <% if rs("hide")=0 then Response.Write(" selected")%>>否</option>
</select></TD>
</TR>
<TBODY>
<TR>
<TD align=left height=21 width="163"> 回复主题：</TD>
<TD height=21 colspan="3" width="472"> <input type="text" name="title" size="40" value="<%=rs("title")%>">
</TD>
</TR>
<TR>
<TD width="163" height=133 align=left> 回复内容：<BR> <BR> <ul>
<LI> HTML标签: 不允许
<LI> UBB标签: 允许
<LI> 贴图标签: 允许
<LI> Flash标签: 允许
<LI> 表情字符转换: 允许 </LI>
</ul></TD>
<TD height=133 colspan="3" width="472"> <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><%=rs("content")%></TEXTAREA>
<FONT color=#ff0000> </FONT></TD>
</TR>
<TR>
<TD align=middle colSpan=4 height=22 width="645">点击表情图即可在贴子中加入相应的表情<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=2 width="645">
<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 + -