<!--#include file="conn.asp"-->
<!--#include file="inc/cookies_check.asp"-->
<!--#include file="../include/config.inc"-->
<%
'*****************************************
'* 软件名称 乐彼网上开店软件(56770 EShop)
'* 软件开发 http://www.56770.com
'* 版权所有 http://www.56770.com
'* 文件名称 Admin_system.asp
'* 最后更新 2013-05-09 by 56770.kingdge
'*****************************************
Dim admin_flag
admin_flag=",8.1,"
include "lang/"& LangFilePath &"/lang_sys.inc"
include "lang/"& LangFilePath &"/lang_menu.inc"
include "lang/"& LangFilePath &"/lang_system.inc"
CurrentId = 5
CurrentUrl = "admin_system.asp"
LB_Head()
LB_Menu()
%>
<div class="tabmenu mainwidth">
      <ul>
        <li class="current"><a href="Admin_system.asp"><span><%=Lang_Menu(49)%></span></a></li>
		<li><a href="Admin_skip_window.asp"><span><%=Lang_Menu(134)%></span></a></li>
		<li><a href="Admin_reg.asp"><span><%=Lang_Menu(135)%></span></a></li>
      </ul>
</div>
<%
Response.Write("<div class=""tab-mainbody"">")
Response.Write("<div class=""tab-mainbody2"">")
if Eshop_Lebi_name="" or instr(","&Eshop_Lebi_flag&",",admin_flag)=0 then
		adminflag()
