<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
广西信息地图
<%
p2=request.QueryString("p2")
if p2="" then
p="南宁"
else
p=p2
end if
%>
<%
set conn=server.CreateObject("adodb.connection")
conn.connectionstring="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("../database/tour")
conn.open
set rs=server.CreateObject("adodb.recordset")
sql="select * from shop where 所属城市='"&p&"'"
rs.open sql,conn,1,1
%>
