<!-- #include file="conn.asp" -->
<!-- #include file="admin.asp" -->
<%call ling()
Call Head%>
<%If Request("SubmitFlag") <> "" Then

       
'----------------------------------------------------------------
'			生成configsell.asp文件
'----------------------------------------------------------------
dim YD_Config,YD_File

YD_File= Server.MapPath("/inc/pz/configreg.asp")'生成configreg.asp文件路径

YD_Config="<%"

YD_Config=YD_Config+chr(13)&chr(10)&"regxy="""&Request.Form("regxy")&""" '注册协议"

YD_Config=YD_Config+chr(13)&chr(10)&"reggxjs="""&Request.Form("reggxjs")&""" '个人介绍"

YD_Config=YD_Config+chr(13)&chr(10)&"reggxqm="""&Request.Form("reggxqm")&""" '个性签名"

YD_Config=YD_Config+chr(13)&chr(10)&"regby1="""&Request.Form("regby1")&""" '备用"

YD_Config=YD_Config+chr(13)&chr(10)&"regby2="""&Request.Form("regby2")&""" '备用"
YD_Config=YD_Config+chr(13)&chr(10)&"regby3="""&Request.Form("regby3")&""" '备用"
YD_Config=YD_Config+chr(13)&chr(10)&"regby4="""&Request.Form("regby4")&""" '备用"
YD_Config=YD_Config+chr(13)&chr(10)&"regby5="""&Request.Form("regby5")&""" '备用"
YD_Config=YD_Config+chr(13)&chr(10)&"%"&">"
Call CreatedTextFiles(YD_File,YD_Config)
Call cardz("配置成功","saytkpz.asp?sid="&sid&"&amp;saytk="&saytk&"")

Response.Write "成功设置！正在返回..."
Else
Call saycardd("注册配置")
%>
<%if saytk>1 then
Response.write "<form name=""form"" method=""post"" action=""configreg.asp?SubmitFlag=true&amp;sid="&sid&"&amp;saytk="&saytk&""">"%>
注册协议:<input name="regxy" type="text" value="<%=ubb1(regxy)%>"/><br/>
个人介绍:<input name="reggxjs" type="text" value="<%=ubb1(reggxjs)%>"/><br/>
个性签名:<input name="reggxqm" type="text" value="<%=ubb1(reggxqm)%>"/><br/>
备用:<input name="regby1" type="text" value="<%=ubb1(regby1)%>"/><br/>
备用:<input name="regby2" type="text" value="<%=ubb1(regby2)%>"/><br/>
<input type="submit" name="Submit" value="确定配置"></form>
<%else%>
注册协议:<input name="regxy<%=minute(now)%><%=second(now)%>" type="text" value="<%=ubb1(regxy)%>"/><br/>
个人介绍:<input name="reggxjs<%=minute(now)%><%=second(now)%>" type="text" value="<%=ubb1(reggxjs)%>"/><br/>
个性签名:<input name="reggxqm<%=minute(now)%><%=second(now)%>" type="text" value="<%=ubb1(reggxqm)%>"/><br/>
备用:<input name="regby1<%=minute(now)%><%=second(now)%>" type="text" value="<%=ubb1(regby1)%>"/><br/>
备用:<input name="regby2<%=minute(now)%><%=second(now)%>" type="text" value="<%=ubb1(regby2)%>"/><br/>
<anchor>[配置文件]
<go href="configreg.asp?SubmitFlag=true&amp;sid=<%=sid%>&amp;saytk=<%=saytk%>" method="post">
<postfield name="regxy" value="$(regxy<%=minute(now)%><%=second(now)%>)"/>
<postfield name="reggxjs" value="$(reggxjs<%=minute(now)%><%=second(now)%>)"/>
<postfield name="reggxqm" value="$(reggxqm<%=minute(now)%><%=second(now)%>)"/>
<postfield name="regby1" value="$(regby1<%=minute(now)%><%=second(now)%>)"/>
<postfield name="regby2" value="$(regby2<%=minute(now)%><%=second(now)%>)"/>
</go>
</anchor>
<%end if%>
<%end if%>

|<a href="bfsave.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>&amp;turl=../inc/pz/configreg.asp&amp;zurl=bfconfig/configreg.asp&amp;url=<%=replace(r_url,"&","@@")%>&amp;add=1">备份</a>|<a href="bfsave.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>&amp;turl=bfconfig/configreg.asp&amp;zurl=../inc/pz/configreg.asp&amp;url=<%=replace(r_url,"&","@@")%>">恢复</a>
<br/>

<br/>
<a href="saytkpz.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[配置中心]</a><br/>
<a href="index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[后台管理]</a><br/>
<%call headsay()%>
