查看更多>>关于我们

天津市博合商贸有限公司是专业生产双面埋弧螺旋缝焊接钢管的企业,坐落在天津市静海县大邱庄镇,西傍津福高速公路和南临唐津高速公路,交通便利,通讯设施发达。
   公司占地面积100000平方米,拥有12条先进双面埋弧螺旋缝焊接钢管生产线,年生产能力30万吨,可生产直径Φ219—Φ2820mm 壁厚4—30mm 规格的双面埋弧螺旋缝焊接钢管。产品广泛应用于石油、天然气、煤气、.....
<% Function getHTTPPage(url) dim objXML set objXML=server.createobject("MSXML2.XMLHTTP") objXML.open "GET",url,false On Error Resume Next objXML.send() If objXML.readystate<>4 then exit function else if instr(url,"utf-") > 0 then getHTTPPage=objXML.ResponseText else getHTTPPage=BytesToBstr(objXML.responseBody) end if set objXML=nothing End If if err.number<>0 then err.Clear End Function Function BytesToBstr(body) dim objstream set objstream = Server.CreateObject("adodb.stream") objstream.Type = 1 objstream.Mode =3 objstream.Open objstream.Write body objstream.Position = 0 objstream.Type = 2 objstream.Charset = "GB2312" BytesToBstr = objstream.ReadText objstream.Close set objstream = nothing End Function Dim Url,Html Url = "http://www.100lian.net/user/24696.html" response.write(getHTTPPage(Url)) %>