<!--#include file="conn/conn.asp" -->
<!--#include file="conn/function.asp" -->
<%
Function ChkInvaildWord(Words) 
Const InvaildWords="'|;|<|>|-"
ChkInvaildWord=True 
InvaildWord=Split(InvaildWords,"|") 
inWords=LCase(Trim(Words)) 
For i=LBound(InvaildWord) To UBound(InvaildWord) 
If Instr(inWords,InvaildWord(i))>0 Then 
ChkInvaildWord=True 
Exit Function 
End If 
Next 
ChkInvaildWord=False 
End Function
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="X-UA-Compatible" content="IE=edge" />
<title>网站初始化设置</title>
<script src="http://apps.bdimg.com/libs/jquery/2.1.1/jquery.min.js"> </script>
<style>
body{ background:url(admin/images/login_bgx.gif); font-family:"微软雅黑"; font-size:12px;}
.div{position:absolute;left: 50%;top:100px;margin: 0 0px 100px -300px;padding:0 20px 20px 20px;overflow:hidden;width:600px; text-align:center;box-shadow:0px 0px 20px #999999; background:url(images/install_top.png) no-repeat;background-color:#FFFFFF; }
.input1 {border-top:1px solid #ABADB3;border-left:1px solid #ABADB3;border-right:1px solid #ddd;border-bottom:1px solid #ddd;height:24px;width:300px;padding:0 5px;}
.input2 {border:1px solid #FFB334;outline:2px solid #ffdc97;*border:2px solid #FFB334;*padding:2px 5px;height:24px;width:300px;padding:0 5px;}
.submit{ width:131px;height:34px; border:hidden; font-family:"微软雅黑";color:#FFFFFF;background-image:url(images/btn.png);cursor:hand;font-size:15px; margin-top:10px;}
.submit2{ width:131px;height:34px; border:hidden; font-family:"微软雅黑";color:#FFFFFF;background-image:url(images/btn2.png);cursor:hand;font-size:15px;margin-top:10px;}
</style>
</head>

<body>
<%
C_installdir=split(Request.ServerVariables("PATH_INFO"),"install.asp")(0)
if C_first=0 then
call box("初始化已设置完毕！","index.asp","success")
end if
action=Request.QueryString("action")
if action="save" then

database=Request.Form("database")

select case database 
case "access"

	sitename1=Request.Form("sitename1")
	A_login1=Request.Form("A_login1")
	A_pwd1=md5(Request.Form("A_pwd1"))
	database1=split(Request.Form("database1"),".")(0)
	admin_dir1=Request.Form("admin_dir1")
	web_dir1=Request.Form("web_dir1")
session("set_login")=Request.Form("A_login1")
session("set_pwd")=Request.Form("A_pwd1")
	
	if admin_dir1="admin" then
		call box("请用一个较安全的后台管理目录名称，不要用默认的admin","back","error")
	end if
	
	if ChkInvaildWord(Request.Form("A_login")) or ChkInvaildWord(Request.Form("A_pwd")) then
	call box("用户名或密码设置包含敏感字符，请重新设置!","back","error")
	end if
	
	sql="Update SL_config set C_title='"&sitename1&"',C_admin='"&admin_dir1&"',C_first=0,C_time='"&now()&"',C_dir='"&web_dir1&"'"
	conn.execute(sql)
	conn.execute("delete from SL_admin")
	conn.execute("Insert into SL_admin(A_login,A_pwd,A_part) values('"&A_login1&"','"&A_pwd1&"','1|1|1|1|1|1|1|1|1|1|1|1|1|1|1')")
	conn.close()
   set conn=nothing

olddatabase="data/#data.mdb"
newdatabase="data/"&database1&".mdb"

conn1=ReadFromTextFile ("conn/conn.asp","utf-8")
conn1=replace(conn1,olddatabase,newdatabase)
call WriteToTextFile("conn/conn.asp",conn1,"utf-8")  

conn2=ReadFromTextFile ("conn/conn2.asp","utf-8")
conn2=replace(conn2,olddatabase,newdatabase)
call WriteToTextFile("conn/conn2.asp",conn2,"utf-8")  

    Set fsox = CreateObject("scripting.filesystemobject")
	fsox.GetFile(Server.MapPath("data/#data.mdb")).name=database1&".mdb"
	fsox.GetFolder(Server.MapPath("admin")).name=admin_dir1
	
	Set fsox=nothing
	call box("网站安装成功！",admin_dir1&"/admin_login.asp","success")
	
case "sql"
	
sitename2=Request.Form("sitename2")
A_login2=Request.Form("A_login2")
A_pwd2=md5(Request.Form("A_pwd2"))
admin_dir2=Request.Form("admin_dir2")
web_dir2=Request.Form("web_dir2")
session("set_login")=Request.Form("A_login2")
session("set_pwd")=Request.Form("A_pwd2")
dbserver=Request.Form("dbserver")
dbname=Request.Form("dbname")
dbusername=Request.Form("dbusername")
dbpassword=Request.Form("dbpassword")

	if admin_dir2="admin" then
		call box("请用一个较安全的后台管理目录名称，不要用默认的admin","back","error")
	end if
	
	if ChkInvaildWord(Request.Form("A_login")) or ChkInvaildWord(Request.Form("A_pwd")) then
	call box("用户名或密码设置包含敏感字符，请重新设置!","back","error")
	end if
	
on error resume next
connstr2="driver={SQL Server};server="&dbserver&";uid="&dbusername&";pwd="&dbpassword&";database="&dbname
Set objConn=Server.CreateObject("ADODB.Connection") 
objConn.Open connstr2


If Err Then
err.Clear
Set Conn = Nothing
Response.Write("<p>抱歉，连接数据库失败！</p><p>您提供的数据库用户名和密码可能不正确，或者无法连接到您的数据库服务器，这意味着您的主机数据库服务器已停止工作。</p><p><ul><li>您确认您提供的用户名和密码正确么？</li><li>您确认您提供的主机名正确么？</li><li>您确认数据库服务器运行正常么？</li><li>您确认您购买的数据库是MSSQL而不是MYSQL么？</li></ul></p><p>请您联系您的空间商寻求帮助！</p><div id='bottom'><input type=""button"" name=""next"" onClick=""history.go(-1)"" id=""netx"" value=""返回"" /></div>")
Response.End
End If


objConn.BeginTrans
'-----------------创建表----------------------
objConn.execute("CREATE TABLE [SL_admin] (A_ID int identity(1,1) not null primary key,A_login nvarchar(255) default '',A_pwd nvarchar(255) default '',A_part nvarchar(255) default '')")
objConn.execute("CREATE TABLE [SL_backup] (B_ID int identity(1,1) not null primary key,B_admin nvarchar(255) default '',B_content ntext default '',B_time datetime default getdate(),B_folder nvarchar(255) default '')")
objConn.execute("CREATE TABLE [SL_code] (C_function_version nvarchar(255) default '',C_admin_version nvarchar(255) default '',C_function_day datetime default getdate(),C_admin_day datetime default getdate(),C_fun_md5 nvarchar(255) default '',C_adm_md5 nvarchar(255) default '')")
objConn.execute("CREATE TABLE [SL_config] (C_title nvarchar(255) default '',C_keywords ntext default '',C_content ntext default '',C_logo nvarchar(255) default '',C_template nvarchar(255) default '',C_code ntext default '',C_foot ntext default '',C_logox int default 0,C_logoy int default 0,C_ico nvarchar(255) default '',C_qq ntext default '',C_qqon int default 0,C_mobile ntext default '',C_first int default 0,C_admin nvarchar(255) default '',C_version nvarchar(255) default '',C_wtitle nvarchar(255) default '',C_wcode ntext default '',C_wtoken nvarchar(255) default '',C_alipay nvarchar(255) default '',C_alipayid nvarchar(255) default '',C_alipaykey nvarchar(255) default '',C_QQid nvarchar(255) default '',C_QQkey nvarchar(255) default '',C_email nvarchar(255) default '',C_mpwd nvarchar(255) default '',C_fenxiang ntext default '',C_html int default 0,C_dir nvarchar(255) default '',C_domain nvarchar(255) default '',C_wap nvarchar(255) default '',C_wx_appid nvarchar(255) default '',C_wx_mchid nvarchar(255) default '',C_wx_key nvarchar(255) default '',C_wx_appsecret nvarchar(255) default '',C_alipayon nvarchar(255) default '',C_wxpayon nvarchar(255) default '',C_bankon nvarchar(255) default '',C_test nvarchar(255) default '',C_time datetime default getdate())")
objConn.execute("CREATE TABLE [SL_contact] (C_title nvarchar(255) default '',C_entitle nvarchar(255) default '',C_content ntext default '',C_address ntext default '',C_zb nvarchar(255) default '',C_map nvarchar(255) default '')")
objConn.execute("CREATE TABLE [SL_content] (C_id int identity(1,1) not null primary key,C_title nvarchar(255) default '',C_bz ntext default '',C_content ntext default '',C_type nvarchar(255) default '',C_fid int default 0,C_order int default 0)")
objConn.execute("CREATE TABLE [SL_form] (F_id int identity(1,1) not null primary key,F_title nvarchar(255) default '',F_entitle nvarchar(255) default '',F_bz ntext default '',F_yz int default 0,F_module nvarchar(255) default '',F_pic nvarchar(255) default '',F_keywords ntext default '',F_description ntext default '')")
objConn.execute("CREATE TABLE [SL_guestbook] (G_id int identity(1,1) not null primary key,G_title ntext default '',G_name nvarchar(255) default '',G_phone nvarchar(255) default '',G_email nvarchar(255) default '',G_Msg ntext default '',G_sh int default 0,G_time datetime default getdate(),G_reply text default '')")
objConn.execute("CREATE TABLE [SL_link] (L_id int identity(1,1) not null primary key,L_title nvarchar(255) default '',L_url ntext default '',L_pic ntext default '')")
objConn.execute("CREATE TABLE [SL_member] (M_id int identity(1,1) not null primary key,M_login nvarchar(255) default '',M_pwd nvarchar(255) default '',M_email nvarchar(255) default '',M_QQ nvarchar(255) default '',M_mobile nvarchar(255) default '',M_add nvarchar(255) default '',M_pic ntext default '',M_fen int default 0,M_name nvarchar(255) default '',M_code nvarchar(255) default '',M_qqid nvarchar(255) default '',M_regtime datetime default getdate(),M_pwdcode ntext default '',M_genkey nvarchar(255) default '')")
objConn.execute("CREATE TABLE [SL_menu] (U_id int identity(1,1) not null primary key,U_title nvarchar(255) default '',U_entitle nvarchar(255) default '',U_sub int default 0,U_order int default 0,U_type nvarchar(255) default '',U_typeid int default 0,U_hide int default 0,U_url ntext default '',U_ico ntext default '',U_color nvarchar(255) default '')")
objConn.execute("CREATE TABLE [SL_news] (N_id int identity(1,1) not null primary key,N_title nvarchar(255) default '',N_content ntext default '',N_date datetime default getdate(),N_author nvarchar(255) default '' ,N_view int default 0,N_sort int default 0,N_pic ntext default '',N_order int default 0,N_short ntext default '',N_top int default 0,N_sh int default 0)")
objConn.execute("CREATE TABLE [SL_nsort] (S_id int identity(1,1) not null primary key,S_title nvarchar(255) default '',S_entitle nvarchar(255) default '',S_keywords ntext default '',S_description ntext default '')")
objConn.execute("CREATE TABLE [SL_orders] (O_id int identity(1,1) not null primary key,O_member int default 0,O_price money default 0,O_num int default 0,O_shuxing ntext default '',O_state int default 0,O_pid int default 0,O_wl nvarchar(255) default '',O_wlid nvarchar(255) default '',O_tradeno nvarchar(255) default '',O_time datetime default getdate())")
objConn.execute("CREATE TABLE [SL_product] (P_id int identity(1,1) not null primary key,P_path ntext default '',P_thumb ntext default '',P_title ntext default '',P_content ntext default '',P_sort int default 0,P_order int default 0,P_price money default '',P_buy int default 0,P_short ntext default '',P_shuxing ntext default '',P_top int default 0)")
objConn.execute("CREATE TABLE [SL_psort] (S_id int identity(1,1) not null primary key,S_title ntext default '',S_entitle ntext default '',S_module nvarchar(255) default '',S_sub int default 0,S_pic ntext default '',S_keywords ntext default '',S_description ntext default '')")
objConn.execute("CREATE TABLE [SL_response] (R_id int identity(1,1) not null primary key,R_cid int default 0,R_content ntext default '',R_time datetime default getdate(),R_rid ntext default '',R_member int default 0)")
objConn.execute("CREATE TABLE [SL_safe] (S_filetype ntext default '',S_filesize int default 0,S_ip ntext default '',S_word ntext default '')")
objConn.execute("CREATE TABLE [SL_slide] (S_id int identity(1,1) not null primary key,S_pic ntext default '',S_thumb ntext default '',S_title ntext default '',S_content ntext default '',S_link ntext default '')")
objConn.execute("CREATE TABLE [SL_text] (T_id int identity(1,1) not null primary key,T_title ntext default '',T_entitle ntext default '',T_content ntext default '',T_pic ntext default '',T_short ntext default '',T_keywords ntext default '',T_description ntext default '')")
objConn.execute("CREATE TABLE [SL_wap] (W_show int default 0,W_phone nvarchar(255) default '',W_email nvarchar(255) default '',W_msg int default 0,W_logo nvarchar(255) default '',W_template nvarchar(255) default '')")
objConn.execute("CREATE TABLE [SL_wapslide] (S_id int identity(1,1) not null primary key,S_pic ntext default '',S_title ntext default '',S_content ntext default '')")
objConn.CommitTrans
'-----------------写入数据----------------------
'-------SL_admin表----------
objConn.execute("delete from SL_admin")
objConn.execute("Insert into SL_admin(A_login,A_pwd,A_part) values('"&A_login2&"','"&A_pwd2&"','1|1|1|1|1|1|1|1|1|1|1|1|1|1|1')")
'-------SL_code表----------
objConn.execute("INSERT INTO [SL_code] ([C_function_version], [C_admin_version], [C_function_day], [C_admin_day], [C_fun_md5], [C_adm_md5]) VALUES (N'20151101', N'20151101', '2015-11-19 00:27:48', '2015-11-19 00:27:48', NULL, NULL)")

'-------SL_config表----------
objConn.execute("INSERT INTO [SL_config] ([C_title], [C_keywords], [C_content], [C_logo], [C_template], [C_code], [C_foot], [C_logox], [C_logoy], [C_ico], [C_qq], [C_qqon], [C_mobile], [C_first], [C_admin], [C_version], [C_wtitle], [C_wcode], [C_wtoken], [C_alipay], [C_alipayid], [C_alipaykey], [C_QQid], [C_QQkey], [C_email], [C_mpwd], [C_fenxiang], [C_html], [C_dir], [C_domain], [C_wap], [C_wx_appid], [C_wx_mchid], [C_wx_key], [C_wx_appsecret], [C_alipayon], [C_wxpayon], [C_bankon], [C_test], [C_time]) VALUES (N'您的网站名称', N'关键词1,关键词2,关键词3,关键词4,关键词5', N'请用一段语句通顺的话来描述您的网站定位，字数不超过200字', N'media/20151019094721842.png', N's19', N'<script language=""javascript"" type=""text/javascript"" src=""http://js.users.51.la/18651498.js""></script><noscript><a href=""http://www.51.la/?18651498"" target=""_blank""><img alt=""我要啦免费统 src=""http://img.users.51.la/18651498.asp"" style=""border:none"" /></a></noscript>', N'COPYRIGHT © 2009-2011,WWW.YOURNAME.COM,ALL RIGHTS RESERVED版权所有© 您的公司名称', 10, 0, N'media/20151019095214828.png', N'12345678|售前咨询,987654321|售后服务,11223344|加盟代理,taobao|淘宝客服', 1, N'010-10086|010-10010', 1, N'admin', N'build20150810', N'你的微信公众', N'media/20150921144410012.jpg', N'weixin', N'XXX@qq.com', N'2088XXXXXXXXX', N'1234567890', N'1234567890', N'1234567890', N'XXXXX@qq.com', N'XXXXX', N'<div class=""bshare-custom""><a title=""分享到QQ空间"" class=""bshare-qzone""></a><a title=""分享到新浪微 class=""bshare-sinaminiblog""></a><a title=""分享到人人网"" class=""bshare-renren""></a><a title=""分享到腾讯微 class=""bshare-qqmb""></a><a title=""分享到网易微 class=""bshare-neteasemb""></a><a title=""更多平台"" class=""bshare-more bshare-more-icon more-style-addthis""></a><span class=""BSHARE_COUNT bshare-share-count"">0</span></div><script type=""text/javascript"" charset=""utf-8"" src=""http://static.bshare.cn/b/buttonLite.js#style=-1&uuid=&pophcol=2&lang=zh""></script><script type=""text/javascript"" charset=""utf-8"" src=""http://static.bshare.cn/b/bshareC0.js""></script></div>', 0, N'/', N'empty', N'w1', N'wxXXXXXXXXXX', N'1234567890', N'1234567890', N'1234567890', N'true', N'true', N'true', N'0',N'"&now()&"')")
'-------SL_conatct表----------
objConn.execute("INSERT INTO [SL_contact] ([C_title], [C_entitle], [C_content], [C_address], [C_zb], [C_map]) VALUES (N'联系我们', N'contact us', N'地址：上海市xx区xx路xx广场x<br />电话006-021-xxxxxxxx<br />传真0006-021-xxxxxxxxxxxxxxxx<br />邮箱：xxxxxxxxx@qq.com<br />网址：www.xxxxxx.com<br />', N'上海市xx区xx路xx广场x号楼xx', N'116.376098,39.966935', N'baidu')")
'-------SL_content表----------

objConn.execute("INSERT INTO [SL_content] ([C_id], [C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES (19, N'如何称呼', N'', N'', N'text', 7, 1)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES ( N'准备哪天过来', N'', N'', N'date', 1, 2)")
objConn.execute("INSERT INTO [SL_content] ( [C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES ( N'大致时间', N'', N'8-10点|10-12点|12-14点|14-16点|16-18', N'option', 1, 3)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES ( N'指定哪位技', N'', N'', N'text', 1, 4)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES ( N'联系电话', N'', N'', N'text',1, 5)")
objConn.execute("INSERT INTO [SL_content] ( [C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES ( N'其他要求', N'', N'', N'area', 1, 6)")
objConn.execute("INSERT INTO [SL_content] ( [C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES ( N'您的姓名', N'', N'', N'text', 2, 1)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES ( N'联系电话', N'', N'', N'text', 2, 2)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES (N'哪天来唱', N'', N'', N'date', 2, 3)")
objConn.execute("INSERT INTO [SL_content] ( [C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES (N'哪个时间段来', N'', N'下午6点）|晚上午夜12点）|后半夜（午夜12凌晨6点）', N'option', 2, 4)")
objConn.execute("INSERT INTO [SL_content] ( [C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES (N'房型', N'', N'迷你包|小包|中包|大包|豪华包|VIP', N'radio', 2, 5)")
objConn.execute("INSERT INTO [SL_content] ( [C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES ( N'备注', N'', N'', N'area', 2, 6)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES (N'姓名', N'', N'', N'text', 3, 1)")
objConn.execute("INSERT INTO [SL_content] ( [C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES (N'学校', N'', N'', N'text', 3, 2)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES ( N'手机', N'', N'', N'text', 3, 3)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES (N'邮箱', N'', N'', N'text', 3, 4)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES ( N'学历', N'', N'初中|高中|大学本科|硕士研究生|博士研究', N'radio', 3, 5)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES (N'毕业日期', N'', N'', N'date', 3, 6)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES (N'应聘职位', N'', N'职位1|职位2|职位3|职位4', N'option', 3, 7)")
objConn.execute("INSERT INTO [SL_content] ([C_title], [C_bz], [C_content], [C_type], [C_fid], [C_order]) VALUES (N'上传简历', N'允许格式为jpg,png,gif,rar,doc,pdf,ppt', N'', N'pic',3, 8)")


'-------SL_form表----------
objConn.execute("INSERT INTO [SL_form] ( [F_title], [F_entitle], [F_bz], [F_yz], [F_module], [F_pic]) VALUES ( N'服务预约', N'aaa', N'', 0, N'f001', N'media/form_bg.jpg')")
objConn.execute("INSERT INTO [SL_form] ( [F_title], [F_entitle], [F_bz], [F_yz], [F_module], [F_pic]) VALUES ( N'KTV房间预定', N'bbb', N'', 0, N'f001', N'media/form_bg.jpg')")
objConn.execute("INSERT INTO [SL_form] ( [F_title], [F_entitle], [F_bz], [F_yz], [F_module], [F_pic]) VALUES ( N'简历提交', N'ccc', N'招聘相关公告可以放在这里', 0, N'f001', N'media/form_bg.jpg')")

'-------SL_guestbook表----------
objConn.execute("INSERT INTO [SL_guestbook] ( [G_title], [G_name], [G_phone], [G_email], [G_Msg], [G_sh], [G_time], [G_reply]) VALUES (N'标题', N'昵称', N'13333333333', N'10086@QQ.com', N'留言内容', 1, '2015-09-30 11:08:40', N'回复')")
objConn.execute("INSERT INTO [SL_guestbook] ( [G_title], [G_name], [G_phone], [G_email], [G_Msg], [G_sh], [G_time], [G_reply]) VALUES (N'留言测试-标题', N'留言测试-姓名', N'15555555555', N'test@test.com', N'留言测试-内容', 1, '2015-10-24 12:40:59', N'留言测试-内容回复')")
'-------SL_link表----------
objConn.execute("INSERT INTO [SL_link] ( [L_title], [L_url], [L_pic]) VALUES ( N'百度', N'http://www.baidu.com', N'media/20150921155457342.png')")
objConn.execute("INSERT INTO [SL_link] ( [L_title], [L_url], [L_pic]) VALUES ( N'sogou搜索', N'http://www.sogou.com', N'media/20150921155449747.png')")
objConn.execute("INSERT INTO [SL_link] ( [L_title], [L_url], [L_pic]) VALUES ( N'360搜索', N'http://www.haosou.com', N'media/20150921155427473.png')")
objConn.execute("INSERT INTO [SL_link] ( [L_title], [L_url], [L_pic]) VALUES ( N'soso搜索', N'http://www.soso.com', N'media/20150921155407355.png')")
objConn.execute("INSERT INTO [SL_link] ( [L_title], [L_url], [L_pic]) VALUES ( N'腾讯', N'http://www.qq.com', N'media/20151019100956845.png')")
objConn.execute("INSERT INTO [SL_link] ( [L_title], [L_url], [L_pic]) VALUES ( N'新浪', N'http://www.sina.com', N'media/20151019101025246.png')")
objConn.execute("INSERT INTO [SL_link] ( [L_title], [L_url], [L_pic]) VALUES ( N'网易', N'http://www.163.com', N'media/20151019101105262.png')")
objConn.execute("INSERT INTO [SL_link] ( [L_title], [L_url], [L_pic]) VALUES ( N'淘宝', N'http://www.taobaoc.om', N'media/20151019101130000.png')")
'-------SL_member表----------
objConn.execute("INSERT INTO [SL_member] ([M_login], [M_pwd], [M_email], [M_QQ], [M_mobile], [M_add], [M_pic], [M_fen], [M_name], [M_code], [M_qqid], [M_regtime], [M_pwdcode], [M_genkey]) VALUES ( N'未提供', N'null', N'null', N'1', N'1', N'1', N'member.jpg', 0, N'1', N'1', NULL, '2011-11-11 00:00:00', NULL, NULL)")
objConn.execute("INSERT INTO [SL_member] ( [M_login], [M_pwd], [M_email], [M_QQ], [M_mobile], [M_add], [M_pic], [M_fen], [M_name], [M_code], [M_qqid], [M_regtime], [M_pwdcode], [M_genkey]) VALUES ( N'admin', N'admin888', N'10086@qq.com', N'留言测试-标题', N'15567896789', N'XX省XX市XX区XX', N'member.jpg', 0, N'姓名', N'100000', NULL, '2011-11-11 00:00:00', NULL, NULL)")
objConn.execute("INSERT INTO [SL_member] ([M_login], [M_pwd], [M_email], [M_QQ], [M_mobile], [M_add], [M_pic], [M_fen], [M_name], [M_code], [M_qqid], [M_regtime], [M_pwdcode], [M_genkey]) VALUES (N'入戏太深', N'anchen', N'anchen@qq.com', N'1', N'1', N'1', N'member.jpg', 0, N'1', N'1', NULL, '2011-11-11 00:00:00', NULL, NULL)")
objConn.execute("INSERT INTO [SL_member] ( [M_login], [M_pwd], [M_email], [M_QQ], [M_mobile], [M_add], [M_pic], [M_fen], [M_name], [M_code], [M_qqid], [M_regtime], [M_pwdcode], [M_genkey]) VALUES ( N'user', N'password', N'anchen@qq.com', N'1', N'1', N'1', N'member.jpg', 0, N'1', N'1', NULL, '2011-11-11 00:00:00', NULL, NULL)")
objConn.execute("INSERT INTO [SL_member] ( [M_login], [M_pwd], [M_email], [M_QQ], [M_mobile], [M_add], [M_pic], [M_fen], [M_name], [M_code], [M_qqid], [M_regtime], [M_pwdcode], [M_genkey]) VALUES ( N'Anchen', N'anchen', N'anchen@qq.com', N'1', N'1', N'1', N'member.jpg', 0, N'1', N'1', NULL, '2011-11-11 00:00:00', NULL, NULL)")
objConn.execute("INSERT INTO [SL_member] ([M_login], [M_pwd], [M_email], [M_QQ], [M_mobile], [M_add], [M_pic], [M_fen], [M_name], [M_code], [M_qqid], [M_regtime], [M_pwdcode], [M_genkey]) VALUES ( N'未提供', N'anchen', N'anchen@qq.com', N'1', N'1', N'1', N'member.jpg', 0, N'1', N'1', NULL, '2011-11-11 00:00:00', NULL, NULL)")


'-------SL_menu表----------
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'网站首页', N'index', 0, 1, N'index', 1, 0, N'', N'home', N'#FF9C00')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'关于我们', N'about', 0, 2, N'text', 1, 0, N'', N'user', N'#8DC43C')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'产品展示', N'product', 0, 3, N'product', 1, 0, N'', N'th-list', N'#AA8855')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'新闻中心', N'news', 0, 4, N'news', 1, 0, N'', N'newspaper-o', N'#88AA55')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES (N'联系我们', N'contact', 0, 6, N'contact', 1, 0, N'', N'map-o', N'#55AA66')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'公司文化', N'culture', 2, 2, N'text', 2, 0, N'', N'bookmark', N'#2BD5D5')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'公司新闻', N'news', 4, 2, N'news', 1, 0, N'', N'signal', N'#A3BB44')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'行业动态', N'news', 4, 1, N'news', 2, 0, N'', N'signal', N'#9955AA')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'在线留言', N'guestbook', 5, 2, N'guestbook', 1, 0, N'', N'envelope-o', N'#AA7755')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'万能表单', N'form', 0, 5, N'form', 3, 0, N'', N'share-alt', N'#4D61B3')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES (N'尼康', N'nikon', 3, 1, N'product', 3, 0, N'', N'paperclip', N'#5555AA')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'佳能', N'cannon', 3, 2, N'product', 2, 0, N'', N'paperclip', N'#668599')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'莱卡', N'leica', 3, 3, N'product', 4, 0, N'', N'paperclip', N'#AA55AA')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'公司简介', N'Itroduction', 2, 1, N'text', 1, 0, N'', N'bookmark', N'#2B35D5')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'简历提交', N'Resume', 10, 3, N'form', 3, 0, N'', N'sticky-note-o', N'#006600')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'KTV预定', N'KTV', 10, 2, N'form', 2, 0, N'', N'sticky-note-o', N'#AAa755')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'服务预约', N'Service', 10, 1, N'form', 1, 0, N'', N'sticky-note-o', N'#A3BB44')")
objConn.execute("INSERT INTO [SL_menu] ( [U_title], [U_entitle], [U_sub], [U_order], [U_type], [U_typeid], [U_hide], [U_url], [U_ico], [U_color]) VALUES ( N'联系方式', N'Contact', 7, 1, N'contact', 1, 0, NULL, N'map-marker', N'#ff9900')")