End If
If OutSubmit = 1 Then CheckOutSubmit()
set rs=server.createobject("adodb.recordset")
if request("action")="update" Then
        If OnlyRead = 1 Then OnlyReadMessage()
		If safereplace(request("sitename")) = "" And safereplace(request("sys_description")) = "" And safereplace(request("sys_keywords")) = "" And safereplace(request("name")) = "" Then 
			Call Up_mes(Lang_sys(46),"·"& Lang_sys(106),0,"javascript:history.back();",0,0,2,0)
		End If 
		Dim Lebi_Config(24)
		Lebi_Config(0) = checknum(request("Lebi_Config0"),0)
		Lebi_Config(1) = checknum(request("Lebi_Config1"),0)
		Lebi_Config(2) = checknum(request("Lebi_Config2"),0)
		Lebi_Config(3) = checknum(request("Lebi_Config3"),0)
		Lebi_Config(4) = checknum(request("Lebi_Config4"),0)
		Lebi_Config(5) = checknum(request("Lebi_Config5"),0)
		Lebi_Config(6) = checknum(request("Lebi_Config6"),0)
		Lebi_Config(7) = checknum(request("Lebi_Config7"),0)
		Lebi_Config(8) = checknum(request("Lebi_Config8"),0)
		Lebi_Config(9) = safereplace(request("Lebi_Config9"))
		Lebi_Config(10) = safereplace(request("Lebi_Config10"))
		Lebi_Config(11) = checknum(request("Lebi_Config11"),0)
		Lebi_Config(12) = checknum(request("Lebi_Config12"),0)
		Lebi_Config(13) = checknum(request("Lebi_Config13"),0)
		Lebi_Config(14) = checknum(request("Lebi_Config14"),0)
		Lebi_Config(15) = safereplace(request("Lebi_Config15"))
		Lebi_Config(16) = safereplace(request("Lebi_Config16"))
		Lebi_Config(17) = safereplace(request("Lebi_Config17"))
		Lebi_Config(18) = safereplace(request("Lebi_Config18"))
		Lebi_Config(19) = safereplace(request("Lebi_Config19"))
		Lebi_Config(20) = checknum(request("Lebi_Config20"),20)
		Lebi_Config(21) = checknum(request("Lebi_Config21"),0)
		Lebi_Config(22) = checknum(request("Lebi_Config22"),0)
		Lebi_Config(23) = checknum(request("Lebi_Config23"),0)
		Lebi_Config(24) = checknum(request("Lebi_Config24"),0)
		setup_sys = Lebi_Config(0)&"$"&Lebi_Config(1)&"$"&Lebi_Config(2)&"$"&Lebi_Config(3)&"$"&Lebi_Config(4)&"$"&Lebi_Config(5)&"$"&Lebi_Config(6)&"$"&Lebi_Config(7)&"$"&Lebi_Config(8)&"$"&Lebi_Config(9)&"$"&Lebi_Config(10)&"$"&Lebi_Config(11)&"$"&Lebi_Config(12)&"$"&Lebi_Config(13)&"$"&Lebi_Config(14)&"$"&Lebi_Config(15)&"$"&Lebi_Config(16)&"$"&Lebi_Config(17)&"$"&Lebi_Config(18)&"$"&Lebi_Config(19)&"$"&Lebi_Config(20)&"$"&Lebi_Config(21)&"$"&Lebi_Config(22)&"$"&Lebi_Config(23)&"$"&Lebi_Config(24)&"$$$$$$$$$"
		sys_qq = safereplace(trim(request("sys_qq")))
		sql="select * from [Lebi_system]"
		rs.open sql, conn, 1, 3
		rs("sys_Upload") = safereplace(request("Upload_type")) &"$"& safereplace(request("Upload_isDraw")) &"$"& safereplace(request("Upload_Drawtext")) &"$"& safereplace(request("Upload_Drawfontsize")) &"$"& safereplace(request("Upload_Drawcolor")) &"$"& safereplace(request("Upload_Drawfont")) &"$"& safereplace(request("Upload_DrawFontBold")) &"$"& safereplace(request("Upload_Drawpic")) &"$"& safereplace(request("Upload_DrawGraph")) &"$"& safereplace(request("Upload_Drawpiccolor")) &"$"& safereplace(request("Upload_DrawXYType")) &"$"& safereplace(request("Upload_DrawWidth")) &"$"& safereplace(request("Upload_DrawHight")) &"$"& safereplace(request("Upload_Dir")) &"$"& safereplace(request("Upload_SPicWidth")) &"$"& safereplace(request("Upload_SPicHeight")) &"$"& safereplace(request("Upload_SaveType")) &"$"& safereplace(request("Upload_RName")) &"$$$"
		rs("sys_jmail") = safereplace(request("jmail_type")) &"$"& safereplace(request("jmail_smtp")) &"$"& safereplace(request("jmail_sendmail")) &"$"& safereplace(request("jmail_sendpass")) &"$"& safereplace(request("jmail_sendname")) &"$"& safereplace(request("jmail_frommail")) &"$"& CheckNum(request("jmail_regon"),0) &"$"& CheckNum(request("jmail_cashon"),0) &"$"& CheckNum(request("jmail_cashoveron"),0)
		rs("sys_setup") = setup_sys
		rs("word_filter") = safereplace(request("word_filter"))
		rs("sys_ext") = safereplace(request("sys_ext"))
		rs("sys_soft") = checknum(request("sys_soft"),0)
		For LangT = 1 To TotalLang
				rs("sitename" & LanguageTxt(LangT)) = safereplace(request("sitename" & LanguageTxt(LangT)))
				rs("name" & LanguageTxt(LangT)) = safereplace(request("name" & LanguageTxt(LangT)))
				rs("sys_description" & LanguageTxt(LangT)) = Left(NoEnter(safereplace(request("sys_description" & LanguageTxt(LangT)))),200)
				rs("sys_keywords" & LanguageTxt(LangT)) = Left(NoEnter(safereplace(request("sys_keywords" & LanguageTxt(LangT)))),200)
				rs("sys_logo" & LanguageTxt(LangT)) = safereplace(request("sys_logo" & LanguageTxt(LangT)))
				rs("sys_tel" & LanguageTxt(LangT)) = safereplace(request("sys_tel" & LanguageTxt(LangT)))
				rs("fax" & LanguageTxt(LangT)) = safereplace(request("fax" & LanguageTxt(LangT)))
				rs("mail" & LanguageTxt(LangT)) = safereplace(request("mail" & LanguageTxt(LangT)))
				rs("web" & LanguageTxt(LangT)) = safereplace(request("web" & LanguageTxt(LangT)))
				rs("sys_qq" & LanguageTxt(LangT)) = safereplace(request("sys_qq" & LanguageTxt(LangT)))
				Savehtml "../include/Lebi_Data/SiteCopy"& LanguageTxt(LangT) &".data",request("sitecopy" & LanguageTxt(LangT))
		Next
		rs.update
		rs.close:Set rs=Nothing
		CreateConfig()
		If Config_Lebi_Eshop(17)="1" Then
				Application.Contents.RemoveAll
		End If
		ManageLog Lang_System(1)
		If Lebi_Config(21) = "1" Then 
				include "lang/"& LangFilePath &"/lang_skin.inc"
				LangT = CheckNum(request("LangT"),1)
				m_u="admin_skin_save.asp?action=all&back_type=3"
				For LangT = 1 To TotalLang
						main_0 = Replace(NoEnter(safereplace(request("sitename"& LanguageTxt(LangT)))),"$$$","")
						main_1 = Replace(NoEnter(safereplace(request("sys_description"& LanguageTxt(LangT)))),"$$$","")
						main_2 = Replace(NoEnter(safereplace(request("sys_keywords"& LanguageTxt(LangT)))),"$$$","")
						Uptext = Uptext &"<iframe src=""admin_skin_text.asp?action=uptext&LangT="& LangT &"&main_0="& server.urlencode(main_0) &"&main_1="& server.urlencode(main_1) &"&main_2="& server.urlencode(main_2) &""" width=""0"" height=""0""></iframe>"
				Next
				ManageLog Lang_Skin(161)
				Call Up_mes(Lang_sys(69),"·"& Lang_System(117) & Uptext,0,m_u,0,0,5,1)
		Else 
		Call Up_mes(Lang_sys(69),"·"& Lang_sys(68),0,"?",0,0,2,1)
		End If 
Else
%>
<script language="javascript" type="text/javascript" src="inc/js/js_link.js"></script>
<script language="javascript" type="text/javascript" src="inc/js/dialog.js"></script>
<script language="javascript" src="Upfile/js/Upload_Other.js"></script>
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="classtable">
<form name="system" method="post" action="?action=update">
<tr>
	<td height="30" align="left" class="classhead"><input name="submit" type="image" src="lang/<%=LangFilePath%>/images/bt_app.gif" title=" <%=Lang_sys(1)%> " align="absmiddle">&nbsp;<input type="image" src="lang/<%=LangFilePath%>/images/bt_res.gif" title=" <%=Lang_sys(2)%> " onclick="reset();return false;" align="absmiddle"></td>
	<td align="right" class="classhead">
	<%=QuickMenu("","Admin_skip_window.asp|"& Lang_Menu(134) &"")%>
	</td>
 </tr>
<tr>
<td height="30" colspan="2" class="classtop"><%=Lang_System(2)%><a name="#1"></td>
</tr>
<%
Set rs = conn.execute("select top 1 * from [Lebi_system]")
arr_sys_oicq = Split(rs("sys_oicq"),"$$")
arr_sys_Upload = split(rs("sys_upload"),"$")
arr_sys_jmail = split(rs("sys_jmail"),"$")
Lebi_Config = split(rs("sys_setup"),"$")
word_filter = rs("word_filter")
Lebi_Config(25) = checknum(Lebi_Config(25),2)
%>
<tr>
<td class="classbg" colspan="2">
<ul id="tablist">
   <%For LangT = 1 To TotalLang%>
   <li<%If LangT = 1 Then response.write(" class=""selected""") End If%>><a rel="tcontent<%= LangT %>" style="CURSOR:hand;"><%= LanguageName(LangT) %></a></li>
   <%Next%>
