無標題文件

<%@LANGUAGE="VBSCRIPT" CODEPAGE="950"%> <% Dim SMD__MMColParam SMD__MMColParam = "SMD Power Inductor" If (Request("MM_EmptyValue") <> "") Then SMD__MMColParam = Request("MM_EmptyValue") End If %> <% set SMD = Server.CreateObject("ADODB.Recordset") SMD.ActiveConnection = MM_Magnetic_STRING SMD.Source = "SELECT distinct DocNo, DocNoDescription, SeriesPdf FROM magnetic WHERE Application LIKE '%" + Replace(SMD__MMColParam, "'", "''") + "%' and SeriesPdf like '%.pdf' ORDER BY DocNo ASC" SMD.CursorType = 0 SMD.CursorLocation = 2 SMD.LockType = 3 SMD.Open() SMD_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 SMD_numRows = SMD_numRows + Repeat1__numRows %> 無標題文件

Magnetic Components>>Power Products>>SMD Power Inductor

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

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

<% SMD.Close() %>