<%@ Language=VBScript %>


Islamic Locator - HOME

<% ' if you do not define the param, after returning from ' on enter, theParam will be null dim theParam theParam=Request.QueryString("sid") 'QueryString for Get and Request.Form for Post Set connection = Server.CreateObject("ADODB.Connection") connection.Open "geofinder" strSql= "select * from Organization " &_ "where (ID= "&_ theParam &_ ")" Set recordset = connection.Execute (strSql) Response.Write("
") Response.Write("" & Recordset("Name") & "
") Response.Write(Recordset("Address1") & "
") Response.Write(Recordset("Address2") & "
") Response.Write(Recordset("City") & "
") Response.Write(Recordset("State") & "
") Response.Write(Recordset("Zip") & "
") Response.Write(Recordset("Country") & "
") Response.Write("Telephone Number: ") Response.Write(Recordset("Field8") & "
") Response.Write("
") response.write "
" response.write "" response.write "" response.write "" response.write "" response.write "" response.write "
" %>

 

de