%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
if(Request.QueryString("ID") <> "") then Command1__MMColparam = Request.QueryString("ID")
%>
<%
Dim datum__MMColParam
datum__MMColParam = "1"
If (Request.QueryString("ID") <> "") Then
datum__MMColParam = Request.QueryString("ID")
End If
%>
<%
Dim datum
Dim datum_numRows
Set datum = Server.CreateObject("ADODB.Recordset")
datum.ActiveConnection = MM_zs_tech_STRING
datum.Source = "SELECT * FROM datum WHERE ID = " + Replace(datum__MMColParam, "'", "''") + ""
datum.CursorType = 0
datum.CursorLocation = 2
datum.LockType = 1
datum.Open()
datum_numRows = 0
%>
<%
set Command1 = Server.CreateObject("ADODB.Command")
Command1.ActiveConnection = MM_zs_tech_STRING
Command1.CommandText = "UPDATE datum SET zl_ip=zl_ip+1 WHERE ID=" + Replace(Command1__MMColparam, "'", "''") + " "
Command1.CommandType = 1
Command1.CommandTimeout = 0
Command1.Prepared = true
Command1.Execute()
%>
专业吸尘器
|
| |
莱盛第II代专业吸尘器(LS-XC-II) |
| |
莱盛针对激光打印机粉盒再生需求而开发的专用吸尘器,吸力强劲,除尘效率高,携带方便,操作简单。配带多种可组装配件,可单独更换滤芯。配有吸尘软管,短吸嘴,长吸嘴、毛刷嘴等,是硒鼓再生、粉尘清理,机器内部清洁的上佳选择。
质量保证:电机、过滤器免费保修3个月,其它部件免费保修6个月。
|
|
|
|
<%
datum.Close()
Set datum = Nothing
%>