<%@LANGUAGE="VBSCRIPT" CODEPAGE="950"%> <% Dim General__MMColParam General__MMColParam = "General Purpose Transformers" if (Request.QueryString("General Purpose Transformers") <> "") then General__MMColParam = Request.QueryString("General Purpose Transformers") %> <% set General = Server.CreateObject("ADODB.Recordset") General.ActiveConnection = MM_Magnetic_STRING General.Source = "SELECT distinct DocNo, DocNoDescription, SeriesPdf FROM magnetic WHERE Application = '" + Replace(General__MMColParam, "'", "''") + "' and SeriesPdf like '%.pdf' ORDER BY DocNo ASC" General.CursorType = 0 General.CursorLocation = 2 General.LockType = 3 General.Open() General_numRows = 0 %> <% Dim GeneralSingle__MMColParam GeneralSingle__MMColParam = "General Purpose Transformers" if (Request("MM_EmptyValue") <> "") then GeneralSingle__MMColParam = Request("MM_EmptyValue") %> <% set GeneralSingle = Server.CreateObject("ADODB.Recordset") GeneralSingle.ActiveConnection = MM_Magnetic_STRING GeneralSingle.Source = "SELECT PN, PNDescription, SinglePdf FROM magnetic WHERE Application = '" + Replace(GeneralSingle__MMColParam, "'", "''") + "' and SinglePdf like '%.pdf' ORDER BY PN ASC" GeneralSingle.CursorType = 0 GeneralSingle.CursorLocation = 2 GeneralSingle.LockType = 3 GeneralSingle.Open() GeneralSingle_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 General_numRows = General_numRows + Repeat1__numRows %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = -1 Repeat2__index = 0 GeneralSingle_numRows = GeneralSingle_numRows + Repeat2__numRows %> 無標題文件
Magnetic Components>>General Purpose Transformers

<% While ((Repeat1__numRows <> 0) AND (NOT General.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 General.MoveNext() Wend %>
Doc/N
Description
<%=(General.Fields.Item("DocNo").Value)%> <%=(General.Fields.Item("DocNoDescription").Value)%>

<% If Not GeneralSingle.EOF Or Not GeneralSingle.BOF Then %>
Single Data Sheet
<% While ((Repeat2__numRows <> 0) AND (NOT GeneralSingle.EOF)) %> <% Repeat2__index=Repeat2__index+1 Repeat2__numRows=Repeat2__numRows-1 GeneralSingle.MoveNext() Wend %>
P/N
Description
<%=(GeneralSingle.Fields.Item("PN").Value)%> <%=(GeneralSingle.Fields.Item("PNDescription").Value)%>

<% End If ' end Not GeneralSingle.EOF Or NOT GeneralSingle.BOF %> Copyright©2003 Universal Microelectronics.
For comments or questions about this site, contact us at

<% General.Close() %> <% GeneralSingle.Close() %>