<%@ page language="VB" autoeventwireup="false" inherits="parrot_admin_StyleControl, App_Web_admin_stylecontrol.aspx.25f04327" %>
<%@ Register Assembly="System.Web.Extensions, Version=3.5.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35" Namespace="System.Web.UI" TagPrefix="asp" %>
<html >
<head>
<title>系统模板管理</title>

<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="X-UA-Compatible" content="IE=EmulateIE7" />
<link href="css/css.css" rel="stylesheet" type="text/css" />
<link href="css/body.css" rel="stylesheet" type="text/css" />
<link href="css/text.css" rel="stylesheet" type="text/css" />
<link href="css/button.css" rel="stylesheet" type="text/css" />
<script language="JavaScript" src="js/tanbox.js"></script>
<style type="text/css">
<!--
.nav_div {
	margin: 5px;
	height: 545px;
	width: 250px;
	overflow: auto;
	background-color: #FFFFFF;
	padding: 5px;
	line-height: 22px;
	font-size: 12px;
}
.code_div {
	margin: 5px;
	background-color: #FFFFFF;
	padding: 5px;
	line-height: 22px;
}
-->

 .nav_div a
      {
	height: auto;
	width: 220px;
	border: 1px solid #ffffff;
	background-image: url(image/img-39.GIF);
	background-repeat: no-repeat;
	background-position: 5px center;
	background-color: #ffffff;
	padding-left: 30px;
	text-decoration: none;
	font-size: 12px;
    }
      .nav_div a:hover
{
	height: auto;
	width: 220px;
	border: 1px solid #e5c365;
	background-image: url(image/img-39.GIF);
	background-repeat: no-repeat;
	background-position: 5px center;
	background-color: #ffefbb;
	padding-left: 30px;
	text-decoration: none;
	font-size: 12px;
    }
	
body {
	background-image: url(image/img-35.GIF);
}

.txt_ln {
	margin: 0px;
	padding: 0px;
	overflow: hidden;
	text-align:center;
	background-color: #EFEFEF;
	line-height: 22px;
	border-top-width: 1px;
	border-right-width: 0px;
	border-bottom-width: 1px;
	border-left-width: 1px;
	border-top-style: solid;
	border-right-style: solid;
	border-bottom-style: solid;
	border-left-style: solid;
	border-top-color: #CCCCCC;
	border-right-color: #CCCCCC;
	border-bottom-color: #CCCCCC;
	border-left-color: #CCCCCC;
}

.control_html {
	line-height: 22px;
	border-top-width: 1px;
	border-right-width: 1px;
	border-bottom-width: 1px;
	border-left-width: 0px;
	border-top-style: solid;
	border-right-style: solid;
	border-bottom-style: solid;
	border-left-style: solid;
	border-top-color: #CCCCCC;
	border-right-color: #CCCCCC;
	border-bottom-color: #CCCCCC;
	border-left-color: #CCCCCC;
	padding-top: 0px;
	padding-right: 0px;
	padding-bottom: 0px;
	padding-left: 5px;
}

</style>
<script type="text/javascript">
<!--
    function img_mappath(img_val, input_val) {
	var arr = showModalDialog("admin_select_img.aspx?temp="+ Math.random , "", "dialogWidth:963px; dialogHeight:600px; status:0; help:0");
        if (arr != null) {
            document.getElementById(input_val).value = arr;
        }
    }

function Insert(str) { 
var obj = document.getElementById('control_html'); 
if(document.selection) { 
obj.focus(); 
var sel=document.selection.createRange(); 
//document.selection.empty(); 
sel.text = str; 
} else { 
var prefix, main, suffix; 
prefix = obj.value.substring(0, obj.selectionStart); 
main = obj.value.substring(obj.selectionStart, obj.selectionEnd); 
suffix = obj.value.substring(obj.selectionEnd); 
obj.value = prefix + str + suffix; 
} 
obj.focus(); 
} 

