configsave.asp

购物网站源码有需要的赶快下载机不可失

<%@language=vbscript%>
<%dbdns="../"%>
<!--#include file="../inc/conn.asp"-->
<!--#include file="cook.asp"-->
<%if fla0<>1 then
response.write "<script>alert('操作权限出错，您没有权限操作些功能');history.go(-1);</Script>"
Response.End 
end if

citybottom=request("citybottom")
citycss=request("citycss")
cityurl=request("cityurl")
cityname=request("cityname")
citytitle=request("citytitle")
cityypkey=request("cityypkey")
cityvipypkey=request("cityvipypkey")
citysypkey=request("citysypkey")
cityscakey=request("cityscakey")
cityscafree=request("cityscafree")
cityping=replace(request("cityping"),"”","""")
citysql=replace(request("citysql"),"”","""")
citypingname=request("citypingname")
citydns=request("citydns")
cityscayx=request("cityscayx")
citynewskey=request("citynewskey")
cityxxkey=request("cityxxkey")
cityjobzpkey=request("cityjobzpkey")
cityjobqzkey=request("cityjobqzkey")
cityfreejob=request("cityfreejob")
citycpkey=request("citycpkey")
cityusertk=request("cityusertk")
cityviptk=request("cityviptk")
cityeurl=request("cityeurl")
citymail=request("citymail")
cityzhkey=request("cityzhkey")
citysearch=request("citysearch")
cityabout=request("cityabout")
citycontact=request("citycontact")
citybuy=request("citybuy")
cityadmin=request("cityadmin")

citysy=request("citysy")
citysydate=request("citysydate")
if citysydate="" then citysydate=0
citysyvipdate=request("citysyvipdate")
if citysyvipdate="" then citysyvipdate=0
dnskey=request("dnskey")
dnswww=request("dnswww")
if dnswww="" then dnswww=0
cityHTML=request("cityHTML")
if cityHTML="" then cityHTML=0
citymailsmtp=request("citymailsmtp")
if citymailsmtp="" then citymailsmtp=null
citymaillog=request("citymaillog")
if citymaillog="" then citymaillog=null
citymailpass=request("citymailpass")
if citymailpass="" then citymailpass=null
citymaildns=request("citymaildns")
if citymaildns="" then citymaildns=null

cityuserp=request("cityuserp")
cityuserpm=request("cityuserpm")
if cityuserpm="" then cityuserpm=0
cityvipp=request("cityvipp")
cityvippm=request("cityvippm")
if cityvippm="" then cityvippm=0
cityjysj=request("cityjysj")
if cityjysj="" then cityjysj=0

OKAr=request("OKAr")
OKsize=request("OKsize")
OKArpic=request("OKArpic")
OKsizepic=request("OKsizepic")

for i=0 to 4
b=request(i)
if b="" then b=0
a=a&","&b
next
a=right(replace(a," ",""),len(replace(a," ",""))-1)

if instr(a,1) then
On Error Resume Next
set xTestObj = Server.CreateObject("JMail.SmtpMail")
If Err Then
	response.write "<script>alert('您的服务器暂时不支持 Jmail 发信功能，请联系您的空间商！');history.go(-1);</Script>"
	Response.End
end if
set xTestObj = Nothing
end if

if citybottom="" or citycss="" or cityurl="" or citytitle="" or cityname="" or cityping="" or citypingname="" or citydns="" then
	response.write "<script>alert('请将系统信息填写完整！');history.go(-1);</Script>"
	Response.End 
end if
if citynewskey="" or citysearch="" or citysql="" or cityscayx="" or cityfreejob="" or citycpkey="" or cityusertk="" or cityviptk="" or citymail="" or cityeurl="" then
	response.write "<script>alert('请将系统信息填写完整！');history.go(-1);</Script>"
	Response.End 
end if
if OKsize="" or OKsizepic="" or OKAr="" or OKArpic="" or cityabout="" or citycontact="" or citybuy="" or cityadmin="" then
	response.write "<script>alert('请将系统信息填写完整！');history.go(-1);</Script>"
	Response.End 
end if

Application("citycss")=""

conn.execute("update SMT_config set SMT_citybottom='"&citybottom&"'")
conn.execute("update SMT_config set SMT_citycss='"&citycss&"'")
conn.execute("update SMT_config set SMT_cityurl='"&cityurl&"'")
conn.execute("update SMT_config set SMT_cityname='"&cityname&"'")
conn.execute("update SMT_config set SMT_citytitle='"&citytitle&"'")
conn.execute("update SMT_config set SMT_citysypkey='"&citysypkey&"'")
conn.execute("update SMT_config set SMT_cityvipypkey='"&cityvipypkey&"'")
conn.execute("update SMT_config set SMT_cityypkey='"&cityypkey&"'")
conn.execute("update SMT_config set SMT_cityscakey='"&cityscakey&"'")
conn.execute("update SMT_config set SMT_cityscafree='"&cityscafree&"'")
conn.execute("update SMT_config set SMT_cityping='"&cityping&"'")
conn.execute("update SMT_config set SMT_citysql='"&citysql&"'")
conn.execute("update SMT_config set SMT_citypingname='"&citypingname&"'")
conn.execute("update SMT_config set SMT_citydns='"&citydns&"'")
conn.execute("update SMT_config set SMT_cityscayx='"&cityscayx&"'")
conn.execute("update SMT_config set SMT_citynewskey='"&citynewskey&"'")
conn.execute("update SMT_config set SMT_cityxxkey='"&cityxxkey&"'")
conn.execute("update SMT_config set SMT_cityjobqzkey='"&cityjobqzkey&"'")
conn.execute("update SMT_config set SMT_cityjobzpkey='"&cityjobzpkey&"'")
conn.execute("update SMT_config set SMT_cityfreejob='"&cityfreejob&"'")
conn.execute("update SMT_config set SMT_citycpkey='"&citycpkey&"'")
conn.execute("update SMT_config set SMT_dnskey='"&dnskey&"'")
conn.execute("update SMT_config set SMT_dnswww='"&dnswww&"'")
conn.execute("update SMT_config set SMT_citymailsmtp='"&citymailsmtp&"'")
conn.execute("update SMT_config set SMT_citymaillog='"&citymaillog&"'")
conn.execute("update SMT_config set SMT_citymailpass='"&citymailpass&"'")
conn.execute("update SMT_config set SMT_citymaildns='"&citymaildns&"'")
conn.execute("update SMT_config set SMT_citymailkey='"&a&"'")
conn.execute("update SMT_config set SMT_citysy='"&citysy&"'")
conn.execute("update SMT_config set SMT_citysydate='"&citysydate&"'")
conn.execute("update SMT_config set SMT_citysyvipdate='"&citysyvipdate&"'")
conn.execute("update SMT_config set SMT_cityuserp='"&cityuserp&"'")
conn.execute("update SMT_config set SMT_cityuserpm='"&cityuserpm&"'")
conn.execute("update SMT_config set SMT_cityvipp='"&cityvipp&"'")
conn.execute("update SMT_config set SMT_cityvippm='"&cityvippm&"'")
conn.execute("update SMT_config set SMT_cityjysj='"&cityjysj&"'")
conn.execute("update SMT_config set SMT_cityusertk='"&cityusertk&"'")
conn.execute("update SMT_config set SMT_cityviptk='"&cityviptk&"'")
conn.execute("update SMT_config set SMT_cityeurl='"&cityeurl&"'")
conn.execute("update SMT_config set SMT_citymail='"&citymail&"'")
conn.execute("update SMT_config set SMT_cityzhkey='"&cityzhkey&"'")
conn.execute("update SMT_config set SMT_citysearch='"&citysearch&"'")
conn.execute("update SMT_config set SMT_OKAr='"&OKAr&"'")
conn.execute("update SMT_config set SMT_OKsize='"&OKsize&"'")
conn.execute("update SMT_config set SMT_OKArpic='"&OKArpic&"'")
conn.execute("update SMT_config set SMT_OKsizepic='"&OKsizepic&"'")
conn.execute("update SMT_config set SMT_cityabout='"&cityabout&"'")
conn.execute("update SMT_config set SMT_citycontact='"&citycontact&"'")
conn.execute("update SMT_config set SMT_citybuy='"&citybuy&"'")
conn.execute("update SMT_config set SMT_cityadmin='"&cityadmin&"'")
conn.execute("update SMT_config set SMT_cityHTML='"&cityHTML&"'")
cityHTML
conn.close
set conn=nothing

	Response.Redirect "config.asp"
conn.close
set conn=nothing
%>