%@LANGUAGE="VBSCRIPT" CODEPAGE="950"%> <% Dim Commom__MMColParam Commom__MMColParam = "Power Products\Common Mode" If (Request("MM_EmptyValue") <> "") Then Commom__MMColParam = Request("MM_EmptyValue") End If %> <% set Commom = Server.CreateObject("ADODB.Recordset") Commom.ActiveConnection = MM_Magnetic_STRING Commom.Source = "SELECT distinct DocNo, DocNoDescription, SeriesPdf FROM magnetic WHERE Application LIKE '%" + Replace(Commom__MMColParam, "'", "''") + "%' and SeriesPdf like '%.pdf' ORDER BY DocNo ASC" Commom.CursorType = 0 Commom.CursorLocation = 2 Commom.LockType = 3 Commom.Open() Commom_numRows = 0 %> <% Dim CommomSingle__MMColParam CommomSingle__MMColParam = "Power Products\Common Mode" If (Request("MM_EmptyValue") <> "") Then CommomSingle__MMColParam = Request("MM_EmptyValue") End If %> <% set CommomSingle = Server.CreateObject("ADODB.Recordset") CommomSingle.ActiveConnection = MM_Magnetic_STRING CommomSingle.Source = "SELECT PN, PNDescription, SinglePdf FROM magnetic WHERE Application LIKE '%" + Replace(CommomSingle__MMColParam, "'", "''") + "%' and SinglePdf like '%.pdf' ORDER BY PN ASC" CommomSingle.CursorType = 0 CommomSingle.CursorLocation = 2 CommomSingle.LockType = 3 CommomSingle.Open() CommomSingle_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Commom_numRows = Commom_numRows + Repeat1__numRows %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = -1 Repeat2__index = 0 CommomSingle_numRows = CommomSingle_numRows + Repeat2__numRows %>
| Doc/N |
Description |
|
| <%=(Commom.Fields.Item("DocNo").Value)%> | <%=(Commom.Fields.Item("DocNoDescription").Value)%> |
| P/N |
Description |
|
| <%=(CommomSingle.Fields.Item("PN").Value)%> | <%=(CommomSingle.Fields.Item("PNDescription").Value)%> |
Copyright©2003 Universal Microelectronics.
For comments or questions about this site, contact us ![]()