<% CountFile=Server.MapPath("//simplecounter.txt") SET FileObject=Server.CreateObject("Scripting.FileSystemObject") Set Out=FileObject.CreateTextFile(CountFile,TRUE,FALSE) counter= counter + 1 Out.WriteLine(9) Out.Close %>
BeiJing Amagic Investment Co.Ltd
北京乾坤上下投资有限公司