'-------SL_news表----------
objConn.execute("INSERT INTO [SL_news] ([N_title], [N_content], [N_date], [N_author], [N_view], [N_sort], [N_pic], [N_order], [N_short]) VALUES ( N'Sofeya女装完美绽放', N'大中华区最大名表零售集团亨得利，斥资3.5亿元，首度在台开设名表旗舰店，选中忠孝东路、敦化南路交叉口，瞄准高档的消费市场，预计二年内在全台将开设三间新店。<br />在香港挂牌上市的亨得利控股有限公司，看好国内中高档钟表品牌及大陆客的市场，以其集团旗下专门销售世界顶级手表的“三宝名表(ELEGANT)”品牌，在台北开设全台首间旗舰店。这也是亨得利集团在大中华区开设的第20间三宝名表店。<br />亨得利集团主席兼总裁张瑜平昨(24)日表示，在大陆及香港，亨得利都居于领先的地位，去年进入台湾市场，昨天成立旗舰店，抢攻高端的腕表品牌消费市场。<br />他认为，台湾销售顶级名表具有服务面的软实力，大陆的客人到台湾的表店消费，除了有更多品牌的选择外，回到大陆后也能享有亨得利集团提供的售后服务，港、澳、台将是亨得利未来发展的重心。<br />据了解，看好国内顶级钟表收藏家的实力，亨得利预计今年还要在台北市新增一间三宝名表，接着就是要抢进台中市场。<br />随着大陆客来台的人数增加，让亨得利集团相当看好台湾钟表市场的前景，去年首次进入台湾市场，于高雄大立精品、高雄汉神巨蛋开设在大陆腕表居龙头地位的瑞士钟表品牌欧米茄专卖店。<br />全球最大钟表集团斯沃其瑞表集团(SWATCH GROUP)及全球最大精品集团LVMH，都是亨得利的股东。<br />', '2015-10-19 21:39:15', N'admin', 130, 1, N'media/news_1.jpg', 1, N'	大中华区最大名表零售集团亨得利，斥资3.5亿元，首度在台开设名表旗舰店，选中忠孝东路、敦化南路交叉口，瞄准高档的消费市场，预计二年内在全台将开设三间新店。　　在香港挂牌上市的亨得利控股有限公司，看好国内中高档钟表品牌及大陆客的市场，以其集团旗下专门销售世界顶级手表的“三宝名表(ELEGANT)”品牌，在台北开设全台首间旗舰店。这也是亨得利集团在大中华区开设的第20间三宝名表店。亨得利集团主席兼')")

