<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> [an error occurred while processing this directive] <% Dim Recordset1 Dim Recordset1_numRows Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_maklumat_STRING Recordset1.Source = "SELECT * FROM komen ORDER BY Nama ASC" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %> Untitled Document

..........................Buku Tamu Pengguna

<% While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) %>


--Welcome--

Pilihan Artist


Ahli Fikir
Download Lagu
Samseng

Lirik Lagu

Download Music
Kristal-Seragam Hitam
Kenny Remi Martin - Suratan Atau Kebetulan
Robbie William feat. Nicole Kidman - Something Stupid
Too Phat-Anak Ayam

Jadual Air 2005
Khas kepada peminat yang suka memancing.
Download

Lokasi Memancing
Lumut, Perak.
Segari, Perak

Lagu MIDI
Now Playing




Carta Lagu CRs
1) Samseng-Ahli Fikir
2) KRU feat Adam-Terhangat di Pasaran
3) Spider-Cinta Dewa Dewi
4) Kristal-Suatu Kenangan
5) Potret-Bagaikan Langit
6) Zahid-Milikku
7) Too Phat-Alhamdulilah
8) Waheeda-Albi
9) Ezlynn-Pening
10) Bob-Cinta Seorang Teman

Pilihan lagu CRstudios
Januari

Perisian Pilihan
Macromedia
Flash MX
Dreamwever MX
Director MX
Free Hand MXa
Coldfussion

Adobe
Photoshop 7.0
Premier 6.5

Discreet
3ds Max 7

Alias
Maya Unlimited 6.0

New Tek
Lightwave

Sony
Sound Forge
Vegas 5.0a

Solid Works

 






<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Recordset1.MoveNext() Wend %>

 

 

 

 

<% Recordset1.Close() Set Recordset1 = Nothing %>