河北新大东纺织印染有限公司:::::牛仔布::::棉纱:::::坯布:::::

<% Dim Counter Sub IncrementCounter() ' 建立一 FileSystemObject 对象 Set fs = Server.CreateObject("Scripting.FileSystemObject") counter_file = Server.MapPath("counter.txt") ' 启动 /counter.txt 文件，并且读取记录在文件中的 counter Set txt = fs.OpenTextFile( counter_file ) Counter = txt.ReadLine txt.Close ' 将计数器加一 Counter = Counter + 1 ' 将计数器写入 /counter.txt 文件之中 Set txt = fs.CreateTextFile( counter_file, True ) txt.WriteLine(Counter) txt.Close End Sub Application.Lock IncrementCounter ' 将访问者计数器加一，并写入文件中 Application.UnLock %> 河北新大东纺织印染有限公司:::::牛仔布::::棉纱:::::坯布:::::

	简体中文 ENGLISH
	Eager to do the public good in taking on social responsibility Try our best to support public education and contribute to society The young are the main force for our socialism modern construction, are the hope of national prosperity. Now in the poor rural areas there are still large quantity of children living and studying in a bad way for the different level of economic development. We as a private corporation, just try our best to do more for the children to live healthy and happily. Commonweal has been made as one of our social mission---which are holy.and glorious.