<!--#include file="conn.asp"-->
<!--#include file="../inc/function.asp"-->
<!--#include file="../config.asp"-->
<%
dim rs,sql
if request("kqiqi")="saveweb" then
set rs=server.createobject("adodb.recordset")
sql = "select * from config"
rs.open sql,conn,1,3
rs("title")=HtmlEncode(trim(request("title")))
rs.update
rs.close
set rs=nothing
response.write "<script language=JavaScript>" & chr(13) & "alert('成功！')</script>"
response.write "<meta http-equiv=refresh content=""1;URL=?"">"
end if
%>
<body topmargin="0" leftmargin="0">


<%if request.QueryString("mkjle")="mkj" then %>
<form name="form1" method="POST" action="?kqiqi=saveweb">
<table width="100%">
<tr> 
<td  height="40" bgcolor="#FFFFFF" width="237">
</td>
<td  width="951"  height="50" colspan="2" bgcolor="#FFFFFF">注：系统函数调用执行文件页！
</td>
</tr>
<tr> 
<td align="right" height="29" bgcolor="#FFFFFF">
</td>
<td height="29" bgcolor="#FFFFFF">

<input type="text" name="title" value="<%=title%>" size="39">
</td>
<td bgcolor="#FFFFFF">&nbsp;<input type="submit" value="保存" name="B1"></td>
</tr>
</table>
</form>
<% end if %>
</body>
</html>