Pada Tutorial SQL kali ini akan dibahas Penggunaan Dari SQLORDER BY. Penggunaan SQL ORDER BY biasa digunakan untuk mengurutkan sebuah kolom, apakah ingin diurutkan dari angka terkecil ke terbesar (ASC) atau dari terbesar ke terkecil (DESC)
Syntaq dasarnya adalah sebagai berikut :
SELECT column_name(s) FROM table_name ORDER BY column_name [ASC|DESC]Untuk mempraktikannya ikuti langkah dibawah ini :
Buatlah sebuah Folder dengan Nama "Latihanku"
Buat database dengan nama : DBPintarvb.mdb
Masukan database DBPintarvb.mdb tersebut pada folder "Latihanku"
Tambahkan Tabel "Barang" dan Design Tabel Barang adalah sebagai berikut :
Kemudian masukan data pada Tabel Barang seperti contoh dibawah ini :
Buka Visual Basic 6.0 anda, kemudian simpan didalam Folder "Latihanku"
Buatlah Form seperti gambar dibawah ini :
Kemudian pada Form1 masukan Koding dibawah ini :
Dim Conn As New ADODB.ConnectionKemudian Run atau Jalankan Program, jika sukses maka akan muncul seperti dibawah ini :
Dim RSBarang As ADODB.Recordset
Sub BukaDB()
Set Conn = New ADODB.Connection
Set RSBarang = New ADODB.Recordset
Conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DBPintarvb.mdb"
End Sub
Private Sub Form_Activate()
Call BukaDB
Conn.CursorLocation = adUseClient
RSBarang.Open "SELECT * FROM barang ORDER BY NamaBarang ASC", Conn
Set DataGrid1.DataSource = RSBarang.DataSource
End Sub
Hasil dari Koding diatas adalah Menyeleksi Tabel Barang dengan Mengurutkan NamaBarang secara urut dari A sampai Z, anda juga bisa mengurutkan dari Z sampai A dengan mengganti ASC menjadi DESC
Semoga bermanfaat,
Salam
Pintar VB | Tutorial Visual Basic 6.0 dan Visual Basic .Net
Update Contact :
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email : Fajarudinsidik@gmail.com
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email: Fajarudinsidik@gmail.com
atau Kirimkan Private messanger melalui email dengan klik tombol order dibawah ini :