<%@LANGUAGE="VBSCRIPT"%> <% Dim Rs1stCat__MMColParam Rs1stCat__MMColParam = "1" If (Request.QueryString("CatalogID") <> "") Then Rs1stCat__MMColParam = Request.QueryString("CatalogID") End If %> <% Dim Rs1stCat Dim Rs1stCat_numRows Set Rs1stCat = Server.CreateObject("ADODB.Recordset") Rs1stCat.ActiveConnection = MM_connecboser_STRING Rs1stCat.Source = "SELECT * FROM tbProducts WHERE CatalogID = " + Replace(Rs1stCat__MMColParam, "'", "''") + " ORDER BY ProductID DESC" Rs1stCat.CursorType = 0 Rs1stCat.CursorLocation = 2 Rs1stCat.LockType = 1 Rs1stCat.Open() Rs1stCat_numRows = 0 %> <% Dim MM_paramName %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm If (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> Industrial Single Board Computer,Industrial Panel PC, IPC - BOSER Technology Co., Ltd.

-- SBC
-- Panel PC
-- Bare Bone System
-- Chassis
-- Power Supply
-- Backplane
-- Peripheral



Environmental Policy

Compliance to relevant environmental legislation and regulations, and with other regulations effecting the design and production of our products as they arise. Establishing and reviewing environmental objectives, targets, performance evaluation procedures and associated environmental indicators.

Minimizing any adverse environmental impacts of new product development through the use of integrated environmental management procedures and planning.

Communicating this policy to all employee-partners, business associates and interested parties in the public sector.

These guiding principles set our goals for environmental responsibility and the performance required by all our organizations, against which subsequent actions will be assessed. To ensure success, Ms. Yu-Yao Huang, Director of Quality and Service, has the executive responsibility and authority to oversee and implement this policy at all Boser owned facilities


Environmental Declaration
Environmental Friendly, Our first priority

Copyright© BOSER Technology Co., Ltd. all rights reserved.
All trademarks and brand names are the registered trademarks of their respective companies.