無標題文件

<%@LANGUAGE="VBSCRIPT" CODEPAGE="950"%> <% Dim ComChoke__MMColParam ComChoke__MMColParam = "Telecom\Common Mode Choke" If (Request("MM_EmptyValue") <> "") Then ComChoke__MMColParam = Request("MM_EmptyValue") End If %> <% set ComChoke = Server.CreateObject("ADODB.Recordset") ComChoke.ActiveConnection = MM_Magnetic_STRING ComChoke.Source = "SELECT distinct DocNo, DocNoDescription, SeriesPdf FROM magnetic WHERE Application LIKE '%" + Replace(ComChoke__MMColParam, "'", "''") + "%' and SeriesPdf like '%.pdf' ORDER BY DocNo ASC" ComChoke.CursorType = 0 ComChoke.CursorLocation = 2 ComChoke.LockType = 3 ComChoke.Open() ComChoke_numRows = 0 %> <% Dim ComSingle__MMColParam ComSingle__MMColParam = "Telecom\Common Mode Choke" If (Request("MM_EmptyValue") <> "") Then ComSingle__MMColParam = Request("MM_EmptyValue") End If %> <% set ComSingle = Server.CreateObject("ADODB.Recordset") ComSingle.ActiveConnection = MM_Magnetic_STRING ComSingle.Source = "SELECT PN, PNDescription, SinglePdf FROM magnetic WHERE Application LIKE '%" + Replace(ComSingle__MMColParam, "'", "''") + "%' and SinglePdf like '%.pdf' ORDER BY PN ASC" ComSingle.CursorType = 0 ComSingle.CursorLocation = 2 ComSingle.LockType = 3 ComSingle.Open() ComSingle_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 ComChoke_numRows = ComChoke_numRows + Repeat1__numRows %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = -1 Repeat2__index = 0 ComSingle_numRows = ComSingle_numRows + Repeat2__numRows %> 無標題文件

Magnetic Components>>Telecommunications>>Common Mode Choke/Line Filter

<% While ((Repeat1__numRows <> 0) AND (NOT ComChoke.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 ComChoke.MoveNext() Wend %>

Doc/N	Description
<%=(ComChoke.Fields.Item("DocNo").Value)%>	<%=(ComChoke.Fields.Item("DocNoDescription").Value)%>	">

Single Data Sheet
<% While ((Repeat2__numRows <> 0) AND (NOT ComSingle.EOF)) %> <% Repeat2__index=Repeat2__index+1 Repeat2__numRows=Repeat2__numRows-1 ComSingle.MoveNext() Wend %>

P/N	Description
<%=(ComSingle.Fields.Item("PN").Value)%>	<%=(ComSingle.Fields.Item("PNDescription").Value)%>	">

<% ComChoke.Close() %> <% ComSingle.Close() %>