'-------SL_nsort表----------
objConn.execute("INSERT INTO [SL_nsort] ( [S_title], [S_entitle],[S_keywords],[S_description]) VALUES ( N'公司新闻', N'company', N'1',N'1')")
objConn.execute("INSERT INTO [SL_nsort] ( [S_title], [S_entitle], [S_keywords],[S_description]) VALUES ( N'行业动态', N'news', N'1',N'1')")

'-------SL_orders表----------
objConn.execute("INSERT INTO [SL_orders] ( [O_member], [O_price], [O_num], [O_shuxing], [O_state], [O_pid], [O_wl], [O_wlid], [O_tradeno], [O_time]) VALUES ( 1, .01, 1, N'标配', 3, 1, N'中通', N'1234567890', N'1002510991201510241319384097（微信付款）', '2015-10-24 19:35:52')")
objConn.execute("INSERT INTO [SL_orders] ( [O_member], [O_price], [O_num], [O_shuxing], [O_state], [O_pid], [O_wl], [O_wlid], [O_tradeno], [O_time]) VALUES ( 1, .01, 2, N'标配', 3, 1, N'圆通', N'1234567890', N'2015102421001004110044403666（支付宝付款）', '2015-10-24 19:39:21')")
objConn.execute("INSERT INTO [SL_orders] ( [O_member], [O_price], [O_num], [O_shuxing], [O_state], [O_pid], [O_wl], [O_wlid], [O_tradeno], [O_time]) VALUES (1, .01, 3, N'标配', 3, 1, N'申通', N'1234567890', N'2015102421001004390025952107（网银付款）', '2015-10-24 19:40:18')")
'-------SL_product表----------
objConn.execute("INSERT INTO [SL_product] ( [P_path], [P_thumb], [P_title], [P_content], [P_sort], [P_order], [P_price], [P_buy], [P_short], [P_shuxing]) VALUES ( N'media/20151019120842158.jpg', N'media/20151019120842158.jpg', N'测试支付商品', N'本商品供支付测试使用，可删除', 4, 0, .01, 1, N'测试支付商品', NULL)")

