<% Dim ObjCounterFile, ReadCounterFile, WriteCounterFile, CounterFile Dim CounterHits, FixedDigitCount, DigitCount, DigitCountLength Dim DigitZerosToAdd, DigitZeroCount, ShowDigits, DigitPath FixedDigitCount=5 DigitPath ="../pic_root" On Error Resume Next Set ObjCounterFile = Server.CreateObject("Scripting.FileSystemObject") CounterFile = Server.MapPath("/database/Counter.txt") Set ReadCounterFile = ObjCounterFile.OpenTextFile (CounterFile, 1, True) If Not ReadCounterFile.AtEndOfStream Then CounterHits = Trim(ReadCounterFile.ReadLine) If CounterHits = "" Then CounterHits = 0 Else CounterHits = 0 End If ReadCounterFile.Close Set ReadCounterFile= Nothing CounterHits = CounterHits + 1 Set WriteCounterFile = ObjCounterFile.CreateTextFile (CounterFile, True) WriteCounterFile.WriteLine(CounterHits) WriteCounterFile.Close Set WriteCounterFile = Nothing Set ObjCounterFile = Nothing DigitCountLength = Len(CounterHits) If DigitCountLength < FixedDigitCount Then DigitZerosToAdd = FixedDigitCount - DigitCountLength DigitZeroCount = 1 For DigitZeroCount = DigitZeroCount to DigitZerosToAdd ShowDigits = ShowDigits & "" Next End If DigitCount = 1 For DigitCount = DigitCount to DigitCountLength ShowDigits = ShowDigits & "" Next %>
  

 

Beberapa asset SIF akan kami jual dengan harga MENARIK.

Spesifikasi :

 detail   ..........

 

 

Visitors

visitor counter free
%>
<%
Kami berusaha meningkatkan mutu Website   kami.   Saran   dan    kritik membangun  Anda   kami  nantikan
INFO PERUSAHAAN

Struktur Management
 Komisaris & Direksi

 Profile SIF
TIPS


Aneka Tips Berkendaraan

S e q i l a s    I n f o :

Launching Suzuki Splash

Segera setelah Suzuki Splash diperkenalkan dikalangan pers pada tanggal 4 dan 5 Maret 2010 di Denpasar dan Dealer Suzuki pada tanggal 11 Maret 2010 di Bandung, 21 Maret 2010 Suzuki Splash diperkenalkan secara luas melalui sebuah acara di Indosiar yang berlangsung dari jam 21.30 hingga 22.30. Dengan pemandu acara Yossie dan Yuanita, acara juga dimeriahkan oleh Yovie & Nuno, Sherina, Zigas, The Dance Company dan magician Damian. Dalam acara inipun diselenggarakan live quiz berhadiah satu unit Suzuki Sky Drive 

Informasi / Pemasaran  :  ( 021 )  8579095  -  ext. 202