<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% If request.Form("submit") = "确认修改" Then Set rs = server.CreateObject("adodb.recordset") sql = "select * from mj_site" rs.Open sql, conn, 1, 3 rs("mj_site_name") = request.Form("mj_site_name") rs("mj_site_url") = request.Form("mj_site_url") rs("mj_site_keywords") = request.Form("mj_site_keywords") rs("mj_site_description") = request.Form("mj_site_description") rs("mj_site_copyright") = request.Form("mj_site_copyright") rs("mj_site_n") = request.Form("mj_site_n") rs("mj_site_y") = request.Form("mj_site_y") rs("mj_site_r") = request.Form("mj_site_r") rs("mj_site_s") = request.Form("mj_site_s") rs("mj_site_bt") = request.Form("mj_site_bt") rs("mj_site_guestbookms") = request.Form("mj_site_guestbookms") rs.update Call close_rs Call close_conn Call infoback("网站信息修改成功！") End If %>

系统设置

当前位置：系统设置

在这里，您可以根据您的网站要求，修改设置网站的基本参数！
包括网站名称，网址，版权信息，关键词，等。

系统参数设置

<% Set rs = server.CreateObject("adodb.recordset") sql = "select * from mj_site" rs.Open sql, conn, 1, 1 %> <% Call close_rs Call close_conn %>

设定网站名称：		" size="50" />
网站访问地址：		" size="50" />
开始相爱日子：		" size="5" maxlength="4" /> 年 " size="3" maxlength="2" /> 月 " size="3" maxlength="2" /> 日 " size="3" maxlength="2" /> 时 " size="20" maxlength="20" /> 相爱的标题
网站关键字：		" size="100" />
关键字描述：		" size="100" />
留言审核：		checked="checked"<%end if%>> 开 checked="checked"<%end if%>> 关
版权信息：		<% Set oFCKeditor = New FCKeditor oFCKeditor.BasePath = "fckeditor/" oFCKeditor.ToolbarSet = "Default" oFCKeditor.Width = "100%" oFCKeditor.Height = "200" oFCKeditor.Value = rs("mj_site_copyright") oFCKeditor.Create "mj_site_copyright" %>