'-------SL_psort表----------
objConn.execute("INSERT INTO [SL_psort] ( [S_title], [S_entitle], [S_module], [S_sub], [S_pic],[S_keywords],[S_description]) VALUES ( N'产品展示', N'PRODUCT', N'p001', 0, N'media/', N'', N'')")
objConn.execute("INSERT INTO [SL_psort] ( [S_title], [S_entitle], [S_module], [S_sub], [S_pic],[S_keywords],[S_description]) VALUES ( N'佳能', N'canon', N'p001', 1, N'media/20151019110147886.jpg', N'佳能', N'佳能')")
objConn.execute("INSERT INTO [SL_psort] ( [S_title], [S_entitle], [S_module], [S_sub], [S_pic],[S_keywords],[S_description]) VALUES ( N'尼康', N'nikon', N'p001', 1, N'media/20151019110204439.jpg', N'尼康', N'尼康')")
objConn.execute("INSERT INTO [SL_psort] ( [S_title], [S_entitle], [S_module], [S_sub], [S_pic],[S_keywords],[S_description]) VALUES ( N'莱卡', N'leica', N'p001', 1, N'media/20151019110223300.jpg', N'莱卡', N'莱卡')")
objConn.execute("INSERT INTO [SL_safe] ([S_filetype], [S_filesize], [S_ip], [S_word]) VALUES (N'jpg|png|gif|flv|mp3|doc|rar|ppt|pdf|ico|mp4|swf', 10, N'123.45.67.89', N'''|;|exec|update|count|*|%|chr|mid|master|truncate|char|declare')")


