<!--#include file="../../conn.asp"-->
<!--#include file="admin.asp"-->
<%Call head()

If Request("SubmitFlag") <> "" Then
     
'----------------------------------------------------------------
'			生成dypz.asp文件
'----------------------------------------------------------------
dim YD_Config,YD_File

YD_File= Server.MapPath("admin.asp")'生成admin.asp文件路径

YD_Config="<%"

YD_Config=YD_Config+chr(13)&chr(10)&"dyhyy="""&Request.Form("dyhyy")&""" '欢迎语"

YD_Config=YD_Config+chr(13)&chr(10)&"dybt="""&Request.Form("dybt")&""" '标题"

YD_Config=YD_Config+chr(13)&chr(10)&"kaikejbb="""&Request.Form("kaikejbb")&""" '开垦币数"

YD_Config=YD_Config+chr(13)&chr(10)&"salekjb="""&Request.Form("salekjb")&""" '出售抽水"

YD_Config=YD_Config+chr(13)&chr(10)&"%"&">"
Call CreatedTextFiles(YD_File,YD_Config)
Call cardz("正在返回","dypz.asp?sid="&sid&"&amp;saytk="&saytk&"")
%>配置成功,正在返回...<%

Else

Call saycardd("农场前台配置")
If saytk>1 Then 
%>
<form name="form" method="post" action="dypz.asp?SubmitFlag=true&amp;sid=<%=sid%>&amp;saytk=<%=saytk%>">

标题:<input name="dybt" type="text" value="<%=ubb1(dybt)%>"/><br/>
欢迎语:<input name="dyhyy" type="text" value="<%=ubb1(dyhyy)%>"/><br/>
开垦一块地所需<%=getcent%>:<br/><input name="kaikejbb" type="text" value="<%=ubb1(kaikejbb)%>"/><br/>
出售抽水:<input name="salekjb" type="text" value="<%=ubb1(salekjb)%>"/>(请填如:0.1)<br/>
<%
response.write "<input type=""submit"" name=""Submit"" value=""配置文件""></form><br/>"
else%>
标题:<input name="dybt<%=minute(now)%><%=second(now)%>" type="text" value="<%=ubb1(dybt)%>"/><br/>
欢迎语:<input name="dyhyy<%=minute(now)%><%=second(now)%>" type="text" value="<%=ubb1(dyhyy)%>"/><br/>
开垦一块地所需<%=getcent%>:<br/><input name="kaikejbb<%=minute(now)%><%=second(now)%>" type="text" value="<%=ubb1(kaikejbb)%>"/><br/>
出售抽水:<input name="salekjb<%=minute(now)%><%=second(now)%>" type="text" value="<%=ubb1(salekjb)%>"/>(请填如:0.1)<br/>
<anchor>[配置文件]
<go href="dypz.asp?SubmitFlag=true&amp;sid=<%=sid%>&amp;saytk=<%=saytk%>" method="post">
<postfield name="dyhyy" value="$(dyhyy<%=minute(now)%><%=second(now)%>)"/>
<postfield name="dybt" value="$(dybt<%=minute(now)%><%=second(now)%>)"/>
<postfield name="kaikejbb" value="$(kaikejbb<%=minute(now)%><%=second(now)%>)"/>
<postfield name="salekjb" value="$(salekjb<%=minute(now)%><%=second(now)%>)"/>

</go>
</anchor>
<%end if%>
<%end if%><br/>
<a href="index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[返回农场]</a><br/>
<%Call head1()%>