' Open the Database Connection
Set Con = Server.CreateObject( "ADODB.Connection" )
Con.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db\Addlst.mdb"),"",""
sql ="Select * From Added where Place='"& Request.QueryString("Place") &"'"
'sql ="Select * From Added where Place='"& pcID &" ' "
'request.querystring sqlString
response.write sql
response.end
Set Rs = Con.Execute(sql)
If Rs.EOF Then
%>
No records.
<%Else%>