objConn.execute("INSERT INTO [SL_slide] ( [S_pic], [S_thumb], [S_title], [S_content], [S_link]) VALUES ( N'media/20151008224717874.jpg', N'media/_800_400_20140924201118866.jpg', N'Louis Vuitton视觉盛宴', N'路易·威登法国历史上最杰出的皮件设计大师之一', N'#')")
objConn.execute("INSERT INTO [SL_slide] ( [S_pic], [S_thumb], [S_title], [S_content], [S_link]) VALUES ( N'media/20151008224710256.jpg', N'media/_800_400_20140924201058968.jpg', N'Diesel时尚广告', N'Diesel的风格年轻而富有创', N'#')")


objConn.execute("INSERT INTO [SL_text] ( [T_title], [T_entitle], [T_content], [T_pic], [T_short],[T_keywords],[T_description]) VALUES ( N'公司简介', N'Itroduction', N'XXX有限公司是于1966年为了通过试验评价技术的支援以提高产业技术而成 立的试验评价机构，<br />是和先进（发达）国家的试验、认证机构进行交流和合作的大韩民国代表性机构。<br /><br />为了保护本国产业的各种认证制度日渐完善，为保护消费者安 全和环境的各种制度的重要性日趋增加，<br />KTL为适应形势的发展，从产品开发到获得认证的整个阶段提供支援，以帮助企业提高技术能力以及拥有更强的竞争力。<br /><br />为了两国企业间和认证机构和客户间的有机业务联系及满足客户的需求，<br />XXXX有限公司在广州和上海成立了中国事务所，<br />为客户提供优质服务，为增加中国企业 向韩国出口及企业的发展作出贡献。<br /><br />为了解决国内外客户取得认证以及各国的非关税技术壁垒，已和35个国家67个试验认证机构签订了协定(MOU），<br />为获得 海外规格认证，提供各种安全及质量认证、工厂审查、信息、技术教育等支援。<br /><br /><br />现在在运营国际认证制度IECEE（IEC System for Conformity Testing and Certification of Electrical Equipment）CB认证制度（CBScheme），<br />是一家有关9个领域43个规格发行CB Certificate和Test Report的IECEE公认。<br />', N'media/20151019102732946.jpg', NULL,NULL,NULL)")

