📄 editor.asp
字号:
<html><head> <meta http-equiv='Content-Type' content='text/html; charset=gb2312'> <title>HTML在线编辑器</title> <link rel='STYLESHEET' type='text/css' href='Editor/editor.css'></head><body bgcolor='#FFFFFF' leftmargin='0' topmargin='0' onConTextMenu='event.returnValue=false;'> <table border='0' cellpadding='0' cellspacing='0' width='100%' height='100%' align='center'> <tr> <td valign='top'><div class='yToolbar'>
<div class='TBHandle'></div>
<div class='Btn' TITLE='显示文章标题等信息' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetArticleList','文章列表函数标签',1,'GetList',800,700)"><img class='Ico' src='editor/images/LabelIco\GetArticleList.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='显示图片文章' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetPicArticle','显示图片文章标签',1,'GetPic',700,500)"><img class='Ico' src='editor/images/LabelIco\GetPicArticle.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='显示幻灯片文章' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetSlidePicArticle','显示幻灯片文章标签',1,'GetSlide',700,500)"><img class='Ico' src='editor/images/LabelIco\GetSlidePicArticle.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='文章自定义列表' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_CustomListLabel.asp','CustomListLable','文章自定义列表标签',1,'GetArticleCustom',720,700)"><img class='Ico' src='editor/images/LabelIco\GetArticleCustom.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='显示软件标题' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetSoftList','下载列表函数标签',2,'GetList',800,700)"><img class='Ico' src='editor/images/LabelIco\GetSoftList.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='显示图片下载' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetPicSoft','显示图片下载标签',2,'GetPic',700,500)"><img class='Ico' src='editor/images/LabelIco\GetPicSoft.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='显示幻灯片下载' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetSlidePicSoft','显示幻灯片下载标签',2,'GetSlide',700,500)"><img class='Ico' src='editor/images/LabelIco\GetSlidePicSoft.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='下载自定义列表' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_CustomListLabel.asp','CustomListLable','下载自定义列表标签',2,'GetSoftCustom',720,700)"><img class='Ico' src='editor/images/LabelIco\GetSoftCustom.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='显示图片标题' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetPhotoList','图片列表函数标签',3,'GetList',800,700)"><img class='Ico' src='editor/images/LabelIco\GetPhotoList.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='显示图片' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetPicPhoto','显示图片图文标签',3,'GetPic',700,550)"><img class='Ico' src='editor/images/LabelIco\GetPicPhoto.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='显示图片幻灯片' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetSlidePicPhoto','显示幻灯片图片标签',3,'GetSlide',700,550)"><img class='Ico' src='editor/images/LabelIco\GetSlidePicPhoto.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='显示商品标题' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetProductList','商城列表函数标签',5,'GetList',800,750)"><img class='Ico' src='editor/images/LabelIco\GetProductList.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='显示商品图片' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetPicProduct','显示图片商城标签',5,'GetPic',700,600)"><img class='Ico' src='editor/images/LabelIco\GetPicProduct.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='显示商品幻灯片' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_label.asp','GetSlidePicProduct','显示幻灯片商城标签',5,'GetSlide',700,460)"><img class='Ico' src='editor/images/LabelIco\GetSlidePicProduct.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='商品自定义列表' LANGUAGE='javascript' onclick="SuperFunctionLabel('/Editor/editor_CustomListLabel.asp','CustomListLable','商城自定义列表标签',5,'GetProductCustom',720,700)"><img class='Ico' src='editor/images/LabelIco\GetProductCustom.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='网站logo' LANGUAGE='javascript' onclick="FunctionLabel('/Editor/Lable/PE_Logo.htm','240','140')"><img class='Ico' src='editor/images/LabelIco\PE_logo.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='网站banner' LANGUAGE='javascript' onclick="FunctionLabel('/Editor/Lable/PE_Banner.htm','240','140')"><img class='Ico' src='editor/images/LabelIco\PE_banner.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='弹出公告' LANGUAGE='javascript' onclick="FunctionLabel('/Editor/Lable/PE_AnnWin.htm','240','140')"><img class='Ico' src='editor/images/LabelIco\PE_PopAnnouce.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='公告' LANGUAGE='javascript' onclick="FunctionLabel('/Editor/Lable/PE_Annouce2.htm','240','210')"><img class='Ico' src='editor/images/LabelIco\PE_Annouce.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='友情' LANGUAGE='javascript' onclick="FunctionLabel('/Editor/Lable/PE_FSite2.htm','330','510')"><img class='Ico' src='editor/images/LabelIco\PE_FriendSite.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='调查' LANGUAGE='javascript' onclick="InsertLabel('ShowVote')"><img class='Ico' src='editor/images/LabelIco\PE_Vote.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='作者列表' LANGUAGE='javascript' onclick="FunctionLabel('/Editor/Lable/PE_Author_ShowList.htm','400','345')"><img class='Ico' src='editor/images/LabelIco\PE_Author.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='厂商列表' LANGUAGE='javascript' onclick="FunctionLabel('/Editor/Lable/PE_ProducerList.htm','400','450')"><img class='Ico' src='editor/images/LabelIco\PE_Producer.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='显示作品集排行' LANGUAGE='javascript' onclick="FunctionLabel('/Editor/Lable/PE_ShowBlogList.htm','400','400')"><img class='Ico' src='editor/images/LabelIco\PE_Blog.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='显示专题列表' LANGUAGE='javascript' onclick="FunctionLabel('/Editor/Lable/PE_ShowSpecialList.htm','320','300')"><img class='Ico' src='editor/images/LabelIco\PE_Special.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='显示注册用户' LANGUAGE='javascript' onclick="InsertLabel('ShowTopUser')"><img class='Ico' src='editor/images/LabelIco\PE_user.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='登录' LANGUAGE='javascript' onclick="InsertLabel('ShowAdminLogin')"><img class='Ico' src='editor/images/LabelIco\PE_AdminLogin.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='导航' LANGUAGE='javascript' onclick="InsertLabel('ShowPath')"><img class='Ico' src='editor/images/LabelIco\PE_Path.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='版权' LANGUAGE='javascript' onclick="InsertLabel('Copyright')"><img class='Ico' src='editor/images/LabelIco\PE_Copyright.gif' WIDTH='18' HEIGHT='18'></div>
</div>
<div class='yToolbar'>
<div class='TBHandle'></div>
<div class='Btn' TITLE='全部选择' LANGUAGE='javascript' onclick="format('selectall')"><img class='Ico' src='editor/images/selectall.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='删除' LANGUAGE='javascript' onclick="format('delete')"><img class='Ico' src='editor/images/delete.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='剪切' LANGUAGE='javascript' onclick="format('cut')"><img class='Ico' src='editor/images/cut.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='复制' LANGUAGE='javascript' onclick="format('copy')"><img class='Ico' src='editor/images/copy.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='粘贴' LANGUAGE='javascript' onclick="format('paste')"><img class='Ico' src='editor/images/paste.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='撤消' LANGUAGE='javascript' onclick="format('undo')"><img class='Ico' src='editor/images/undo.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='恢复' LANGUAGE='javascript' onclick="format('redo')"><img class='Ico' src='editor/images/redo.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='查找 / 替换' LANGUAGE='javascript' onclick="findstr()"><img class='Ico' src='editor/images/find.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='计算器' LANGUAGE='javascript' onclick="insert('calculator')"><img class='Ico' src='editor/images/calculator.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='打印' LANGUAGE='javascript' onclick="format('Print')"><img class='Ico' src='editor/images/print.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='查看帮助' LANGUAGE='javascript' onclick="insert('help')"><img class='Ico' src='editor/images/help.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='左对齐' LANGUAGE='javascript' onclick="format('justifyleft')"><img class='Ico' src='editor/images/aleft.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='居中' LANGUAGE='javascript' onclick="format('justifycenter')"><img class='Ico' src='editor/images/acenter.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='右对齐' LANGUAGE='javascript' onclick="format('justifyright')"><img class='Ico' src='editor/images/aright.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='两端对齐' LANGUAGE='javascript' onclick="format('JustifyFull')"><img class='Ico' src='editor/images/JustifyFull.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='绝对或相对位置' LANGUAGE='javascript' onclick="format('absolutePosition')"><img class='Ico' src='editor/images/abspos.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='图片左环绕' LANGUAGE='javascript' onclick="imgalign('left')"><img class='Ico' src='editor/images/imgleft.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='图片单行居中' LANGUAGE='javascript' onclick="imgalign('center')"><img class='Ico' src='editor/images/imgcenter.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='图片右环绕' LANGUAGE='javascript' onclick="imgalign('right')"><img class='Ico' src='editor/images/imgright.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='删除文字格式' LANGUAGE='javascript' onclick="format('RemoveFormat')"><img class='Ico' src='editor/images/clear.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='插入普通水平线' LANGUAGE='javascript' onclick="format('InsertHorizontalRule')"><img class='Ico' src='editor/images/line.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='插入特殊水平线' LANGUAGE='javascript' onclick="insert('hr')"><img class='Ico' src='editor/images/sline.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='插入当前日期' LANGUAGE='javascript' onclick="insert('nowdate')"><img class='Ico' src='editor/images/date.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='插入当前时间' LANGUAGE='javascript' onclick="insert('nowtime')"><img class='Ico' src='editor/images/time.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='插入特殊符号' LANGUAGE='javascript' onclick="Insertlr('editor_tsfh.asp',300,190,56610999.9999404)"><img class='Ico' src='editor/images/symbol.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='插入超级连接' LANGUAGE='javascript' onclick="insert('CreateLink')"><img class='Ico' src='editor/images/url.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='取消超级链接' LANGUAGE='javascript' onclick="format('unLink')"><img class='Ico' src='editor/images/nourl.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='插入换行符号' LANGUAGE='javascript' onclick="insert('br')"><img class='Ico' src='editor/images/chars.gif' WIDTH='18' HEIGHT='18'></div>
</div>
<div class='yToolbar'>
<div class='TBHandle'></div>
<select ID="formatSelect" class="TBGen" onchange="format('FormatBlock',this[this.selectedIndex].value);this.selectedIndex=0"> <option selected>段落格式</option> <option VALUE="<P>">普通</option> <option VALUE="<PRE>">已编排格式</option> <option VALUE="<H1>">标题一</option> <option VALUE="<H2>">标题二</option> <option VALUE="<H3>">标题三</option> <option VALUE="<H4>">标题四</option> <option VALUE="<H5>">标题五</option> <option VALUE="<H6>">标题六</option> <option VALUE="<H7>">标题七</option></select><select id="FontName" class="TBGen" onchange="format('fontname',this[this.selectedIndex].value);this.selectedIndex=0"> <option selected>字体</option> <option value="宋体">宋体</option> <option value="黑体">黑体</option> <option value="楷体_GB2312">楷体</option> <option value="仿宋_GB2312">仿宋</option> <option value="隶书">隶书</option> <option value="幼圆">幼圆</option> <option value="Arial">Arial</option> <option value="Arial Black">Arial Black</option> <option value="Arial Narrow">Arial Narrow</option> <option value="Brush ScriptMT">Brush Script MT</option> <option value="Century Gothic">Century Gothic</option> <option value="Comic Sans MS">Comic Sans MS</option> <option value="Courier">Courier</option> <option value="Courier New">Courier New</option> <option value="MS Sans Serif">MS Sans Serif</option> <option value="Script">Script</option> <option value="System">System</option> <option value="Times New Roman">Times New Roman</option> <option value="Verdana">Verdana</option> <option value="WideLatin">Wide Latin</option> <option value="Wingdings">Wingdings</option></select><select id="FontSize" class="TBGen" onchange="format('fontsize',this[this.selectedIndex].value);this.selectedIndex=0"> <option selected>字号</option> <option value="7">一号</option> <option value="6">二号</option> <option value="5">三号</option> <option value="4">四号</option> <option value="3">五号</option> <option value="2">六号</option> <option value="1">七号</option></select> <div class='TBSep'></div>
<div class='Btn' TITLE='字体颜色' LANGUAGE='javascript' onclick="insert('fgcolor')"><img class='Ico' src='editor/images/fgcolor.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='文字背景色' LANGUAGE='javascript' onclick="insert('fgbgcolor')"><img class='Ico' src='editor/images/fgbgcolor.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='加粗' LANGUAGE='javascript' onclick="format('bold')"><img class='Ico' src='editor/images/bold.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='斜体' LANGUAGE='javascript' onclick="format('italic')"><img class='Ico' src='editor/images/italic.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='下划线' LANGUAGE='javascript' onclick="format('underline')"><img class='Ico' src='editor/images/underline.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='删除线' LANGUAGE='javascript' onclick="format('StrikeThrough')"><img class='Ico' src='editor/images/strikethrough.gif' WIDTH='18' HEIGHT='18'></div>
<div class='BtnMenu' TITLE='更多文字格式' LANGUAGE='javascript' onclick="showToolMenu('font')"><img class='Ico' src='editor/images/arrow.gif' WIDTH='5' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='插入标签' LANGUAGE='javascript' onclick="insert('Label')"><img class='Ico' src='editor/images/label.gif' WIDTH='18' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='插入网页' LANGUAGE='javascript' onclick="insert('iframe')"><img class='Ico' src='editor/images/htm.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='插入表格' LANGUAGE='javascript' onclick="TableInsert()"><img class='Ico' src='editor/images/table.gif' WIDTH='18' HEIGHT='18'></div>
<div class='BtnMenu' TITLE='表格操作' LANGUAGE='javascript' onclick="showToolMenu('table')"><img class='Ico' src='editor/images/arrow.gif' WIDTH='5' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='显示或隐藏表格虚线、按钮等显示样式' LANGUAGE='javascript' onclick="showBorders()"><img class='Ico' src='editor/images/showBorders.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='插入下拉菜单' LANGUAGE='javascript' onclick="Insermenu('2009-1-21 15:43:31')"><img class='Ico' src='editor/images/menu.gif' WIDTH='18' HEIGHT='18'></div>
<div class='BtnMenu' TITLE='更多表单控件' LANGUAGE='javascript' onclick="showToolMenu('form')"><img class='Ico' src='editor/images/arrow.gif' WIDTH='5' HEIGHT='18'></div>
<div class='TBSep'></div>
<div class='Btn' TITLE='插入滚动文本' LANGUAGE='javascript' onclick="insert('insermarquee')"><img class='Ico' src='editor/images/Marquee.gif' WIDTH='18' HEIGHT='18'></div>
<div class='BtnMenu' TITLE='插入更多样式' LANGUAGE='javascript' onclick="showToolMenu('object')"><img class='Ico' src='editor/images/arrow.gif' WIDTH='5' HEIGHT='18'></div>
<div class='Btn' TITLE='插入图片,支持格式为:jpg、gif、bmp、png等' LANGUAGE='javascript' onclick="insert('pic')"><img class='Ico' src='editor/images/img.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='插入flash多媒体文件' LANGUAGE='javascript' onclick="insert('swf')"><img class='Ico' src='editor/images/flash.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='插入视频文件,支持格式为:avi、wmv、asf等' LANGUAGE='javascript' onclick="insert('wmv')"><img class='Ico' src='editor/images/wmv.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='插入RealPlay文件,支持格式为:rm、ra、ram' LANGUAGE='javascript' onclick="insert('rm')"><img class='Ico' src='editor/images/rm.gif' WIDTH='18' HEIGHT='18'></div>
<div class='Btn' TITLE='上传附件' LANGUAGE='javascript' onclick="insert('fujian')"><img class='Ico' src='editor/images/fujian.gif' WIDTH='18' HEIGHT='18'></div>
</div>
</td></tr> <tr> <td valign='top' height='100%'> <table border=0 cellpadding=0 cellspacing=0 width='100%' height='100%'> <tr><td height='100%'> <iframe style='font-size:12px' ID='HtmlEdit' MARGINHEIGHT='1' MARGINWIDTH='1' style='width=100%; height=100%;' scrolling='yes' ></iframe> </td></tr> </table> </td> </tr> <tr> <td valign='top' height='25'> <table border='0' cellpadding='0' cellspacing='0' width='100%' height='20' align='center'> <tr> <td id='ShowObject' width='90%'></td> <td valign='top' align='right'> <img src='Editor/images/sizeplus.gif' width='20' height='20' onclick='sizeChange(200)'> <img src='Editor/images/sizeminus.gif' width='20' height='20' onclick='sizeChange(-200)'> </td> <td width='30'></td> </tr> </table> <div id='HtmlEdit_Temp_HTML' style='VISIBILITY: hidden; OVERFLOW: hidden; POSITION: absolute; WIDTH: 1px; HEIGHT: 1px'></div> </td> </tr> <input type='hidden' ID='ContentEdit' value=''> <input type='hidden' ID='ModeEdit' value=''> <input type='hidden' ID='ContentLoad' value=''> <input type='hidden' ID='ContentFlag' value='0'> </table> </td> </tr></table>
<script language="VBScript">
Function Resumeblank(ByVal Content)
if Content="" then
Resumeblank=Content
Exit Function
end if
Dim strHtml, strHtml2, Num, Numtemp, Strtemp, i
strHtml = Replace(Content, "<DIV", "<div")
strHtml = Replace(strHtml, "</DIV>", "</div>")
strHtml = Replace(strHtml, "<TABLE", "<table")
strHtml = Replace(strHtml, "</TABLE>", vbCrLf & "</table>" & vbCrLf)
strHtml = Replace(strHtml, "<TBODY>", "")
strHtml = Replace(strHtml, "</TBODY>", "" & vbCrLf)
strHtml = Replace(strHtml, "<TR", "<tr")
strHtml = Replace(strHtml, "</TR>", vbCrLf & "</tr>" & vbCrLf)
strHtml = Replace(strHtml, "<TD", "<td")
strHtml = Replace(strHtml, "</TD>", "</td>")
strHtml = Replace(strHtml, "<"&"!--", vbCrLf & "<"&"!--")
strHtml = Replace(strHtml, "<SELECT", vbCrLf & "<Select")
strHtml = Replace(strHtml, "</SELECT>", vbCrLf & "</Select>")
strHtml = Replace(strHtml, "<OPTION", vbCrLf & " <Option")
strHtml = Replace(strHtml, "</OPTION>", "</Option>")
strHtml = Replace(strHtml, "<INPUT", vbCrLf & " <Input")
strHtml = Replace(strHtml, "<" & "script", vbCrLf & "<"&"script")
strHtml = Replace(strHtml, "&", "&")
strHtml = Replace(strHtml, "{$--", vbCrLf & "<"&"!--$")
strHtml = Replace(strHtml, "--}", "$--"&">")
arrContent = Split(strHtml, vbCrLf)
For i = 0 To UBound(arrContent)
Numtemp = False
If InStr(arrContent(i), "<table") > 0 Then
Numtemp = True
If Strtemp <> "<table" And Strtemp <> "</table>" Then
Num = Num + 2
End If
Strtemp = "<table"
ElseIf InStr(arrContent(i), "<tr") > 0 Then
Numtemp = True
If Strtemp <> "<tr" And Strtemp <> "</tr>" Then
Num = Num + 2
End If
Strtemp = "<tr"
ElseIf InStr(arrContent(i), "<td") > 0 Then
Numtemp = True
If Strtemp <> "<td" And Strtemp <> "</td>" Then
Num = Num + 2
End If
Strtemp = "<td"
ElseIf InStr(arrContent(i), "</table>") > 0 Then
Numtemp = True
If Strtemp <> "</table>" And Strtemp <> "<table" Then
Num = Num - 2
End If
Strtemp = "</table>"
ElseIf InStr(arrContent(i), "</tr>") > 0 Then
Numtemp = True
If Strtemp <> "</tr>" And Strtemp <> "<tr" Then
Num = Num - 2
End If
Strtemp = "</tr>"
ElseIf InStr(arrContent(i), "</td>") > 0 Then
Numtemp = True
If Strtemp <> "</td>" And Strtemp <> "<td" Then
Num = Num - 2
End If
Strtemp = "</td>"
ElseIf InStr(arrContent(i), "<"&"!--") > 0 Then
Numtemp = True
End If
If Num < 0 Then Num = 0
If Trim(arrContent(i)) <> "" Then
If i = 0 Then
strHtml2 = String(Num, " ") & arrContent(i)
ElseIf Numtemp = True Then
strHtml2 = strHtml2 & vbCrLf & String(Num, " ") & arrContent(i)
Else
strHtml2 = strHtml2 & vbCrLf & arrContent(i)
End If
End If
Next
Resumeblank = strHtml2
End Function
'==================================================
'函数名:ScriptHtml
'作 用:过滤html标记
'参 数:ConStr ------ 要过滤的字符串
'参 数:TagName ------ 字符串种型
'参 数:FType ------ 过滤的类型
'参 数:FontFilterText ------ 过滤含有制定字符的标记
'==================================================
Function ScriptHtml(ByVal ConStr,ByVal TagName,ByVal FType,ByVal FontFilterText)
Dim regEx, Match, Matches
Set regEx = New RegExp
regEx.IgnoreCase = True
regEx.Global = True
Select Case FType
Case 1
regEx.Pattern = "<" & TagName & "([^>])*>"
ConStr = regEx.Replace(ConStr, "")
Case 2
regEx.Pattern = "<" & TagName & "([^>])*>.*?</" & TagName & "([^>])*>"
ConStr = regEx.Replace(ConStr, "")
Case 3
regEx.Pattern = "<" & TagName & "([^>])*>"
ConStr = regEx.Replace(ConStr, "")
regEx.Pattern = "</" & TagName & "([^>])*>"
ConStr = regEx.Replace(ConStr, "")
Case 4
regEx.Pattern = "<" & TagName & "([^>])*>.*?</" & TagName & "([^>])*>"
Set Matches = regEx.Execute(ConStr)
For Each Match In Matches
If InStr(Match.Value, FontFilterText) > 0 Then
ConStr = Replace(ConStr, Match.Value, "")
End If
Next
End Select
ScriptHtml = ConStr
Set regEx = Nothing
End Function
</script>
<script type="text/javascript">
// 系统初试化 和系统运用 函数组开始
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
SEP_PADDING = 5;
HANDLE_PADDING = 7;
window.onerror = ResumeError;
// 改变模式:代码、编辑、文本、预览
var sCurrMode = 'EDIT';
var bEditMode = true;
var yanchicss= false;
ModeEdit.value = 'EDIT';
// 连接对象
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -