PERTEMUAN 12

Asc dan Desc

Baiklah hari ini akan memposting tentang Asc Dan Desc, sebelumnya saya akan menjelaskan tentang Asc Dan Desc walapun sebagian dari kita sudah tau tenyang asc dan desc, 

Ascending (deret naik) atau Descending (deret turun) dari suatu record data yang telah dipilih..

Baiklah kita akan langsung ke Syntax. Disini saya masih menggunakan Database Buku.

·         Select * From Buku Group By Pengarang Asc

·         Select * From Buku Order By Judul Desc

PERTEMUAN 11

Assalamu'alaikum wr.wb
Pada Pertemuan ke 11 ini kami  membahas mata kuliah yang Minggu lalu,  Yang Mengenai tentang Database Perpustakaan Dengan menggunakan Fungsi-fungsi sebagai berikut :
-Select count (*) from buku
-select sum (jlh_buku) from buku
-select avg (jlh_buku) from buku
-select max (jlh_buku) from buku
-select min (jlh_buku) from buku
-select ceiling (3.247)
-select floor (3.87)
-select round (4.8731,0)
-select round (4.8731,1)
-select round (4.8731,2)
-select round (4.8731,3)
-select round (4.8731,4)
-select power (2.4)
-select sqrt (225)
-select substring ('interaktive,6,6')
-select ltrim (' praktikum')
-select * from buku order by judul desc
-select * from buku group by pengarang asc

PERTEMUAN 14

Private Sub cmdBaru_Click( )
Adodc1.Recordset.AddNes
End Sub

Private Sub cmdHapus_Click( )
On Error GoTo HapusSalah:
Adodc1.Recordset.Delete
Adodc1.Recordset.MovePrevious

If Adodc1.Recordset.BOF Then
Adodc1.Recordset.MoveFirst
End If

SelesaiHapus:
Exit Sub

HapusSalah:
MsgBox Err.Number & vbCrLf & Err.Description
Resume SelesaiHapus
End Sub

Private Sub cmdKelua_Click( )
If Adodc1.Recordset.EditMode = adEditAdd Then
If MsgBox ("Anda yakin ingin menyimpan data ini?", vbYesNO, "Question") = vbYes Then
Simpan
End If
End If
Unload Me
End Sub

Private Sub Simpan( )
If Adodc1.Recordset.EditMode = adEditAdd Then
On Error GoTo SimpanSalah:
Adodc1.Recordset.Update
On Error GoTo 0
End If

SelesaiSimpan:
Exit Sub

SimpanSalah:
MsgBox Err.Number & vbCrLf & Err.Desciption
Resume SelesaiSimpan
End Sub

Private Sub cmdSimpan_Click( )
Simpan
End Sub

PERTEMUAN 10

Assalamu'alaikum wr.wb
Pada Pertemuan ke 10 ini Saya  ingin Memposting Database Yang Mengenai tentang Database Perpustakaan Dengan menggunakan Fungsi-fungsi sebagai berikut :
-Select count (*) from buku
-select sum (jlh_buku) from buku
-select avg (jlh_buku) from buku
-select max (jlh_buku) from buku
-select min (jlh_buku) from buku
-select ceiling (3.247)
-select floor (3.87)
-select round (4.8731,0)
-select round (4.8731,1)
-select round (4.8731,2) 
-select round (4.8731,3)
-select round (4.8731,4)
-select power (2.4)
-select sqrt (225)
-select substring ('interaktive,6,6')
-select ltrim (' praktikum')
-select * from bukku order by judul desc
-select * from buku group by pengarang asc

PERTEMUAN 9

Fungsi

Pada Pertemuan 9  kami belajar tentang Fungsi syntax  dalam SQL..

·         Fungsi Count berguna untuk menghitung banyaknya baris data (record) dalam suatu table..

select count (*) from Buku

·         Fungsi Sum berguna untuk menjumlahkan semua data yang ada..

select sum (Jlh_Buku) from Buku

·         Fungsi Average berguna untuk menghitung nilai rata - rata..

select avg (Jlh_Buku) from Buku

·         Fungsi Max berguna untuk mencari nilai tertinggi..

select max (Jlh_Buku) from Buku

·         Fungsi Min berguna untuk mencari nilai terendah..

select min (Jlh_Buku) from Buku

·         Fungsi Ceiling berguna untuk membulatkan ke atas dari nilai desimal yang ditempatkan pada ekspresi numerik

select ceiling (3.427)

·         Fungsi Floor berguna untuk membulatkan ke bawah dari nilai desimal yang ditempatkan pada ekspresi numerik

select floor (3.87)

·         Fungsi Round berguna untuk membulatkan nilai desimal sesuai dengan ekspresi nilai yang ada

select round (4.8731,0)

select round (4.8731,1)
select round (4.8731,2)
select round (4.8731,3)
select round (4.8731,4)

·         Fungsi Power

select power (2,4)

·         Fungsi SQRT

select sqrt (225)

PERTEMUAN 13

Aplikasi Visual Basic SQL Server

Koneksi VB ke SQL server

• - Tambahkan control Microsoft ADO data Control 6.0 ( OLEDB) dan Microsoft datalist Control 6.0  (OLEDB) ke toolbox  

• - Tambahkan (Contriol ADODC atau Activex data Object Data Control) ke form. Pada jendela Properties, klik pada kotak di kanan property conection string.

• - Akan muncul kotak dialog property pages. control Data ADO membutuhkan conection string untuk membuka sumber data biblio.MDB. klik pada kotak pilihan use conection string dan klik build
• - Muncul kotak dialog data link properties, pilih microsoft OLEDB Propider for SQL Server, dan klik next.
• - Pada tab conection isilah kotak kotak yang kosong sbb:

 a. Isikan alamat dari SQL Server (co.192.168.195.4)
 b. isikan nama user dan password
 c. Pilih database pada server

• - Dalam jendela properti klik record source, muncul jendela property pages