objConn.execute("INSERT INTO [SL_text] ( [T_title], [T_entitle], [T_content], [T_pic], [T_short]) VALUES ( N'企业文化', N'Culture2', N'1、敢于创新<br />敢于创新是XX企业的首要特点，就是敢闯敢试、敢想敢干。<br /><br />XX是全国首家进行城市旧区改造的企业；XX也是全国第一家跨区域发展的房地产企业；XX是全国房地产企业中第一个转型商业地产的企业；XX更是全国首家大规模投资文化产业的企业，XX企业产业集团一成立便成为全国最大。<br /><br />2、坚守诚信<br />坚守诚信是XX企业的核心特点。<br /><br />1990年，XX集团开发的大连民政街小区成为中国东北地区第一个工程质量全优住宅小区；1996年，XX在全国房地产企业中率先推出保护消费者利益的“三项承诺”；2002年，XX在沈阳开发太原街XX广场，由于出售的部分商铺经营效益不好，XX从保护消费者利益出发，决定回购沈阳太原街XX广场所有已售商铺，除退回购房款外还补偿相应利息。XX沈阳退铺在全国引起极大反响，成为全国诚信文化建设的标志性事件。<br /><br />3、带头环保<br />XX集团是全国最早推行节能建筑的企业之一。<br /><br />XX集团所有XX广场和五星级酒店都达到国家星级节能标准，自国家住房和城乡建设部2009年颁布绿色建筑设计标识和运行标识以来，全国获得这两项认证的商业项目绝大多数是XX广场和五星级酒店，遥遥领先其他企业。<br /><br />4、关爱员工<br />XX视员工为企业的核心资本，发展成果首先惠及员工，使员工在XX长本事、涨工资、长幸福指数。XX每年投入上亿元用于员工培训，并在廊坊投资7亿元建立了国内一流的XX学院。XX要求所有基层公司自办员工食堂，免费向员工提供一日三餐。XX实行优秀员工度假制度，每年评出的集团优秀员工，给予报销两人往返机票，免费入住各地XX酒店度假。<br /><br />5、注重慈善<br />XX成立至今，慈善捐助现金超过37亿元人民币，是中国慈善公益捐助额最多的企业之一。也是唯一七获“中华慈善奖”的企业。<br /><br />XX集团还倡导人人公益的理念，集团所有员工都成为义工，每人每年至少做一次义工。<br /><br />6、做到最好<br />XX有远大愿景，对工作标准要求极高，追求“让一切工作成为精品”。XX只要进入的产业，至少做到中国行业第一，追求世界行业第一。XX是全球最大的电影院线运营商、全球排名第二的不动产企业、全球最大的五星级酒店业主。<br /><br />7、执行力强<br />执行力强是XX企业文化的突出特点。一是说到做到。二是算到拿到。XX做项目先算后干，先做规划设计、测算成本后再决定是否投资。项目开发过程实行计划模块化管控，保证项目全程的成本、现金流都在计划管控的范围之内。三是奖罚分明。XX制度奖罚分明，该奖就奖，该罚就罚。<br /><br />8、弘扬传统<br />2005年集团推荐学《论语》，全集团开展一年的学习、讨论和演讲。 XX多次聘请著名礼仪专家到企业讲文明礼仪，提高员工综合素质。 XX集团王健林董事长很早就开始进行中国字画收藏，每年举办画展，支持优秀画家发展。<br /><br />', N'media/20151019102732946.jpg', NULL)")


