<% 'Get the manufacturer's name SQL = "SELECT * FROM tblABB WHERE Abb = '" + Replace(Request("manuf"), "'", "''") + "'" set rs=server.createobject("ADODB.recordset") rs.open SQL,conn manufName = "" if not rs.eof then manufName = rs.Fields.Item("Manufacturer").Value end if 'Get all the parts SQL = "SELECT * FROM tblUCParts WHERE OEMID = " + Replace(Request("OEMID"), "'", "''") + "" set rsUC = Server.CreateObject("ADODB.Recordset") rsUC.open SQL,conn set rsOEM = Server.CreateObject("ADODB.Recordset") SQL = "SELECT * FROM tblOEMParts WHERE OEMID = " + Replace(Request("OEMID"), "'", "''") + "" rsOEM.CursorType = 0 rsOEM.CursorLocation = 2 rsOEM.LockType = 3 rsOEM.Open SQL, conn %> United Contact (1985) Inc. :: Online Catalogue

STEP THREE - Results

UC Equivalent for OEM Part #<%=(rsOEM.Fields.Item("OEMPart").Value)%>
 UC Part # <%=(rsUC.Fields.Item("UCPart").Value)%>

Tip Size:
<%=(rsUC.Fields.Item("TipSize").Value)%>
Base Stamping: <%=(rsUC.Fields.Item("BaseStamp").Value)%>
Amp: <%=(rsUC.Fields.Item("Amp").Value)%>
Usage: <%=(rsUC.Fields.Item("Usage").Value)%>
Notes: <%=(rsUC.Fields.Item("Notes").Value)%>

">

 

 

[" class="style9">Back to Listing of <%=manufName%> Parts]