<%If Lcase(Request("Action"))="about" then Response.Write "" Elseif lcase(Request("Action"))="contact" then Response.Write "" Elseif Lcase(Request("Action"))="jtcg" then Response.Write "集团采购" Else Response.Write "集团采购" End if %>
Home >> <%If Lcase(Request("Action"))="about" then Response.Write "关于我们" Elseif lcase(Request("Action"))="contact" then Response.Write "联系我们" Elseif Lcase(Request("Action"))="jtcg" then Response.Write "集团采购" Else Response.Write "集团采购" End if %>
 
<%Set Rs=Server.Createobject("adodb.recordset") Rs.Open "Select about,lxwm,jtcg from shop_config ",Conn,1,1 If Lcase(Request("Action"))="about" Then Response.Write Rs("about") Elseif Lcase(request("Action"))="contact" Then Response.Write Rs("lxwm") Elseif Lcase(Request("Action"))="jtcg" Then Response.write Rs("jtcg") Else Response.Write Rs("about") End if Rs.Close Set Rs=Nothing %>
<% CloseConn() %>