<!--#include file="../tgzcm.Cache/tgzcm.Config.asp" -->
<!--#include file="../tgzcm.Include/tgzcm.Funciton.asp"-->
<!--#include file="../tgzcm.Include/tgzcm.Security.asp" -->
<!--#include file="tgzcm_Check.asp"-->
<%
Dim action,i,config,html
action=Trim(Request.QueryString("action"))

If action="add" then 
	Call config_add
Else
	Call config_main
End If

Sub config_add
	config=""'初始化变量
	For i=0 to 19
	tgzcm(i)=tgzcm_replace(Request.Form("tgzcm("&i&")"))
	config=config&"tgzcm("&i&")="""&tgzcm(i)&""""&vbcrlf
	Next
	html="<%"&vbcrlf
	html=html&"dim tgzcm(20)"&vbcrlf
	html=html&config
	html=html&"%"&">"
	MakeHtml"../tgzcm.Cache/tgzcm.Config.asp",html'生成网站配置文件
	response.redirect"?"
End Sub
%><%Sub config_main%><html>
<head>
<meta http-equiv="content-type" content="text/html; charset=gb2312" />
<TITLE>管理页面</TITLE>
<link href="skins/css/tgzcm_main.css" rel="stylesheet" type="text/css" />
</head>
<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<form name="form1" method="post" action="?action=add">
<tr> 
<th colspan=5 style="text-align:center;"><strong>网站基本参数配置</strong></th>
</tr>
<tr >
<td width="150" class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF">网站名称：</td>
<td colspan="3" class="td1" style="padding-left:10px"><input name="tgzcm(0)" type="text" style="width:200px; text-align:left;" value="<%=tgzcm(0)%>"></td>
</tr>
<tr >
<td width="150" class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF">网站地址：</td>
<td colspan="3" class="td1" style="padding-left:10px"><input name="tgzcm(1)" type="text" style="width:200px; text-align:left;" value="<%=tgzcm(1)%>">  
   二级目录写法 http://huitongsoft.com/abc不正确的写法将产生相关错误</td>
</tr>
<tr >
<td width="150" class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF">站长信箱：</td>
<td colspan="3" class="td1" style="padding-left:10px"><input name="tgzcm(2)" type="text" style="width:200px; text-align:left;" value="<%=tgzcm(2)%>"></td>
</tr>
<tr >
<td width="150" class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF">后台认证码：</td>
<td colspan="3" class="td1" style="padding-left:10px"><input name="tgzcm(3)" type="text" style="width:200px; text-align:left;" value="<%=tgzcm(3)%>"></td>
</tr>
<tr >
<td width="150" class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF">数据库选择：</td>
<td colspan="3" class="td1" style="padding-left:10px"><input name="tgzcm(4)" type="text" style="width:200px; text-align:left;" value="<%=tgzcm(4)%>">
  ACCESS/SQL</td>
</tr>
<tr >
<td width="150" class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF">ACC数据库路径：</td>
<td colspan="3" class="td1" style="padding-left:10px"><input name="tgzcm(5)" type="text" style="width:200px; text-align:left;" value="<%=tgzcm(5)%>"></td>
</tr>

<tr> 
<th colspan=5 style="text-align:center;"><strong>网站前台样式配置</strong></th>
</tr>

<tr >
<td width="150" class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF">风格目录设置：</td>
<td colspan="3" class="td1" style="padding-left:10px"><Select name="tgzcm(12)" style="width:100;"><%For i=0 to ubound(Split(GetFolders("../Skin/"),","))-1%><option value="<%=Split(GetFolders("../Skin/"),",")(i)%>"<%If Trim(tgzcm(12))=Trim(split(getfolders("../Skin/"),",")(i))  Then%> selected<%End If%>><%=Split(GetFolders("../Skin/"),",")(i)%></option><%Next%></Select></td>
</tr>
<tr >
<td width="150" class="td2" style="text-align:right; border-bottom:1px solid #FFFFFF">网站运行模式：</td>
<td colspan="3" class="td1" style="padding-left:10px"><input type="radio" name="tgzcm(17)" style="border:none" value="asp" <%if tgzcm(17)="asp" then Response.Write"checked"%>>Asp <input type="radio" name="tgzcm(17)" style="border:none" value="html" <%if tgzcm(17)="html" then Response.Write"checked"%>>Html <input type="radio" name="tgzcm(17)" style="border:none" value="asphtml" <%if tgzcm(17)="asphtml" then Response.Write"checked"%>>伪静态 <a href="tgzcm_Html.asp"><font color="red">详细参数配置</font></a></td>
</tr>
<tr> 
<th colspan=5 style="text-align:center; height:40px;"><input type="submit" value="确认更新" /></th>
</tr>
</form>
</table>
</body>
</html><%end Sub%>