function insertIMG(){
var image_url=document.getElementById('image_url').value;//用户名
   if(image_url==""){
                alert('请打开图像库选择相应图片后再插入图片');
                }else{

           Insert('<img src="'+ image_url +'"/>');
           document.getElementById('image_url').value='';

                 }
}
document.oncontextmenu = new Function('event.returnValue=false;');



function show_ln() {
    var txt_ln = document.getElementById('txt_ln');
    var control_html = document.getElementById('control_html');
    txt_ln.scrollTop = control_html.scrollTop;
    while (txt_ln.scrollTop != control_html.scrollTop) {
        txt_ln.value += (i++) + '\n';
        txt_ln.scrollTop = control_html.scrollTop;
    }
    return;
}

function editTab() {
    var code, sel, tmp, r
    var tabs = ''
    event.returnValue = false
    sel = event.srcElement.document.selection.createRange()
    r = event.srcElement.createTextRange()

    switch (event.keyCode) {
        
        case (9):
            if (sel.getClientRects().length > 1) {
                code = sel.text
                tmp = sel.duplicate()
                tmp.moveToPoint(r.getBoundingClientRect().left, sel.getClientRects()[0].top)
                sel.setEndPoint('startToStart', tmp)
                sel.text = '\t' + sel.text.replace(/\r\n/g, '\r\t')
                code = code.replace(/\r\n/g, '\r\t')
                r.findText(code)
                r.select()
            } else {
                sel.text = '\t'
                sel.select()
            }
            break
        case (13):
            tmp = sel.duplicate()
            tmp.moveToPoint(r.getBoundingClientRect().left, sel.getClientRects()[0].top)
            tmp.setEndPoint('endToEnd', sel)

            for (var i = 0; tmp.text.match(/^[\t]+/g) && i < tmp.text.match(/^[\t]+/g)[0].length; i++) tabs += '\t'
            sel.text = '\r\n' + tabs
            sel.select()
            break
        default:
            event.returnValue = true
            break
    }
}

function control_heigth_a() {
    document.getElementById('control_html').style.height = (parseInt(document.getElementById('control_html').style.height) + 150).toString() + 'px';

    document.getElementById('txt_ln').style.height = (parseInt(document.getElementById('txt_ln').style.height) + 150).toString() + 'px';
}

function control_heigth_b() {
    if (parseInt(document.getElementById('control_html').style.height) > 150) { document.getElementById('control_html').style.height = (parseInt(document.getElementById('control_html').style.height) - 150).toString() + 'px' };

    if (parseInt(document.getElementById('txt_ln').style.height) > 150) { document.getElementById('txt_ln').style.height = (parseInt(document.getElementById('txt_ln').style.height) - 150).toString() + 'px' }
}
		</script>
        <script src="js/web_content.js" type="text/javascript"></script>
</head>
<body>
<form id="form1" runat="server" >
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td><table width="100%" border="0" cellspacing="2" cellpadding="0">
        <tr>
          <td width="260" valign="top">
          <asp:scriptmanager ID="Scriptmanager1" runat="server"></asp:scriptmanager>
                                <asp:UpdatePanel ID="UpdatePanel" ChildrenAsTriggers="true"  runat="server">
