<% Dim Counter Sub IncrementCounter() Set fs = Server.CreateObject("Scripting.FileSystemObject") counter_file = Server.MapPath("counter.txt") Set txt = fs.OpenTextFile(counter_file) Counter = txt.ReadLine txt.Close Counter = Counter + 1 Set txt = fs.CreateTextFile( counter_file, True ) txt.WriteLine(Counter) txt.Close End Sub Application.Lock IncrementCounter Application.UnLock Function GCounter( counter ) Dim S, i, G S = CStr( counter ) For i = 1 to Len(S) G = G & "" Next GCounter = G End Function c=gcounter(counter) %> 巩义市丰远机械制造有限公司

    巩义市丰远机械制造有限公司是生产系列选矿设备、粘土真空制砖机、多孔压砖机 。矿山设备:对国营、个体开发矿山尤其对选锌、铅、铁、金银等十多种有色金属和非金属具有丰富的经验。有专门负责工艺设备的工程师,对用户的矿样可在厂中试,真正做到对用户负责。现在我公司已具备:日处理20T,高达3000吨的系列一条龙生产线。
    巩义市丰远机械有限公司建址二十多年来,已建立新老客户上千家。并真正做到客来千里守信誉,货送万家保质量。由于我公司多年来坚持以质求存,不断更新,取众家所长,辟其短,使设备高效,节能,丰远牌系列设备得到了用户的广泛赞誉。

 
企业邮局登陆
Copyright© 2004  巩义市丰远机械制造有限公司  版权所有

<%= c %>