% Set fs = CreateObject("Scripting.FileSystemObject") Wfile=server.mappath("\") & "\counter001.txt" on error resume next Set a = fs.OpenTextFile(Wfile) hits = Clng(a.ReadLine) hits = hits + 1 a.close if error then hits = 1 end if Set a = fs.CreateTextFile(Wfile,True) a.WriteLine(hits) a.Close %>
![]() ![]() |
![]() ![]() |
Singa Plastics Limited, which began as a manufacturer and supplier of quality pails and basins to the domestic market three decades ago, has in recent years become a leading plastic products manufacturer with affiliated plants in ASEAN. The company also offers custom moulding and assembly services.
Brimming with enthusiasm and confidence, the Singa Plastics team continues to be driven by its commitment to regionalisation with the motto " Total Customer Satisfaction in Our Quality" from attending to customer enquiries, through product design, to production and delivery. |
|
Singa Plastics Limited Note:The Company reserves the right to amend or Disclaimer : Features & specifications are subjected to change.
Designed by PACE Advertising Private Limited |