MODUL PRAKTIKUM MySql

 By : Jaroji, S.Kom

Project kita kali ini adalah, membuat program inventori berbasis client-server dengan menggunakan database MySQL dan laporan menggunakan Crystal Report 10.

Rancangan Database

Nama database: db_inventori

Tabel-tabel:

Membuat modul koneksi

Anda buka program Visual Basic 6.0, lalu pada kotak dialog New Project, 

                    1. Anda pilih Standard EXE. Lihat gambar di bawah ini.

 

2. Kemudian klik menu Project > Add Module, lihat gambar di bawah ini

1.                            3. Untuk dapat mereferensikanan fungsi DDL yang akan diperlukan untuk mengkoneksikan modul ke database, caranya Anda klik menu Project > References.

 

1.                               4. Lalu pada kotak Dialog References, Anda beri tanda centang Microsoft ActiveX Data Object 2.1 Library. Lihat gambar di bawah ini:

Lalu ketikan sintak berikut:

              ---------------------------------------------------------------------------

Option Explicit

Public conn As New ADODB.connection

Public conn2 As New ADODB.connection

Public report As String

Public formula As String

Public Function ConnectDB(ByRef Vdb As ADODB.connection) As Boolean

On Error GoTo err_handler

If Vdb.State = adStateOpen Then Vdb.Close

Vdb.Open "DRIVER={MySQL ODBC 5.1 Driver};" & _

"SERVER=localhost;DATABASE=puskesmas;UID=root;PWD=root;"

ConnectDB = True

Exit Function

err_handler:

If Err.Number = 0 Then

    Resume Next

Else

    Call ErrHandler

End If

End Function

Sub ErrHandler()

    Screen.MousePointer = vbDefault

    Beep

    MSG "Error " & Err.Number & ", " & Err.Description, vbExclamation

End Sub

--------------------------------------------------------------------------

Membuat Design Form

1.      Buka kotak dialog Components, lalu beri centang pada pilihan Microsoft Tabbed Dialog Control 6.0 dan Microsoft Windows Common Controls 5.0 (SP2). Lihat gambar berikut:

 

 

2. Selanjutnya letakkan komponen SSTab, lihat gambar dibawah ini:

3.      Kemudian untuk tab pertama, Anda letakkan komponen ListView. Lihat gambar di bawah ini.

4.      Untuk tab kedua Anda letakkan beberapa komponen seperti Image, Label, TextBox, ComboBox dan CommandButton. Lihat gambar di bawah ini.

 

5.      Perhatikan table berikut, Ubahlah properties seluruh komponen yang tertempel pada lembar form.