<%@LANGUAGE="VBSCRIPT"%> <% Dim ors__MMColParam ors__MMColParam = "1" If (Request.QueryString("standard_code") <> "") Then ors__MMColParam = Request.QueryString("standard_code") End If %> <% Dim ors Dim ors_numRows Set ors = Server.CreateObject("ADODB.Recordset") ors.ActiveConnection = MM_lj1_STRING ors.Source = "SELECT BOOK_CODE, BOOK_NAME, PRICE, class, standard_code, page_num FROM SALE_BOOK_DETAIL WHERE standard_code = '" + Replace(ors__MMColParam, "'", "''") + "'" ors.CursorType = 0 ors.CursorLocation = 2 ors.LockType = 1 ors.Open() ors_numRows = 0 %> <% Dim ors1__MMColParam ors1__MMColParam = "1" If (Request.QueryString("standard_code") <> "") Then ors1__MMColParam = Request.QueryString("standard_code") End If %> <% Dim ors1 Dim ors1_numRows Set ors1 = Server.CreateObject("ADODB.Recordset") ors1.ActiveConnection = MM_lj1_STRING ors1.Source = "SELECT begin_date, apply_date, replace_id FROM normal_detail WHERE standard_code = '" + Replace(ors1__MMColParam, "'", "''") + "'" ors1.CursorType = 0 ors1.CursorLocation = 2 ors1.LockType = 1 ors1.Open() ors1_numRows = 0 %>


网站首页	书店首页	新书导购	热点推荐	标准订购	标准查询	联系我们

名称：福建省新标准科技书店

地址：福州市六一北路15号（福建省技术监督情报研究所内一层)

法人代表：江文

联系人：江文林晃柯毅黄莉萍

邮编：350013

电话：0591-87576514, 0591-87575700, 0591-87570709

传真：0591-87599619

e-mail: xbz@fjqi.gov.cn

建议使用800*600屏幕分辨率和IE4.0以上版本

<% ors.Close() Set ors = Nothing %> <% ors1.Close() Set ors1 = Nothing %>