<% Mode = request.QueryString("mode") ID = Request.QueryString("id") If Mode = "new" Then set dbMain = server.createobject("ADODB.Connection") dbMain.open dsn set rsNewModels = Server.CreateObject("ADODB.Recordset") sSQL = "SELECT * FROM NewModels WHERE ModelID =" & ID rsNewModels.open sSQL, dbMain, adopenstatic, adlockpessimistic, adcmdtext VehicleInitialValue = "New Vehicle: " & rsNewModels ("Make") & " " & rsNewModels ("Model") End If If Mode = "used" Then set dbMain = server.createobject("ADODB.Connection") dbMain.open dsn set rsUsedVehicle = Server.CreateObject("ADODB.Recordset") sSQL = "SELECT * FROM UsedStock WHERE Stock_ID =" & ID rsUsedVehicle.open sSQL, dbMain, adopenstatic, adlockpessimistic, adcmdtext VehicleInitialValue = "Re: Used Vehicle Stock No. " & rsUsedVehicle ("stock_number") & " " & rsUsedVehicle ("Make") & " " & rsUsedVehicle ("Model") End If %> Threeways Garage enquiry
Threeways Garage Enquiry Form

 

 

 

 

 

First Name (s)
Last Name
Telephone
E-mail address
Comments

back to the top