</ul>
<div id="tabcontentcontainer">
<%For LangT = 1 To TotalLang%>
   <div id="tcontent<%= LangT %>" class="tabcontent">
   <table cellspacing="0" cellpadding="4" width="100%" border="0" id="web_<%= LangT %>">
		<tr class="classrow">
		<td width="15%" class="classrow" height="30"><%=Lang_System(3)%></td>
		<td width="85%" class="classrow" height="30">
		<input type="text" name="sitename<%= LanguageTxt(LangT) %>" size="80" value="<%=rs("sitename" & LanguageTxt(LangT))%>" class="form">
		</td>
		</tr>
		<tr class="classrow">
		<td width="15%" class="classrow" height="30" valign="top" style="padding-top:6px"><%=Lang_sys(76)%></td>
		<td width="85%" class="classrow" height="30">
		<textarea name="sys_description<%= LanguageTxt(LangT) %>" id="sys_description<%= LanguageTxt(LangT) %>" rows="3" style="width:90%;" class="text"><%=trim(rs("sys_description" & LanguageTxt(LangT)))%></textarea>
		 <img src="images/help.gif" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(4)%>','50','up');" onmouseout="hidehintinfo();" /><br />
		 <a href="javascript:u_Size(-5,'sys_description<%= LanguageTxt(LangT) %>')"><img src="lang/<%=LangFilePath%>/images/tab/bt_close.gif" border='0'></a>
		 <a href="javascript:u_Size(5,'sys_description<%= LanguageTxt(LangT) %>')"><img src="lang/<%=LangFilePath%>/images/tab/bt_open.gif" border='0'></a>
		</td>
		</tr>
		<tr class="classrow">
		<td width="15%" class="classrow" height="30" valign="top" style="padding-top:6px"><%=Lang_sys(75)%></td>
		<td width="85%" class="classrow" height="30">
		<textarea name="sys_keywords<%= LanguageTxt(LangT) %>" id="sys_keywords<%= LanguageTxt(LangT) %>" rows="3" style="width:90%;" class="text"><%=trim(rs("sys_keywords" & LanguageTxt(LangT)))%></textarea>
		<img src="images/help.gif" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(4)%>','50','up');" onmouseout="hidehintinfo();" /><br />
		<a href="javascript:u_Size(-5,'sys_keywords<%= LanguageTxt(LangT) %>')"><img src="lang/<%=LangFilePath%>/images/tab/bt_close.gif" border='0'></a>
		<a href="javascript:u_Size(5,'sys_keywords<%= LanguageTxt(LangT) %>')"><img src="lang/<%=LangFilePath%>/images/tab/bt_open.gif" border='0'></a>
		</td>
		</tr>
		<tr class="classrow">
		<td width="15%" class="classrow" height="30"><%=Lang_System(10)%></td>
		<td width="85%" class="classrow" height="30">
		<input type="text" name="web<%= LanguageTxt(LangT) %>" size="35" value="<%=rs("web" & LanguageTxt(LangT))%>" class="form">
		<font color="#FF0000"><%=Lang_System(11)%></font></td>
		</tr>
		<tr class="classrow">
		<td width="15%" class="classrow" height="30"><%=Lang_System(7)%></td>
		<td width="85%" class="classrow" height="30">
		<input type="text" id="sys_logo<%= LanguageTxt(LangT) %>" name="sys_logo<%= LanguageTxt(LangT) %>" size="35" value="<%=rs("sys_logo" & LanguageTxt(LangT))%>" class="form"> <input type="button" id="Upload_sys_logo<%= LanguageTxt(LangT) %>" name="Submit" value="<%=Lang_sys(52)%>" onclick="uploadpanel('system','sys_logo<%= LanguageTxt(LangT) %>','logo')" class="btn_upload">
		<img src='images/img.gif' align='absmiddle' onMouseover="javascript:ddrivetip('<img src=../<%=trim(rs("sys_logo" & LanguageTxt(LangT)))%> width=100>', '#ffffff', '100')" onMouseout="hideddrivetip()">&nbsp;<a href="http://56770.55.la/" target="_blank"><span style="color:#ff0000"><%=Lang_System(8)%></font></a>
		</td>
		</tr>
		<tr class="classrow">
		<td width="15%" class="classrow" height="30" valign="top" style="padding-top:6px"><%=Lang_System(9)%></td>
		<td width="85%" class="classrow" height="30">
		<textarea name="sitecopy<%= LanguageTxt(LangT) %>" id="sitecopy<%= LanguageTxt(LangT) %>" rows="3" style="width:90%;" class="text"><%=LoadStyle("../include/Lebi_Data/SiteCopy"& LanguageTxt(LangT) &".data")%></textarea><br />
		<a href="javascript:u_Size(-5,'sitecopy<%= LanguageTxt(LangT) %>')"><img src="lang/<%=LangFilePath%>/images/tab/bt_close.gif" border='0'></a>
		<a href="javascript:u_Size(5,'sitecopy<%= LanguageTxt(LangT) %>')"><img src="lang/<%=LangFilePath%>/images/tab/bt_open.gif" border='0'></a>
		</td>
		</tr>
		<tr class="classrow">
		<td width="15%" class="classrow" height="30"><%=Lang_System(12)%></td>
		<td width="85%" class="classrow" height="30">
		<input type="text" name="sys_qq<%= LanguageTxt(LangT) %>" size="35" value="<%=rs("sys_qq"& LanguageTxt(LangT))%>" class="form">
		</td>
		</tr>
		<tr class="classrow">
		<td width="15%" class="classrow" height="30"><%=Lang_System(13)%></td>
		<td width="85%" class="classrow" height="30">
		<input type="text" name="sys_tel<%= LanguageTxt(LangT) %>" size="35" value="<%=rs("sys_tel"& LanguageTxt(LangT))%>" class="form">
		</td>
		</tr>
		<tr class="classrow">
		<td width="15%" class="classrow" height="30"><%=Lang_System(14)%></td>
		<td width="85%" class="classrow" height="30">
		<input type="text" name="fax<%= LanguageTxt(LangT) %>" size="35" value="<%=rs("fax"& LanguageTxt(LangT))%>" class="form">
		</td>
		</tr>
		<tr class="classrow">
		<td width="15%" class="classrow" height="30"><%=Lang_System(15)%></td>
		<td width="85%" class="classrow" height="30">
		<input type="text" name="mail<%= LanguageTxt(LangT) %>" size="35" value="<%=rs("mail"& LanguageTxt(LangT))%>" class="form">
		</td>
		</tr>
		<tr class="classrow">
		<td width="15%" class="classrow" height="30"><%=Lang_System(5)%></td>
		<td width="85%" class="classrow" height="30">
		<input type="text" name="name<%= LanguageTxt(LangT) %>" size="35" value="<%=rs("name" & LanguageTxt(LangT))%>" class="form">
		</td>
		</tr>
		<tr>
		<td colspan="2" class="classfaq">
		  <div class="faq_main">
		  <p class="faq_title"><%=Lang_sys(49)%></p>
		  <%=Lang_System(6)%>
		  </div>
		</td>
		</tr>
	</table>
	</div>
	<script>tdshow("web_<%= LangT %>");</script>
