<% function getlengthb(g_str,g_num,g_r) dim g_i,g_s,g_n if lenb(g_str)>g_num then g_s="" g_n=0 for g_i=1 to len(g_str) if asc(mid(g_str,g_i,1))<0 or asc(mid(g_str,g_i,1))>255 then g_n=g_n+2 else g_n=g_n+1 end if if g_n<=g_num then g_s=g_s & mid(g_str,g_i,1) else exit for end if next g_s=g_s & g_r else g_s=g_str end if getlengthb=g_s end function dim newStr,newStr2 set rs=server.CreateObject ("adodb.recordset") sql="select top 13 * from ht_xw where class in (select id from ht_xw_class where keys='yaowen') order by id desc" rs.Open sql,conn,3 str="" for i=1 to 8 if rs.eof then exit for end if newStr=newStr & "
  • "&getlengthb(realdata(rs("bt")),34,"…")&"" rs.MoveNext if not rs.eof then newStr=newStr & "" newStr=newStr & "" newStr=newStr & "
    " end if newStr=newStr & "
  • " next for i=1 to 5 if rs.eof then exit for end if newStr2=newStr2 & "
  • "&getlengthb(realdata(rs("bt")),34,"…")&"" rs.MoveNext if not rs.eof then newStr2=newStr2 & "" newStr2=newStr2 & "" newStr2=newStr2 & "
    " end if newStr2=newStr2 & "
  • " next %> 北京航天拓扑高科技有限责任公司
     

     

     

     

    客户服务

        我们在工厂生产线自动化控制及计算机管理、城市燃气输配调度监控与数据采集、集中供热计算机监控调度、城镇供水计算机监控调度和污水处理等民用领域有近二十年的丰富经验,仅在烟草行业就实施过近二百个工程;在市政公用行业业绩众多,也是当前承接过国内城市燃气输配调度监控与数据采集系统规模最大的公司。

    主要用户
    • 厦门华润燃气有限公司
    • 淮北华润燃气有限公司
    • 西宁中油燃气有限责任公司
    • 海南民生管道燃气有限公司
    • 中共中央办公厅警卫局
    • 北京市燃气集团
    • 南京港华燃气有限公司
    • 丹阳港华燃气有限公司
    • 宜兴港华燃气有限公司
    • 南京江宁区煤气(集团)
    • 张家港港华燃气有限公司
    • 江苏省天然气投资开发有限公司
    • 霸州华油燃气有限公司
    • 山西天然气股份有限公司
    • 唐山市古冶燃气有限公司
    • 唐山市海港燃气有限公司
    • 廊坊百川天然气销售有限公司
    • 广东中烟工业有限责任公司湛江卷烟厂
    • 广东中烟工业有限责任公司梅州卷烟厂
    • 广东中烟工业有限责任公司韶关卷烟厂
    • 山东中烟工业公司青州卷烟厂
    • 山东中烟工业公司滕州卷烟厂
    • 山东中烟工业公司济南卷烟厂
    • 深圳烟草工业公司
    • 武汉烟草集团有限公司
    • 浙江中烟工业有限责任公司杭州卷烟厂
    • 河南中烟工业公司许昌卷烟厂
    • 北京卷烟厂
    • 安徽中烟工业公司合肥卷烟厂
    • 江苏中烟工业公司南京卷烟厂
    • 深圳卷烟厂
    • 洛阳卷烟厂
    • 淮阴卷烟厂
    • 新疆卷烟厂


    版权所有:北京航天拓扑高科技有限责任公司  电 话:010-58080888或0816 传 真:58080802或0814  E-mail:service@aerotop.com.cn