<%
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