<%Next%>
</div>
</td>
</tr>
</table>
</div>
</div>
<div class="mainbody-block">
<div class="mainbody-block2">
<table cellspacing="0" cellpadding="0" width="100%" border="0" id="show_upload" class="classtable">
<tr>
<td height="30" colspan="2" class="classtop"><%=Lang_System(47)%></td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(112)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="0" <%=judge(arr_sys_Upload(13),"0")%> name="Upload_Dir"> <%=Lang_System(113)%>
	<input type="radio" value="1" <%=judge(arr_sys_Upload(13),"1")%> name="Upload_Dir"> <%=Lang_System(114)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(125)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="0" <%=judge(arr_sys_Upload(16),"0")%> name="Upload_SaveType"> <%=Lang_System(127)%>
	<input type="radio" value="1" <%=judge(arr_sys_Upload(16),"1")%> name="Upload_SaveType"> <%=Lang_System(128)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(126)%></td>
<td width="85%" class="classrow" height="30">
<INPUT TYPE="text" NAME="Upload_RName" size="30" value="<%=arr_sys_Upload(17)%>" class="form">
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(48)%></td>
<td width="85%" class="classrow" height="30">
<select name="Upload_type" id="Upload_type" onChange="chkselect(options[selectedIndex].value,'know2');">
          <option value="0" <%=judge2(arr_sys_Upload(0),"0")%>><%=Lang_System(49)%>
          <option value="1" <%=judge2(arr_sys_Upload(0),"1")%>><%=Lang_System(50)%>
          <option value="2" <%=judge2(arr_sys_Upload(0),"2")%>><%=Lang_System(51)%>
</select>&nbsp;<span id="know2"></span>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(52)%></td>
<td width="85%" class="classrow" height="30">
<SELECT name="Upload_isDraw" id="Upload_isDraw">
          <OPTION value="0" <%=judge2(arr_sys_Upload(1),"0")%>><%=Lang_System(19)%><%=Lang_System(53)%></OPTION>
          <OPTION value="1" <%=judge2(arr_sys_Upload(1),"1")%>><%=Lang_System(54)%></OPTION>
          <OPTION value="2" <%=judge2(arr_sys_Upload(1),"2")%>><%=Lang_System(55)%></OPTION>
          <OPTION value="3" <%=judge2(arr_sys_Upload(1),"3")%>><%=Lang_System(56)%></OPTION>
</SELECT> &nbsp;<%If IsObjInstalled("Persits.Jpeg") Then Response.Write "<font color=red>"& Lang_System(57) &"</font>" Else Response.Write Lang_System(58) %>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(120)%></td>
<td width="85%" class="classrow" height="30">
<%=Lang_System(71)%><INPUT TYPE="text" NAME="Upload_SPicWidth" size=5 value="<%=arr_sys_Upload(14)%>" class="form"> px
<%=Lang_System(72)%><INPUT TYPE="text" NAME="Upload_SPicHeight" size=5 value="<%=arr_sys_Upload(15)%>" class="form"> px
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(59)%></td>
<td width="85%" class="classrow" height="30">
<INPUT TYPE="text" NAME="Upload_Drawtext" size=30 value="<%=arr_sys_Upload(2)%>" class="form"> <img src="images/help.gif" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(110)%>','50','up');" onmouseout="hidehintinfo();" />
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(60)%></td>
<td width="85%" class="classrow" height="30">
<INPUT TYPE="text" NAME="Upload_Drawfontsize" size="7" value="<%=arr_sys_Upload(3)%>" class="form"> <b>px</b>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(61)%></td>
<td width="85%" class="classrow" height="30">
<INPUT TYPE="text" NAME="Upload_Drawcolor" ID="Upload_Drawcolor" size="7" value="<%=arr_sys_Upload(4)%>" class="form">
        <img border=0 id="s_Upload_Drawcolor" src="images/rect.gif" align="absmiddle" style="cursor:pointer;background-Color:<%=arr_sys_Upload(4)%>;"  onclick="colorcd('system','Upload_Drawcolor','Upload_Drawcolor')" title="<%=Lang_System(67)%>">
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(62)%></td>
<td width="85%" class="classrow" height="30">
<input type="text" name="Upload_Drawfont" size="15" value="<%=arr_sys_Upload(5)%>" class="form">
<SELECT name="s_Upload_Drawfont" onChange="(document.system.Upload_Drawfont.value=this.options[this.selectedIndex].value)">
          <option value="宋体">宋体</option>
          <option value="楷体_GB2312">楷体</option>
          <option value="新宋体">新宋体</option>
          <option value="黑体">黑体</option>
          <option value="隶书">隶书</option>
          <OPTION value="Andale Mono" selected>Andale Mono</OPTION>
          <OPTION value="Arial">Arial</OPTION>
          <OPTION value="Arial Black">Arial Black</OPTION>
          <OPTION value="Book Antiqua">Book Antiqua</OPTION>
          <OPTION value="Century Gothic">Century Gothic</OPTION>
          <OPTION value="Comic Sans MS">Comic Sans MS</OPTION>
          <OPTION value="Courier New">Courier New</OPTION>
          <OPTION value="Georgia">Georgia</OPTION>
          <OPTION value="Impact">Impact</OPTION>
          <OPTION value="Tahoma">Tahoma</OPTION>
          <OPTION value="Times New Roman" >Times New Roman</OPTION>
          <OPTION value="Trebuchet MS">Trebuchet MS</OPTION>
          <OPTION value="Script MT Bold">Script MT Bold</OPTION>
          <OPTION value="Stencil">Stencil</OPTION>
          <OPTION value="Verdana">Verdana</OPTION>
          <OPTION value="Lucida Console">Lucida Console</OPTION>