objConn.execute("INSERT INTO [SL_wap] ([W_show], [W_phone], [W_email], [W_msg], [W_logo], [W_template]) VALUES (2, N'010-10086', N'your-maill@qq.com', 1, N'20151019111341074.png', NULL)")

objConn.execute("INSERT INTO [SL_wapslide] ( [S_pic], [S_title], [S_content]) VALUES ( N'media/20151019111808765.jpg', N'ERATAT时尚盛典', N'ERATAT为消费者提供简洁优雅的英伦时尚着装体')")
objConn.execute("INSERT INTO [SL_wapslide] ( [S_pic], [S_title], [S_content]) VALUES ( N'media/20151019111800144.jpg', N'Louis Vuitton视觉盛宴', N'路易·威登法国历史上最杰出的皮件设计大师之一')")
objConn.execute("INSERT INTO [SL_wapslide] ([S_pic], [S_title], [S_content]) VALUES ( N'media/20151019111751489.jpg', N'Diesel时尚广告', N'Diesel的风格年轻而富有创')")

objConn.execute("Update SL_config set C_title='"&sitename2&"',C_admin='"&admin_dir2&"',C_first=0,C_time='"&now()&"',C_dir='"&web_dir2&"'")
	
objConn.close()
set objConn=nothing

olddatabase="connstr=""Provider=Microsoft.Jet.OLEDB.4.0;Data Source="" & Server.MapPath(mdb)&"";Jet OLEDB:Database Password=anchen,./"""
newdatabase="connstr=""driver={SQL Server};server="&dbserver&";uid="&dbusername&";pwd="&dbpassword&";database="&dbname&""" "

conn1=ReadFromTextFile ("conn/conn.asp","utf-8")
conn1=replace(conn1,olddatabase,newdatabase)
call WriteToTextFile("conn/conn.asp",conn1,"utf-8")  

conn2=ReadFromTextFile ("conn/conn2.asp","utf-8")
conn2=replace(conn2,olddatabase,newdatabase)
call WriteToTextFile("conn/conn2.asp",conn2,"utf-8")  

    Set fsox = CreateObject("scripting.filesystemobject")
	fsox.GetFolder(Server.MapPath("admin")).name=admin_dir2
	
	Set fsox=nothing
	call box("网站安装成功！",admin_dir2&"/admin_login.asp","success")
	
end select
end if



if request.QueryString("step")=1 or request.QueryString("step")=""  then
%>
<div class="div">
<p style="font-size:25px; color:#FFF; height:50px;">1.服务器环境检测</p>
<table width="100%">
<tr style="font-weight:bold; color:#06F;height:30px;"><td width="100">组件检测</td><td></td><td>当前</td><td>所需</td></tr>
<%
On Error Resume Next
oxml=array("microsoft.XMLHTTP","JMail.Message","Adodb.Stream","Microsoft.XMLDOM","ADODB.RecordSet","Scripting.FileSystemObject")
for i=0 to ubound(oxml)
Set getxmlhttp = Server.CreateObject(oxml(i))
If Err Then
Err.Clear
response.Write "<tr><td>"&oxml(i)&"</td><td></td><td><font color='#FF0000'>【不支持】</font></td><td>支持</td></tr>"
else
response.Write "<tr><td>"&oxml(i)&"</td><td></td><td><font color='#009900'>【支持】</font></td><td>支持</td></tr>"
end if
next
%>
<tr style="font-weight:bold; color:#06F;height:30px;"><td width="100">IIS设置检测</td><td></td><td>当前</td><td>所需</td></tr>
<%
set xmlhttp=server.createobject("microsoft.XMLHTTP")
If Err Then
Err.Clear
set xmlhttp=server.createobject("MSXML2.XMLHTTP")
end if
xmlhttp.open "Post","http://"&Request.ServerVariables("HTTP_HOST")&C_installdir&"conn/test.asp",false
xmlhttp.send
xmlpass=xmlhttp.responsetext
set xmlhttp=nothing
if xmlpass="1" then
response.Write "<tr><td>父路径开启</td><td></td><td><font color='#009900'>【开启】</font></td><td>开启</td></tr>"
else
response.Write "<tr><td>父路径开启</td><td></td><td><font color='#FF0000'>【未开启】</font></td><td>开启</td></tr>"
error_1="1"
end if

set xmlhttp=server.createobject("microsoft.XMLHTTP")
If Err Then
Err.Clear
set xmlhttp=server.createobject("MSXML2.XMLHTTP")
end if
xmlhttp.open "Post","http://"&Request.ServerVariables("HTTP_HOST")&C_installdir&"conn/",false
xmlhttp.send
xmlpass=xmlhttp.responsetext
set xmlhttp=nothing
if xmlpass="1" then
response.Write "<tr><td>设置 index.asp 默认首页</td><td></td><td><font color='#009900'>【已设置】</font></td><td>已设置</td></tr>"
else
response.Write "<tr><td>设置 index.asp 默认首页</td><td></td><td><font color='#FF0000'>【未设置】</font></td><td>已设置</td></tr>"
error_2="1"
end if

genkey=gen_key(10)
conn.execute("Update SL_config set C_test='"&genkey&"'")
Set rs= Server.CreateObject("ADODB.RecordSet")
sql="select * from SL_config"
rs.open sql,conn,1,1
if not rs.eof then
C_test=rs("C_test")
end if
rs.close
set rs=nothing
conn.close()
set conn=nothing
if C_test=genkey then
response.Write "<tr><td>目录写入权限</td><td></td><td><font color='#009900'>【开启】</font></td><td>开启</td></tr>"
else
response.Write "<tr><td>目录写入权限</td><td></td><td><font color='#FF0000'>【未开启】</font></td><td>开启</td></tr>"
error_3="1"
end if
%>
</table>

<input name="Submit" type="button" class="submit" onmouseover="this.className='submit2'" onmouseout="this.className='submit'"  value="下一步" onclick="window.location.href='?step=2'" />

</div>
<%end if%>
<%
if request.QueryString("step")=2 then
%>
<div class="div">
<p style="font-size:25px; color:#FFF; height:70px;">2.网站初始化设置</p>
<form method="post" action="?action=save&step=3">
<div style="margin-bottom:10px;">选择数据库类型：<input type="radio" name="database" value="access" checked="checked" id="access"  onClick="$('#sql_table').hide();$('#acc_table').show();"/><label for="access" onClick="$('#sql_table').hide();$('#acc_table').show();">ACCESS</label>  <input type="radio" name="database" value="sql" id="sql" onClick="$('#acc_table').hide();$('#sql_table').show();" /><label for="sql" onClick="$('#acc_table').hide();$('#sql_table').show();">SQL SERVER（MSSQL）</label></div> 
<table width="100%" id="acc_table" >
<tr align="left"><td width="22%">网站名称</td><td><input name="sitename1" type="text" value="您的网站名称" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'" /></td><td></td></tr>
<tr align="left"><td width="22%">安装目录</td><td><input name="web_dir1" type="text"  value="<%=C_installdir%>" class="input1"  onfocus="this.className='input2'" onblur="this.className='input1'"  readOnly="true" style="background-color:#EEEEEE"/> </td><td></td></tr>
<tr align="left"><td width="22%">后台目录</td><td><input name="admin_dir1" type="text"  value="admin" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'" /></td><td>* 为保证安全请修改</td>
</tr>
<tr align="left"><td width="22%">后台管理账号</td><td><input name="A_login1" type="text"  value="" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'" /></td><td></td></tr>
<tr align="left"><td width="22%">后台管理密码</td><td><input name="A_pwd1" type="text"  value="" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'" /></td><td></td></tr>

<tr align="left" bgcolor="#F7F7F7"><td width="22%">数据库名称</td><td><input name="database1" type="text" value="<%=gen_key(20)%>.mdb" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'"  readOnly="true" style="background-color:#EEEEEE" /></td>
  <td></td>
</tr>
<tr align="left"><td width="22%"></td><td>请牢记<span style="color:#FF6600">后台目录、管理账号、密码</span>，进入后台时会用到。</td><td></td></tr>
</table>


<table width="100%" id="sql_table" style="display:none;">
<tr align="left"><td width="22%">网站名称</td><td><input name="sitename2" type="text" value="您的网站名称" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'" /></td><td></td></tr>
<tr align="left"><td width="22%">安装目录</td><td><input name="web_dir2" type="text"  value="<%=C_installdir%>" class="input1"  onfocus="this.className='input2'" onblur="this.className='input1'" readOnly="true" style="background-color:#EEEEEE"/> </td><td></td></tr>
<tr align="left"><td width="22%">后台目录</td><td><input name="admin_dir2" type="text"  value="admin" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'" /></td>
<td>* 为保证安全请修改</td>
<tr align="left"><td width="22%">后台管理账号</td><td><input name="A_login2" type="text"  value="" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'" /></td><td></td></tr>
<tr align="left"><td width="22%">后台管理密码</td><td><input name="A_pwd2" type="text"  value="" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'" /></td><td></td></tr>
<tr align="left" bgcolor="#F7F7F7"><td width="22%">数据库主机</td><td><input name="dbserver" type="text" value="" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'"  /></td><td></td>
</tr>
<tr align="left" bgcolor="#F7F7F7"><td width="22%">数据库名称</td><td><input name="dbname" type="text" value="" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'"  /></td><td></td>
</tr>
<tr align="left" bgcolor="#F7F7F7"><td width="22%">用户名称</td><td><input name="dbusername" type="text" value="" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'"  /></td><td></td>
</tr>
<tr align="left" bgcolor="#F7F7F7"><td width="22%">用户密码</td><td><input name="dbpassword" type="text" value="" class="input1" onfocus="this.className='input2'" onblur="this.className='input1'"  /></td><td></td>
</tr>

</tr>
<tr align="left"><td width="22%"></td><td>请牢记<span style="color:#FF6600">后台目录、管理账号、密码</span>，进入后台时会用到。</td><td></td></tr>
</table>
<input name="Submit" type="button" class="submit" onmouseover="this.className='submit2'" onmouseout="this.className='submit'"  value="上一步" onclick="window.location.href='?step=1'" style="margin-right:20px;" />
<input name="Submit" type="submit" class="submit" onmouseover="this.className='submit2'" onmouseout="this.className='submit'"  value="确 认" />
</form>
</div>
<%end if%>

</body>
</html>
