<% ' open connection %>
<% on error resume next %>
<% set dbconn = server.createobject("ADODB.Connection") %>
<% dbconn.open "DSN=triggerit;UID=johnwhite;PWD=notthepassword;DATABASE=johnwhite" %>
<%
' Get incoming ID
id =request("id")
if id="" then
dbconn.close
response.redirect("retrieve_proposals.asp")
else
Set dbproposal = Server.CreateObject("ADODB.Recordset")
proposalSQL="SELECT * FROM proposal WHERE id='"+cstr(id)+"'"
dbproposal.open proposalSQL, dbconn, adopenstatic, adlockpessimistic, adcmdtext
if dbproposal.eof then
dbconn.close
response.redirect("retrieve_proposals.asp")
else
%>
Audit Proposals
Enter the following information to retrieve your quote::