</SELECT>
<input type="checkbox" value="1" name="Upload_DrawFontBold" <%=judge(arr_sys_Upload(6),"1")%>> <%=Lang_System(63)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(64)%></td>
<td width="85%" class="classrow" height="30">
<INPUT TYPE="text" NAME="Upload_Drawpic" size="35" value="<%=arr_sys_Upload(7)%>" class="form"> <input type="button" id="Upload_Upload_Drawpic" name="Submit" value="<%=Lang_sys(52)%>" onclick="uploadpanel('system','Upload_Drawpic','water')" class="btn_upload"> <img src="images/help.gif" align="absmiddle" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(110)%>','50','up');" onmouseout="hidehintinfo();" />
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(65)%></td>
<td width="85%" class="classrow" height="30">
<INPUT TYPE="text" NAME="Upload_DrawGraph" size="7" value="<%=arr_sys_Upload(8)%>" class="form"> <img src="images/help.gif" align="absmiddle" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(111)%>','50','up');" onmouseout="hidehintinfo();" />
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(66)%></td>
<td width="85%" class="classrow" height="30">
<INPUT TYPE="text" NAME="Upload_Drawpiccolor" ID="Upload_Drawpiccolor" size="7" value="<%=arr_sys_Upload(9)%>" class="form">
        <img border=0 id="s_Upload_Drawpiccolor" src="images/rect.gif" align="absmiddle" style="cursor:pointer;background-Color:<%=arr_sys_Upload(9)%>;" onclick="colorcd('system','Upload_Drawpiccolor','Upload_Drawpiccolor')" title="<%=Lang_System(67)%>"> <img src="images/help.gif" align="absmiddle" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(68)%>','50','up');" onmouseout="hidehintinfo();" />
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(69)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="0" <%=judge(arr_sys_Upload(10),"0")%> name="Upload_DrawXYType"> <%=Lang_System(73)%>
	<input type="radio" value="1" <%=judge(arr_sys_Upload(10),"1")%> name="Upload_DrawXYType"> <%=Lang_System(74)%>
	<input type="radio" value="2" <%=judge(arr_sys_Upload(10),"2")%> name="Upload_DrawXYType"> <%=Lang_System(75)%>
	<input type="radio" value="3" <%=judge(arr_sys_Upload(10),"3")%> name="Upload_DrawXYType"> <%=Lang_System(76)%>
	<input type="radio" value="4" <%=judge(arr_sys_Upload(10),"4")%> name="Upload_DrawXYType"> <%=Lang_System(77)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(70)%></td>
<td width="85%" class="classrow" height="30">
<%=Lang_System(71)%><INPUT TYPE="text" NAME="Upload_DrawWidth" size=5 value="<%=arr_sys_Upload(11)%>" class="form"> px
<%=Lang_System(72)%><INPUT TYPE="text" NAME="Upload_DrawHight" size=5 value="<%=arr_sys_Upload(12)%>" class="form"> px
</td>
</tr>
</table>
</div>
</div>
<div class="mainbody-block">
<div class="mainbody-block2">
<table cellspacing="0" cellpadding="0" width="100%" border="0" id="show_mail" class="classtable">
<tr>
<td height="30" colspan="2" class="classtop"><%=Lang_System(24)%></td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(25)%></td>
<td width="85%" class="classrow" height="30">
	<select name="jmail_type" id="jmail_type" onChange="chkselect(options[selectedIndex].value,'know1');">
	<option value="0" <%=judge2(arr_sys_jmail(0),"0")%>><%=Lang_System(26)%></option>
	<option value="1" <%=judge2(arr_sys_jmail(0),"1")%>><%=Lang_System(27)%></option>
	<option value="2" <%=judge2(arr_sys_jmail(0),"2")%>><%=Lang_System(28)%></option>
	<option value="3" <%=judge2(arr_sys_jmail(0),"3")%>><%=Lang_System(29)%></option>
	</select> <img src="images/help.gif" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(30)%>','50','up');" onmouseout="hidehintinfo();" /> <span id=know1></span></td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(31)%></td>
