PostgreSQL to VB

Tutorial kali ini kita akan membahas bagaimana mengolah data menggunakan database PostgreSQl dengan Visual Basic... Seperti gambar diatas...

Componen: Datagrid..

Buat Database: lihat gambar dibawah ini...


setelah database penjualan di buat, maka untuk membuat table pada PostgreSQL, ikuti langkah dibawah ini..

Connect to database penjualan
==============================


Buat table
===============================


Connect to DSN
untuk dapat di akses dengan visual basic, kita harus menghubungkan database penjualan ke dalam Driver ODBC, seperti gambar dibawah ini:



Buat DSN


Ok bro.. kembali ke Visual basic..
isikan source code di bawah ini:

Dim CN As New ADODB.Connection
Dim RS As New ADODB.Recordset


Private Sub cmdExit_Click()
Unload Me
End Sub

Private Sub Form_Load()
Set CN = New ADODB.Connection
'cara pertama
CN.Open "Driver={PostgreSQL ANSI};Server=localhost;Port=5432;Database=penjualan;Uid=postgres;Pwd=mahmud;"
'cara ke dua
'CN.Open "DSN=inventory;" & _
"UID=postgres;" & _
"PWD=mahmud;" & _
"database=penjualan"

TData
End Sub

Private Sub TData()
Set RS = New ADODB.Recordset
RS.CursorLocation = adUseClient
RS.Open "SELECT * from Pelanggan", CN, adOpenDynamic, adLockPessimistic
Set DataGrid1.DataSource = RS
DataGrid1.Refresh
End Sub

=================================================================================
silahkan download program..