<% '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)%>

">