<td width="85%" class="classrow" height="30">
<input type="text" name="jmail_smtp" size="35" value="<%=arr_sys_jmail(1)%>" class="form">
<%=Lang_System(32)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(33)%></td>
<td width="85%" class="classrow" height="30">
<input type="text" name="jmail_sendmail" size="35" value="<%=arr_sys_jmail(2)%>" class="form">
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(34)%></td>
<td width="85%" class="classrow" height="30">
<input type="password" name="jmail_sendpass" size="35" value="<%=arr_sys_jmail(3)%>" class="form">
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(35)%></td>
<td width="85%" class="classrow" height="30">
<input type="text" name="jmail_frommail" size="35" value="<%=arr_sys_jmail(5)%>" class="form">
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(36)%></td>
<td width="85%" class="classrow" height="30">
<input type="text" name="jmail_sendname" size="35" value="<%=arr_sys_jmail(4)%>" class="form">
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(37)%></td>
<td width="85%" class="classrow" height="30">
<%=Lang_System(38)%><input type="checkbox" value="1" <%=judge(arr_sys_jmail(6),"1")%> name="jmail_regon">
<%=Lang_System(39)%><input type="checkbox" value="1" <%=judge(arr_sys_jmail(7),"1")%> name="jmail_cashon">
<%=Lang_System(40)%><input type="checkbox" value="1" <%=judge(arr_sys_jmail(8),"1")%> name="jmail_cashoveron">
</td>
</tr>
</table>
</div>
</div>
<div class="mainbody-block">
<div class="mainbody-block2">
<table cellspacing="0" cellpadding="0" width="100%" border="0" id="show_invoice" class="classtable">
<tr>
<td height="30" colspan="2" class="classtop"><%=Lang_System(16)%></td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(17)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="1" <%=judge(Lebi_Config(2),"1")%> name="Lebi_Config2"> <%=Lang_System(18)%>
	<input type="radio" value="0" <%=judge(Lebi_Config(2),"0")%> name="Lebi_Config2"> <%=Lang_System(19)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(20)%></td>
<td width="85%" class="classrow" height="30">
<input type="text" name="Lebi_Config14" size="5" value="<%=Lebi_Config(14)%>" style="width:40px;" class="form">%
</td>
</tr>
</table>
</div>
</div>
<div class="mainbody-block">
<div class="mainbody-block2">
<table cellspacing="0" cellpadding="0" width="100%" border="0" id="show_reg" class="classtable">
<tr>
<td height="30" colspan="2" class="classtop"><%=Lang_System(21)%></td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(22)%></td>
<td width="85%" class="classrow" height="30"><input type="text" name="Lebi_Config0" size="5" value="<%=Lebi_Config(0)%>" class="form" onkeyup="value=value.replace(/[^\d\.]/g,'');">
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(23)%></td>
<td width="85%" class="classrow" height="30"><%=getGradeList(Lebi_Config(1))%></td>
</tr>
</table>
</div>
</div>
<div class="mainbody-block">
<div class="mainbody-block2">
<table cellspacing="0" cellpadding="0" width="100%" border="0" id="show_product" class="classtable">
<tr>
<td height="30" colspan="2" class="classtop"><%=Lang_System(41)%><a name="#12"></td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(42)%></td>
<td width="85%" class="classrow" height="30">
<input type="radio" value="1" <%=judge(Lebi_Config(3),"1")%> name="Lebi_Config3"> <%=Lang_System(18)%>
<input type="radio" value="0" <%=judge(Lebi_Config(3),"0")%> name="Lebi_Config3"> <%=Lang_System(19)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(43)%></td>
<td width="85%" class="classrow" height="30">
<input type="radio" value="1" <%=judge(Lebi_Config(4),"1")%> name="Lebi_Config4"> <%=Lang_System(18)%>
<input type="radio" value="0" <%=judge(Lebi_Config(4),"0")%> name="Lebi_Config4"> <%=Lang_System(19)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(44)%></td>
<td width="85%" class="classrow" height="30">
<input type="radio" value="1" <%=judge(Lebi_Config(5),"1")%> name="Lebi_Config5"> <%=Lang_System(18)%>
<input type="radio" value="0" <%=judge(Lebi_Config(5),"0")%> name="Lebi_Config5"> <%=Lang_System(19)%>
&nbsp;&nbsp;<%=Lang_System(46)%><input type="text" name="Lebi_Config6" size="5" value="<%=Lebi_Config(6)%>" class="form" onkeyup="value=value.replace(/[^\d\.]/g,'');">
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(45)%></td>
<td width="85%" class="classrow" height="30">
<input type="radio" value="1" <%=judge(Lebi_Config(7),"1")%> name="Lebi_Config7"> <%=Lang_System(18)%>
<input type="radio" value="0" <%=judge(Lebi_Config(7),"0")%> name="Lebi_Config7"> <%=Lang_System(19)%>
<!--
    上架时间小于 <input type="text" name="Lebi_Config8" size="5" value="<%=Lebi_Config(8)%>" class="form" onkeyup="value=value.replace(/[^\d\.]/g,'');"> 小时
	-->
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(93)%></td>
<td width="85%" class="classrow" height="30">
	<input type="text" value="<%=Lebi_Config(10)%>" name="Lebi_Config10" style="width:50px;" class="form" onkeyup="value=value.replace(/[^\d\.]/g,'');"> <%=Lang_System(95)%>
	<img src="images/help.gif" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(94)%>','50','up');" onmouseout="hidehintinfo();" />
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(123)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="0" <%=judge(Lebi_Config(23),"0")%> name="Lebi_Config23"> <%=Lang_System(124)%>
	<input type="radio" value="1" <%=judge(Lebi_Config(23),"1")%> name="Lebi_Config23"> <%=Lang_System(129)%>
	<input type="radio" value="2" <%=judge(Lebi_Config(23),"2")%> name="Lebi_Config23"> <%=Lang_System(130)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(121)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="1" <%=judge(Lebi_Config(22),"1")%> name="Lebi_Config22"> <%=Lang_System(18)%>
	<input type="radio" value="0" <%=judge(Lebi_Config(22),"0")%> name="Lebi_Config22"> <%=Lang_System(19)%>
	<img src="images/help.gif" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(122)%>','50','up');" onmouseout="hidehintinfo();" />
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(90)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="_blank" <%=judge(Lebi_Config(9),"_blank")%> name="Lebi_Config9"> <%=Lang_System(18)%><%=Lang_System(91)%>
	<input type="radio" value="_self" <%=judge(Lebi_Config(9),"_self")%> name="Lebi_Config9"> <%=Lang_System(92)%>
