<% LO = request.querystring("LOC") response.write LO 'response.end Dim AdoCo Dim RsEnq Dim SQLEN set AdoCon = server.createobject("ADODB.CONNECTION") set RsEnq = server.createobject("ADODB.RECORDSET") AdoCon.Open "Driver={MICROSOFT ACCESS DRIVER (*.mdb)};DBQ=" & server.mappath("/DB/fh.mdb") 'AdoCon.Open "dd" SQLEN = "select * from FreeHoldLocations where LName='" & LO & "'" RsEnq.Open SQLEN, AdoCon,3,3 %> Edit this Location

 

Edit this Location

Select Folder For image  
Select Emirate  
Location ID ">  
Location Name ">  
Description  
Image ">  
Master Developer

">

 
Type ">  
Size ">  
Views ">  
Attractions