<% %> <% Dim rs,conn set conn = server.CreateObject("ADODB.Connection") set rs = server.CreateObject("ADODB.Recordset") conn.Open "DB2863A","","" 'on error resume next 'err.clear ' set conn = server.CreateObject("adodb.connection") ' conn.Open "DB2863A","","" ' %> <%%> <% DIM myImageVar myImageVar = Request.Querystring("ID") 'ssql= "Select * from authorized WHERE ID = 1008 " ssql= "Select * from authorized WHERE ID = " & myImageVar & " " 'response.write ssql rs.Open sSQL,conn %>
<%=rs("ListingCity")%> Process Serving 

value="yes" style="color: #000000">

<%=rs("FirstName")%>  <%=rs("MI")%>  <%=rs("Name")%> Court Filing value="yes">
<%=rs("Company")%> Court Searches value="yes">

<%=rs("Address1")%>

Skip Tracing value="yes">

<%=rs("Address2")%>

Photocopying value="yes" e>
<%=rs("City")%>  <%=rs("State")%>  <%=rs("Zip")%> Private Investigations value="yes" e>
  <%=rs("country")%> Subpoena Prep value="yes" e>
<%=rs("phone")%>     <%=rs("phone2")%> International Service value="yes" e>
Fax: <%=rs("Fax")%> Translations value="yes" e>

Email: "> <%=rs("email")%>

Notary Closings value="yes" e>

Website: "> <%=rs("web")%>

 Foreclosure Sale Representation value="yes" e>

Areas Served: <%=rs("counties")%>  

Additional Services:  <%=rs("Other_Services")%>

<% RS.Close conn.close set conn = nothing set RS = nothing %>



Search Again