</td>
</tr>
</table>
</div>
</div>
<div class="mainbody-block">
<div class="mainbody-block2">
<table cellspacing="0" cellpadding="0" width="100%" border="0" id="show_code" class="classtable">
<tr>
<td height="30" colspan="2" class="classtop"><%=Lang_System(78)%></td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(79)%></td>
<td width="85%" class="classrow" height="30">
<input type="radio" value="1" <%=judge(Lebi_Config(11),"1")%> name="Lebi_Config11"> <%=Lang_System(18)%> <input type="radio" value="0" <%=judge(Lebi_Config(11),"0")%> name="Lebi_Config11"> <%=Lang_System(19)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(80)%></td>
<td width="85%" class="classrow" height="30">
<input type="radio" value="1" <%=judge(Lebi_Config(12),"1")%> name="Lebi_Config12"> <%=Lang_System(18)%>
<input type="radio" value="0" <%=judge(Lebi_Config(12),"0")%> name="Lebi_Config12"> <%=Lang_System(19)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(81)%></td>
<td width="85%" class="classrow" height="30">
<input type="radio" value="1" <%=judge(Lebi_Config(13),"1")%> name="Lebi_Config13"> <%=Lang_System(18)%>
<input type="radio" value="0" <%=judge(Lebi_Config(13),"0")%> name="Lebi_Config13"> <%=Lang_System(19)%>
</td>
</tr>
</table>
</div>
</div>
<div class="mainbody-block">
<div class="mainbody-block2">
<table cellspacing="0" cellpadding="0" width="100%" border="0" id="show_ship" class="classtable">
<tr>
<td height="30" colspan="2" class="classtop"><%=Lang_System(82)%></td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(83)%></td>
<td width="85%" class="classrow" height="30">
<input type="radio" value="0" <%=judge(Lebi_Config(15),"0")%> name="Lebi_Config15"> <%=Lang_System(84)%> <input type="radio" value="1" <%=judge(Lebi_Config(15),"1")%> name="Lebi_Config15"> <%=Lang_System(85)%>
</td>
</tr>
</table>
</div>
</div>
<div class="mainbody-block">
<div class="mainbody-block2">
<table cellspacing="0" cellpadding="0" width="100%" border="0" id="show_filter" class="classtable">
<tr>
<td height="30" colspan="2" class="classtop"><%=Lang_System(86)%></td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30" valign="top" style="padding-top:6px"><%=Lang_System(87)%></td>
<td width="85%" class="classrow" height="30">
<textarea name="word_filter" id="word_filter" rows="3" style="width:90%" class="text"><%=word_filter%></textarea> <img src="images/help.gif" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(88)%>','50','up');" onmouseout="hidehintinfo();" /><br />
<a href="javascript:u_Size(-10,'word_filter')"><img src="lang/<%=LangFilePath%>/images/tab/bt_close.gif" border='0'></a>
<a href="javascript:u_Size(10,'word_filter')"><img src="lang/<%=LangFilePath%>/images/tab/bt_open.gif" border='0'></a></td>
</tr>
</table>
</div>
</div>
<div class="mainbody-block">
<div class="mainbody-block2">
<table cellspacing="0" cellpadding="0" width="100%" border="0" id="show_other" class="classtable">
<tr>
<td height="30" colspan="2" class="classtop"><%=Lang_System(89)%></td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(133)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="0" <%=judge(rs("sys_soft"),"0")%> name="sys_soft"> <%=Lang_System(134)%>
	<input type="radio" value="1" <%=judge(rs("sys_soft"),"1")%> name="sys_soft"> <%=Lang_System(135)%>
	<em><%=Lang_System(136)%></em>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(96)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="0" <%=judge(Lebi_Config(16),"0")%> name="Lebi_Config16" onclick="javascript:document.getElementById('mes_Lebi_Config16').innerHTML='<font color=#ff0000><%=Lang_System(97)%></font>'"> <%=Lang_System(98)%>
	<input type="radio" value="1" <%=judge(Lebi_Config(16),"1")%> name="Lebi_Config16" onclick="javascript:document.getElementById('mes_Lebi_Config16').innerHTML='<font color=#ff0000><%=Lang_System(97)%></font>'"> <%=Lang_System(99)%>
	<input type="radio" value="2" <%=judge(Lebi_Config(16),"2")%> name="Lebi_Config16" onclick="javascript:document.getElementById('mes_Lebi_Config16').innerHTML='<font color=#ff0000><%=Lang_System(97)%></font>'"> <%=Lang_System(100)%>
	<span id="mes_Lebi_Config16"></span>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(101)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="0" <%=judge(Lebi_Config(17),"0")%> name="Lebi_Config17"> <%=Lang_System(102)%>
	<input type="radio" value="1" <%=judge(Lebi_Config(17),"1")%> name="Lebi_Config17"> <%=Lang_System(103)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(107)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="0" <%=judge(Lebi_Config(19),"0")%> name="Lebi_Config19"> <%=Lang_System(108)%>
	<input type="radio" value="1" <%=judge(Lebi_Config(19),"1")%> name="Lebi_Config19"> <%=Lang_System(109)%>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(104)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="1" <%=judge(Lebi_Config(18),"1")%> onclick="document.getElementById('$_news').style.display='inline';" name="Lebi_Config18"> <%=Lang_System(18)%>
	<input type="radio" value="0" <%=judge(Lebi_Config(18),"0")%> onclick="document.getElementById('$_news').style.display='none';" name="Lebi_Config18"> <%=Lang_System(19)%>
	<span id="$_news" style="padding-left:5px;display:<%if Lebi_Config(18)="0" then Response.Write"none" %>"><%=Lang_System(105)%> <input type="text" value="<%=Lebi_Config(20)%>" name="Lebi_Config20" style="width:50px;" class="form" onkeyup="value=value.replace(/[^\d\.]/g,'');"></span>
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(115)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="1" <%=judge(Lebi_Config(21),"1")%> name="Lebi_Config21"> <%=Lang_System(18)%>
	<input type="radio" value="0" <%=judge(Lebi_Config(21),"0")%> name="Lebi_Config21"> <%=Lang_System(19)%>
	<img src="images/help.gif" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(116)%>','50','up');" onmouseout="hidehintinfo();" />
