<!--#include file="../conn.asp"-->
<!--#include file="../inc/md5.asp"-->
<!--#include file="inc/inc.asp"-->
<!--#include file="../inc/inc.asp"-->
<!--#include file="admin_page_top.asp"-->
<!--#include file="common/admin_setcon_inc.asp"-->
<%
Login_Judge
nowtit="系統基本信息設置"
powerid=100
Ispower powerid & "2"
Dim Domains,Website,Logopic,Superadmin,CookiesKey
action=che(request("action"))
Dim nows(5)
Dim nowlm(5)
Dim temp_restr(5)
nows(0)="網站名稱"
nows(1)="網站域名"
nows(2)="網站介紹"
nows(3)="Logo圖標"
nows(4)="初始帳號"
nows(5)="Cookies密鑰"
nowlm(0)="SiteName"
nowlm(1)="Domains"
nowlm(2)="Website"
nowlm(3)="Logopic"
nowlm(4)="Superadmin"
nowlm(5)="CookiesKey"
If action="mod" Then
	jstable
	set rs=server.createobject("adodb.recordset")
	sql=Sqlinfo("*","websys","","","","")
	rs.Open Sql, Conn, 1, 3
	If Not rs.Eof Then
		sqltable
		rs.Update
	End If
	rs.close
	rightmsg "?",""
Else
	restit nowtit,""
	editinfos		
End If
Erase nowlm
Erase nows
Erase temp_restr
%>
<!--#include file="admin_page_footer.asp"-->