<ContentTemplate>
          <table width="100%" border="0" cellspacing="2" cellpadding="0">
            <tr>
              <td height="26" align="right" background="image/img-34.GIF">
              
              <table border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td width="70">
                      <asp:LinkButton ID="LinkButton1" runat="server"><span style="color:#ffffff;font-size:12px;">刷新标签</span></asp:LinkButton>
                    </td>
                </tr>
              </table></td>
            </tr>
           
            <tr>
     
              <td bgcolor="dee1e7"><div class="nav_div" id="masterdiv">
          <div align="center"><===========控件容器===========></div>
        <a href="#" onClick="Insert('[!--FormServer--]')">[!--FormServer--]&nbsp;&nbsp;容器开始</a>
        <a href="#" onClick="Insert('[!--/FormServer--]')">[!--/FormServer--]&nbsp;&nbsp;容器结束</a>
        
        <div align="center"><===========功能组件===========></div>
        <a href="#" onClick="Insert('[!--Background--]')">[!--Background--]&nbsp;&nbsp;可控背景组件</a>
        <a href="#" onClick="Insert('[!--BodyCss--]')">[!--BodyCss--]&nbsp;&nbsp;全局样式组件</a>
        <a href="#" onClick="Insert('[!--ButtonCss--]')">[!--ButtonCss--]&nbsp;&nbsp;按钮样式组件</a>
        <a href="#" onClick="Insert('[!--StringCss--]')">[!--StringCss--]&nbsp;&nbsp;文字样式组件</a>
        <a href="#" onClick="Insert('[!--TextBoxCss--]')">[!--TextBoxCss--]&nbsp;&nbsp;输入框样式组件</a>
        <a href="#" onClick="Insert('[!--LazyLoad--]')">[!--LazyLoad--]&nbsp;&nbsp;图片延迟加载组件</a>
         <% If ubb.xml_tables("red_parrot.xml", "parrot_qqkefu") = "True" Then%>
        <a href="#" onClick="Insert('[!--QQ--]')">[!--QQ--]&nbsp;&nbsp;浮动QQ</a>
        <%End If%>

    <div align="center"><===========系统控件===========></div>
        <a href="#" onClick="Insert('[!--Title--]')">[!--Title--]&nbsp;&nbsp;网站名称</a>
        <a href="#" onClick="Insert('[!--Slogan--]')">[!--Slogan--]&nbsp;&nbsp;网站标语</a>
        <a href="#" onClick="Insert('[!--Keywords--]')">[!--Keywords--]&nbsp;&nbsp;网站关键字</a>
        <a href="#" onClick="Insert('[!--Description--]')">[!--Description--]&nbsp;&nbsp;网站介绍</a>
        <a href="#" onClick="Insert('[!--LogoUrl--]')">[!--LogoUrl--]&nbsp;&nbsp;logo地址</a>
        <a href="#" onClick="Insert('[!--Navigation--]')">[!--Navigation--]&nbsp;&nbsp;导航条</a>
        <a href="#" onClick="Insert('[!--Search_sing--]')">[!--Search_sing--]&nbsp;&nbsp;当前位置</a>
        <a href="#" onClick="Insert('[!--Search--]')">[!--Search--]&nbsp;&nbsp;搜索条</a>
        <% If ubb.xml_tables("red_parrot.xml", "parrot_user") = "True" Then%>
        <a href="#" onClick="Insert('[!--UserRegister--]')">[!--UserRegister--]&nbsp;&nbsp;会员注册</a>
        <a href="#" onClick="Insert('[!--UserLogin--]')">[!--UserLogin--]&nbsp;&nbsp;会员登录条</a>
        <a href="#" onClick="Insert('[!--UserControlZ--]')">[!--UserControlZ--]&nbsp;&nbsp;会员登录框</a>
        <a href="#" onClick="Insert('[!--UserGetPwd--]')">[!--UserGetPwd--]&nbsp;&nbsp;会员密码找回</a>
        <%
        End If
        If ubb.xml_tables("red_parrot.xml", "parrot_shop") = "True" Then%>
        <a href="#" onClick="Insert('[!--UserControlU--]')">[!--UserControlU--]&nbsp;&nbsp;商品类别</a>
        <a href="#" onClick="Insert('[!--ShopRandom--]')">[!--ShopRandom--]&nbsp;&nbsp;商品随机推荐</a>
        <a href="#" onClick="Insert('[!--UserControlH--]')">[!--UserControlH--]&nbsp;&nbsp;商品推荐</a>
        <a href="#" onClick="Insert('[!--UserControlW--]')">[!--UserControlW--]&nbsp;&nbsp;商品推荐小</a>
        <a href="#" onClick="Insert('[!--UserControlJ--]')">[!--UserControlJ--]&nbsp;&nbsp;商品展示</a>
        <a href="#" onClick="Insert('[!--UserControlV--]')">[!--UserControlV--]&nbsp;&nbsp;商品列表</a>
        <a href="#" onClick="Insert('[!--shoptrolley--]')">[!--shoptrolley--]&nbsp;&nbsp;购物车</a>
        <%End If%>
        <a href="#" onClick="Insert('[!--UserControlO--]')">[!--UserControlO--]&nbsp;&nbsp;文章列表</a>
        <a href="#" onClick="Insert('[!--UserControlG--]')">[!--UserControlG--]&nbsp;&nbsp;文章类别导航</a>
        <a href="#" onClick="Insert('[!--UserControlP--]')">[!--UserControlP--]&nbsp;&nbsp;文章热点推荐</a>
        <a href="#" onClick="Insert('[!--UserControlQ--]')">[!--UserControlQ--]&nbsp;&nbsp;文章最新关注</a>
        <a href="#" onClick="Insert('[!--UserControlA--]')">[!--UserControlA--]&nbsp;&nbsp;最新图文推荐</a>
        <a href="#" onClick="Insert('[!--UserControlB--]')">[!--UserControlB--]&nbsp;&nbsp;最新文章推荐</a>
        <a href="#" onClick="Insert('[!--UserControlC--]')">[!--UserControlC--]&nbsp;&nbsp;文章热点推荐</a>
        <a href="#" onClick="Insert('[!--UserControlD--]')">[!--UserControlD--]&nbsp;&nbsp;最新评论</a>
        <a href="#" onClick="Insert('[!--UserControlE--]')">[!--UserControlE--]&nbsp;&nbsp;资讯导航</a>
        <a href="#" onClick="Insert('[!--UserControlF--]')">[!--UserControlF--]&nbsp;&nbsp;文章列表小</a>
        <a href="#" onClick="Insert('[!--UserControlI--]')">[!--UserControlI--]&nbsp;&nbsp;文章列表大</a>
        <a href="#" onClick="Insert('[!--UserControlK--]')">[!--UserControlK--]&nbsp;&nbsp;友情链接</a>
        <a href="#" onClick="Insert('[!--UserControlL--]')">[!--UserControlL--]&nbsp;&nbsp;留言本</a>
        <a href="#" onClick="Insert('[!--check--]')">[!--check--]&nbsp;&nbsp;在线调查</a>
        
        
        
        <%If ubb.query_string("path") = "Information" Then%>
         <div align="center">[ 资讯页专用控件 ]</div>
            <a href="#" onClick="Insert('[!--InformationTitle--]')">[!--InformationTitle--]&nbsp;&nbsp;资讯标题</a>
            <a href="#" onClick="Insert('[!--InformationText--]')">[!--InformationText--]&nbsp;&nbsp;资讯内容</a>
            <a href="#" onClick="Insert('[!--InformationImage--]')">[!--InformationImage--]&nbsp;&nbsp;资讯图片</a>
        <%ElseIf ubb.query_string("path") = "Shoptrolley" Then%>
        <div align="center">[ 购物车列表页专用控件 ]</div>
            <a href="#" onClick="Insert('[!--UserControlM--]')">[!--UserControlM--]&nbsp;&nbsp;购物车列表</a>
        <%ElseIf ubb.query_string("path") = "News_tables" Then%>
        <div align="center">[ 文章列表页专用控件 ]</div>
            <a href="#" onClick="Insert('[!--NewsTable--]')">[!--NewsTable--]&nbsp;&nbsp;文章智能列表</a>
            <a href="#" onClick="Insert('[!--NewsCatCode--]')">[!--NewsCatCode--]&nbsp;&nbsp;分类自定义代码</a>

        <%ElseIf ubb.query_string("path") = "News_text" Then%>
        <div align="center">[ 文章正文页专用控件 ]</div>
        
            <a href="#" onClick="Insert('[!--UserControlR--]')">[!--UserControlR--]&nbsp;&nbsp;文章显示模块</a>
            <a href="#" onClick="Insert('[!--TextComment--]')">[!--TextComment--]&nbsp;&nbsp;文章评论</a>
            <a href="#" onClick="Insert('[!--TextMood--]')">[!--TextMood--]&nbsp;&nbsp;文章心情</a>
            <a href="#" onClick="Insert('[!--Slogan--]')">[!--Slogan--]&nbsp;&nbsp;文章标题</a>
            <a href="#" onClick="Insert('[!--NewsImage--]')">[!--NewsImage--]&nbsp;&nbsp;文章图片</a>
            <a href="#" onClick="Insert('[!--NewsText--]')">[!--NewsText--]&nbsp;&nbsp;文章正文</a>
            <a href="#" onClick="Insert('[!--NewsAuthor--]')">[!--NewsAuthor--]&nbsp;&nbsp;文章作者</a>
            <a href="#" onClick="Insert('[!--NewsTime--]')">[!--NewsTime--]&nbsp;&nbsp;发表时间</a>
            <a href="#" onClick="Insert('[!--NewsTocall--]')">[!--NewsTocall--]&nbsp;&nbsp;文章访问量</a>

        <%ElseIf ubb.query_string("path") = "UserForm" Then%>
        <div align="center">[ 自定义表单页专用控件 ]</div>
        <a href="#" onClick="Insert('[!--UserFormTitle--]')">[!--UserFormTitle--]&nbsp;&nbsp;表单标题</a>
            <a href="#" onClick="Insert('[!--UserControlT--]')">[!--UserControlT--]&nbsp;&nbsp;自定义表单</a>
        <%ElseIf ubb.query_string("path") = "Shop_Text" Then%>
        <div align="center">[ 商品详情页专用控件 ]</div>
        <a href="#" onClick="Insert('[!--UserControlX--]')">[!--UserControlX--]&nbsp;&nbsp;商品显示模块</a>
       <a href="#" onClick="Insert('[!--Slogan--]')">[!--Slogan--]&nbsp;&nbsp;商品标题</a>
        <a href="#" onClick="Insert('[!--ShopText--]')">[!--ShopText--]&nbsp;&nbsp;商品介绍</a>
        <a href="#" onClick="Insert('[!--ShopPrice--]')">[!--ShopPrice--]&nbsp;&nbsp;商品价格</a>
        <a href="#" onClick="Insert('[!--ShopFreight--]')">[!--ShopFreight--]&nbsp;&nbsp;商品运费</a>
        <a href="#" onClick="Insert('[!--ShopnNumber--]')">[!--ShopnNumber--]&nbsp;&nbsp;商品货号</a>
        <a href="#" onClick="Insert('[!--ShopImage--]')">[!--ShopImage--]&nbsp;&nbsp;商品图片</a>
        <a href="#" onClick="Insert('[!--Shop_Goods--]')">[!--Shop_Goods--]&nbsp;&nbsp;购买链接</a>



       <%ElseIf ubb.query_string("path") = "Shop_Goods" Then%>
        <div align="center">[ 商品订单页专用控件 ]</div>
       
        <a href="#" onClick="Insert('[!--UserControlY--]')">[!--UserControlY--]&nbsp;&nbsp;商品订单表单</a>
       <%ElseIf ubb.query_string("path") = "Shop_Goods_Pay" Then%>
        <div align="center">[ 支付信息返回页专用控件 ]</div>
        
        <a href="#" onClick="Insert('[!--GoodsPayID--]')">[!--GoodsPayID--]&nbsp;&nbsp;订单单号</a>
        <a href="#" onClick="Insert('[!--GoodsPayB--]')">[!--GoodsPayID--]&nbsp;&nbsp;订单金额</a>
        <a href="#" onClick="Insert('[!--GoodsPayC--]')">[!--GoodsPayID--]&nbsp;&nbsp;交易方式</a>
        <%ElseIf ubb.query_string("path") = "Usercontrolpanel" Then%>
        <div align="center">[ 会员管理页专用控件 ]</div>
      
        <a href="#" onClick="Insert('[!--usercontrolpanel--]')">[!--usercontrolpanel--]&nbsp;&nbsp;会员管理面板</a>

        <%ElseIf ubb.query_string("path") = "BBS_Panel" Then%>
        <div align="center">[ 论坛分类模块页专用控件 ]</div>
      
        <a href="#" onClick="Insert('[!--WebBbsControlA--]')">[!--WebBbsControlA--]&nbsp;&nbsp;分类模块</a>
                <%ElseIf ubb.query_string("path") = "BBS_Tables" Then%>
        <div align="center">[ 论坛主题列表页专用控件 ]</div>
      
        <a href="#" onClick="Insert('[!--WebBbsControlB--]')">[!--WebBbsControlB--]&nbsp;&nbsp;主题列表</a>
                <%ElseIf ubb.query_string("path") = "BBS_Text" Then%>
        <div align="center">[ 论坛主题正文页专用控件 ]</div>
      
        <a href="#" onClick="Insert('[!--WebBbsControlC--]')">[!--WebBbsControlC--]&nbsp;&nbsp;主题正文</a>
                <%ElseIf ubb.query_string("path") = "BBS_Publish" Then%>
        <div align="center">[ 论坛主题发表页专用控件 ]</div>
      
        <a href="#" onClick="Insert('[!--WebBbsControlD--]')">[!--WebBbsControlD--]&nbsp;&nbsp;主题发表</a>

        <%ElseIf ubb.query_string("path") = "BBS_Select" Then%>
        <div align="center">[ 论坛主题搜索页专用控件 ]</div>
      
        <a href="#" onClick="Insert('[!--WebBbsControlE--]')">[!--WebBbsControlE--]&nbsp;&nbsp;主题搜索</a>
        <%End If%>



    <div align="center"><========自定义用户控件=========></div>

       
         <%For i = 0 To diyascx_array.Length - 1%>
         <a href="#" onClick="Insert('[!--|<%=System.IO.Path.GetFileNameWithoutExtension(diyascx_array(i))%>|--]')">[!--|<%= System.IO.Path.GetFileNameWithoutExtension(diyascx_array(i))%>|--]</a>
        <%Next%>


           <div align="center"><========自定义应用程序=========></div>
                 <%
                     Dim user_system_list() As String = System.IO.Directory.GetFiles(Server.MapPath("../user_system"))
                     For i = 0 To user_system_list.Length - 1
                         If System.IO.Directory.Exists(Server.MapPath("../user_system/" & System.IO.Path.GetFileNameWithoutExtension(user_system_list(i)))) Then
                             Dim lise_text_array() As String = ubb.request_file("../user_system/" & System.IO.Path.GetFileName(user_system_list(i))).Split("|")
                             If lise_text_array.Length = 4 Then
                                 If lise_text_array(3) <> "" Then
                                       %>
                                        <a href="#" onClick="Insert('<%=lise_text_array(3)%>')">[!-Sys-|<%= lise_text_array(0)%>|-Sys-!]</a>
                                        <%
                                        ElseIf lise_text_array(2) <> "" Then
                                        %>
                                         <a href="#" onClick="Insert('[!-Sys-|<%=lise_text_array(2)%>|-Sys-!]')">[!-Sys-|<%= lise_text_array(0)%>|-Sys-!]</a>
                                        <%
                                 End If
                                End If
                            End If
                            Next
                                %>