</td>
</tr>
<tr class="classrow">
<td width="15%" class="classrow" height="30"><%=Lang_System(118)%></td>
<td width="85%" class="classrow" height="30">
	<input type="radio" value="htm" <%=judge(rs("sys_ext"),"htm")%> name="sys_ext"> htm
	<input type="radio" value="html" <%=judge(rs("sys_ext"),"html")%> name="sys_ext"> html
	<input type="radio" value="shtml" <%=judge(rs("sys_ext"),"shtml")%> name="sys_ext"> shtml
	<input type="radio" value="asp" <%=judge(rs("sys_ext"),"asp")%> name="sys_ext"> asp
	<img src="images/help.gif" onmouseover="showhintinfo(this,0,0,'','<%=Lang_System(119)%>','50','up');" onmouseout="hidehintinfo();" />
</td>
</tr>
<tr>
  <td height="30" colspan="2" align="left" class="classfooter"><input name="submit" type="image" src="lang/<%=LangFilePath%>/images/bt_app.gif" title=" <%=Lang_sys(1)%> " align="absmiddle">&nbsp;<input type="image" src="lang/<%=LangFilePath%>/images/bt_res.gif" title=" <%=Lang_sys(2)%> " onclick="reset();return false;" align="absmiddle"></td>
 </tr>
</form>
</table>
<span id="Issubport0" style="display:none"><%=Lang_System(26)%>！</span>
<%
Dim InstalledObjects(12)
InstalledObjects(1) = "JMail.Message"				'JMail 4.3
InstalledObjects(2) = "CDONTS.NewMail"				'CDONTS
InstalledObjects(3) = "Persits.MailSender"			'ASPEMAIL
'-----------------------
InstalledObjects(4) = "Adodb.Stream"				'Adodb.Stream
InstalledObjects(5) = "Persits.Upload"				'Aspupload3.0
InstalledObjects(6) = "SoftArtisans.FileUp"			'SA-FileUp 4.0
InstalledObjects(7) = "DvFile.Upload"				'DvFile-Up V1.0
'-----------------------
InstalledObjects(9) = "CreatePreviewImage.cGvbox"	'CreatePreviewImage
InstalledObjects(10) = "Persits.Jpeg"				'AspJpeg
InstalledObjects(11) = "Persits.Jpeg"		'SoftArtisans ImgWriter V1.21
InstalledObjects(12) = "sjCatSoft.Thumbnail"		'sjCatSoft.Thumbnail V2.6
For i=1 to 12
	Response.Write "<span id=""Issubport"&i&""" style=""display:none"">"
	If IsObjInstalled(InstalledObjects(i)) Then Response.Write "<font color=red><b>√</b></font>" Else Response.Write "<b>×</b>"& Lang_System(26) &""
	Response.Write "</span>"
Next
%>
<script language="javascript">
showtabcontent("tablist");tdshow("show_upload");tdshow("show_mail");tdshow("show_invoice");tdshow("show_reg");tdshow("show_product");tdshow("show_code");tdshow("show_ship");tdshow("show_filter");tdshow("show_other");
function chkselect(s,divid)
{
var divname='Issubport';
var chkreport;
	s=Number(s)
	if (divid=="know1")
	{
	divname=divname+s;
	}
	if (divid=="know2")
	{
	s+=4;
	if (s==1003){s=999;}
	divname=divname+s;
	}
	if (divid=="know3")
	{
	s+=9;
	if (s==1008){s=999;}
	divname=divname+s;
	}
document.getElementById(divid).innerHTML=divname;
chkreport=document.getElementById(divname).innerHTML;
document.getElementById(divid).innerHTML=chkreport;
}
</script>
<%
rs.close : set rs=Nothing
end If
Response.Write("</div>")
Response.Write("</div>")
LB_Footer()

Function IsObjInstalled(strClassString)
	On Error Resume Next
	IsObjInstalled = False
	Err = 0
	Dim xTestObj
	Set xTestObj = Server.CreateObject(strClassString)
	If Err = 0 Then IsObjInstalled = True
	If Err = -2147352567 Then IsObjInstalled = True
	Set xTestObj = Nothing
	Err = 0
End Function

rem	<-{ 获得会员组等级下拉菜单 2008-3-5 by Lebi.WangLei
Function getGradeList(dj)
	getGradeList = "<SELECT NAME=""Lebi_Config1"" id=""Lebi_Config1"">"
	sql="select grade_name,grade_dj from [Lebi_user_grade] where grade_dj <> 0 order by grade_dj"
	Set rs_ig = conn.execute(sql)
	If Not rs_ig.eof Then
		Do While Not rs_ig.eof
				getGradeList = getGradeList & "<option value="""&rs_ig("grade_dj")&""" "
				if CLng(checknum(dj,0))=CLng(rs_ig("grade_dj")) then getGradeList = getGradeList & " selected "
				getGradeList = getGradeList & ">"&rs_ig("grade_name")&"</option>"
			rs_ig.movenext
		Loop
	Else
		getGradeList = getGradeList & "<option value=""0"">"& Lang_System(106) &"</option>"
	End If
	rs_ig.close : Set rs_ig = Nothing
	getGradeList = getGradeList & "</SELECT>"
End Function
rem	}->

Function LoadStyle(strFile)
		On Error Resume Next
		Dim strTempPath,objFSO,objStm
		strTempPath = Server.MapPath(strFile)
		Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
		Set objStm = Server.CreateObject("ADODB.Stream")
			If objFso.FileExists(strTempPath) Then
				objStm.charset = "UTF-8"
				objStm.open
				objStm.LoadFromFile strTempPath
				LoadStyle = objStm.ReadText
			End If
		Set objStm = Nothing
		Set objFSO = Nothing
		If Err Then
			    Err.Clear
		End If
End Function
%>