<%'*********** Set Data Connections
SET rs = Server.CreateObject("ADODB.Recordset")
SET cn = Server.CreateObject("ADODB.Connection")
SET cm = Server.CreateObject("ADODB.Command")
cn.Open "DRIVER={SQL Server};SERVER=213.171.201.131;DATABASE=admin;UID=caronk;PWD=Wm968410c"
cm.ActiveConnection = cn
cm.CommandText = "SELECT * FROM dbo_Town"
set rs = cm.Execute
%>
4 Aerials Search