<div align="center"><========自定义广告调用=========></div>
<%  Dim gg_tables As Data.DataTable = ubb.tables("select gg_id,gg_sm,gg_wz,gg_jsnumber from wn_gg where gg_look='显示' order by gg_wz desc ,gg_id desc")
    For i = 0 To gg_tables.Rows.Count - 1
        Dim jsbnumberstring As String
        If gg_tables.Rows(i).Item("gg_jsnumber") <> "" Then
            jsbnumberstring = "|" & gg_tables.Rows(i).Item("gg_jsnumber")
        End If
    %>
             <a href="#" onClick="Insert('[!-AD-|&quot;&quot;, &quot;<%=gg_tables.Rows(i).item("gg_id")& jsbnumberstring%>&quot;,&quot;&quot;|-AD-!]')" >【<%=gg_tables.Rows(i).item("gg_wz")%>】<%= gg_tables.Rows(i).Item("gg_sm")%></a><%Next%><div align="center"><=========自定义Css样式=========></div>

        <%For i = 0 To diycss_array.Length - 1%>
         <a href="#" onClick="Insert('[!-Css-|<%=System.IO.Path.GetFileNameWithoutExtension(diycss_array(i))%>|-Css-]')">[!-Css-|<%= System.IO.Path.GetFileNameWithoutExtension(diycss_array(i))%>|-Css-]</a>
        <%Next%>
       <a href="javascript:ShowHtmlString(730,415,'admin_diycss.aspx','自定义Css样式管理');" >自定义Css样式管理</a>
        
        <div align="center"><=========自定义Js脚本==========></div>
                <%For i = 0 To diyjs_array.Length - 1%>
         <a href="#" onClick="Insert('[!-Js-|<%=System.IO.Path.GetFileNameWithoutExtension(diyjs_array(i))%>|-Js-]')">[!-Js-|<%= System.IO.Path.GetFileNameWithoutExtension(diyjs_array(i))%>|-Js-]</a>
        <%Next%>
        <a href="javascript:ShowHtmlString(730,415,'admin_diyjs.aspx','自定义Js脚本管理');" >自定义Js脚本管理</a>

        <%If ubb.xml_tables("red_parrot.xml", "parrot_js_table") = "True" Then %>
    <div align="center"><=========自定义外部调用========></div>
         <%For i = 0 To diyclass_tb.Rows.Count - 1%>

         <a href="#" onClick="Insert('[!-EXECUTE-|web_js/web_diyclass.aspx?id=<%= diyclass_tb.Rows(i).Item("class_id")%>&jsno=<%= diyclass_tb.Rows(i).Item("class_jsnumber")%>|-EXECUTE-!]')"><%= diyclass_tb.Rows(i).Item("class_name")%></a>
        <%Next%>
        <div align="center"><========外部调用代码生成=======></div>
       
