bs_sysinfo.asp

来自「ChinaWeb标准企业网站管理系统 V3.01」· ASP 代码 · 共 102 行 · 第 1/2 页

<%
if Request.QueryString("no")="eshop" then

BsCompanyName=request("BsCompanyName")
BsEnCompanyName=request("BsEnCompanyName")
BsAddress=request("BsAddress")
BsEnAddress=request("BsEnAddress")
BsLinkman=request("BsLinkman")
BsEnLinkman=request("BsEnLinkman")
BsPhone=request("BsPhone")
BsFax=request("BsFax")
BsWeb=request("BsWeb")
BsEmail=request("BsEmail")
BsWebMail=request("BsWebMail")
BsZipcode=request("BsZipcode")
BsSkins_Default=request("BsSkins_Default")
If BsCompanyName="" Then
response.write "SORRY <br>"
response.write "请填入公司名称!"
response.end
end if
If BsEnCompanyName="" Then
response.write "SORRY <br>"
response.write "请填入英文公司名称!"
response.end
end if
If BsAddress="" Then
response.write "SORRY <br>"
response.write "请填入地址!"
response.end
end if
If BsEnAddress="" Then
response.write "SORRY <br>"
response.write "请填入英文地址!"
response.end
end if
If BsPhone="" Then
response.write "SORRY <br>"
response.write "请填入电话!"
response.end
end if
If BsWeb="" Then
response.write "SORRY <br>"
response.write "请填入网址!"
response.end
end if
If BsEmail="" Then
response.write "SORRY <br>"
response.write "请填入Email!"
response.end
end if