<a href="javascript:ShowHtmlString(700,310,'admin_js_wz.aspx','资讯外部调用管理');" >【资讯外部调用管理】</a>
<a href="javascript:ShowHtmlString(700,410,'admin_js_news.aspx','文章外部调用管理');" >【文章外部调用管理】</a>

        <%If ubb.xml_tables("red_parrot.xml", "parrot_shop") = "True" Then%>
<a href="javascript:ShowHtmlString(700,377,'admin_js_shop.aspx','商品外部调用管理');" >【商品外部调用管理】</a>
<%End If%>
<a href="javascript:ShowHtmlString(750,475,'admin_js_flash.aspx','幻灯片外部调用管理');" >【幻灯外部调用管理】</a>

              <%end if %>
              <div align="center"><========其他可调用的代码=======></div>
              <a href="#" onClick="Insert('&lt;%=ubb.news_annex_item(&quot;输入文章ID或留空&quot;,&quot;输入表单项名&quot;)%&gt;')">【文章附加表单显示】</a>
              <a href="#" onClick="Insert('&lt;a href=&quot;&lt;%=ubb.urlrecombination(2)%&gt;|表单项名∷筛选内容&quot;&gt;按钮名称&lt;/a&gt;')">【附加表单筛选URL显示】</a>
              </div></td>
            </tr>
          </table>
          </ContentTemplate>
              </asp:UpdatePanel>
          </td>
          <td valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="2">
            <tr>
              <td height="26" background="image/img-36.GIF"><table border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td height="26" bgcolor="#FFE9A8">&nbsp;</td>
                  <td bgcolor="#FFE9A8" class="lanse12"><asp:Label ID="control_bt" runat="server" Text="Label"></asp:Label></td>
                  <td bgcolor="#FFE9A8" class="lanse12">&nbsp;</td>
                  <td bgcolor="#FFE9A8" class="lanse12">
                      <asp:ImageButton ID="ImageButton1" runat="server" ImageUrl="image/img-38.GIF" AlternateText="保存代码" />                    </td>
                  <td bgcolor="#FFE9A8" class="lanse12">&nbsp;</td>
                  <td bgcolor="#FFE9A8" class="lanse12"><a href="admin_StyleControl_table.aspx"><img src="image/img-37.GIF" alt="放弃保存返回上级列表" border="0"/></a></td>
                  <td bgcolor="#FFE9A8"><span class="lanse12">
                    <asp:TextBox ID="server_code" runat="server" CssClass="text1x1"></asp:TextBox>
                  </span></td>
                  <td bgcolor="#FFE9A8">&nbsp;</td>
                   <td align="center" class="baise12">&nbsp;</td>
                  <td><a href="javascript:ShowHtmlString(730,505,'admin_diyascx.aspx','用户控件管理');" ><img src="image/img-42.GIF" border="0"/></a></td>
                   <% If ubb.xml_tables("red_parrot.xml", "parrot_js_table") = "True" Then %>
                  <td align="center" class="baise12">&nbsp;</td>
                  <td align="center" class="baise12"><a href="javascript:ShowHtmlString(730,505,'admin_diyclass.aspx','自定义外部调用管理');" ><img src="image/img-13.GIF" border="0"/></a></td>
                  <%end if %>
                   <td align="center" class="baise12">&nbsp;</td>
                  <td height="20" align="center" class="baise12"><a href="admin_peizhi_css.aspx"><img src="image/img-12.GIF" border="0"/></a></td>
                     
                </tr>
              </table></td>
            </tr>
            <tr>
    <td >
    <table width="100%" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td bgcolor="#DEE1E7" width="48">
    <asp:TextBox id="txt_ln" CssClass="txt_ln" Width="48px" Height="515px" 
            runat="server" TextMode="MultiLine" Enabled="False"></asp:TextBox></td>
    <td bgcolor="#DEE1E7" style="word-break: break-all"><asp:TextBox CssClass="control_html" onkeydown="editTab()" onchange="document.forms[0].modi.value='ture'" onscroll="show_ln()" Width="100%" Height="515px" ID="control_html" runat="server" TextMode="MultiLine"></asp:TextBox>
<script> for (var i = 1; i <= 31; i++) document.getElementById('txt_ln').value += i + '\n';</script>
               <input type='hidden' name='modi' value=''>    </td>
  </tr>
</table>
    </td>
  
  </tr>

            <tr>
              <td bgcolor="#DEE1E7"><table width="100%" border="0" cellpadding="0" cellspacing="5">
                  <tr>
                    <td width="200"><input name="image_url" type="text" class="text_autox22_cccccc" style="width:200px"/></td>
                    <td width="20"><input type="button" class="btn_2k3" onClick="img_mappath(this,'image_url');" value="打开图像库" /></td>
                    <td width="20"><input type="button" class="btn_2k3" value="插入图片" onClick="insertIMG()" /></td>
                    <td><input class="btn_2k3" onClick="runEx('control_html')"  type="button" value="预览"/></td>
                    <td width="10"><img src="image/img-41.GIF" width="16" height="22" onClick="control_heigth_a()"  onmouseover= "this.style.cursor= 'hand' " onmouseout= "this.style.cursor= 'normal'"/></td>
                    <td width="10"> <img src="image/img-40.GIF" width="16" height="22" onClick="control_heigth_b()"  onmouseover= "this.style.cursor= 'hand' " onmouseout= "this.style.cursor= 'normal'"/></td>

                  </tr>
                </table></td>
            </tr>
          </table></td>
        </tr>
      </table>
      </td>
  </tr>
</table>
</form>
</body>
</html>