Buat Database Menggunakan Script pada Microsoft Visual Basic 6.0

Pada Microsoft VB 6.0 sudah disediakan Tool untuk membuat file database yaitu Visual Data Manager. Selain menggunakan tool tersebut, kita bisa membuat database dengan menggunakan printah / script / coding. Berikut ini tahapan yang harus dilakukan:
 

• Buat project baru

File -> New Project
Pilih STANDAR EXE kemudian klik OK
• Aktifkan Library yang dibutuhkan yaitu: Microsoft ADO Ext.2.8 for DDL and Security lewat menu:

Project->References->Microsoft ADO Ext.2.8 for DDL and Security (dicentang) lalu klik Ok
 
• Tambahkan Modul dan ketikkan script dibawah ini:

   
 
 
Option Explicit
Public CrCd As New ADOX.Catalog
Public Cd As New ADOX.Table
Sub BuatDB()
    Dim alamat As String
    alamat = App.Path & "\CD.mdb"
    CrCd.Create "Provider=Microsoft.jet.oledb.4.0;data source=" & alamat
    CrCd.ActiveConnection = "Provider=Microsoft.jet.oledb.4.0;data source=" & alamat
    Cd.Name = "TblCD"
    Cd.Columns.Append "Judul", adVarWChar, 30
    Cd.Columns.Append "Jenis", adVarWChar, 20
    Cd.Columns.Append "Keping", adVarWChar, 10
    Cd.Columns.Append "Jumlah", adVarWChar, 10
    Cd.Columns.Append "Status", adVarWChar, 15
    Cd.Columns.Append "Peminjam", adVarWChar, 30
    Cd.Columns.Append "Tanggal", adDate
    CrCd.Tables.Append Cd
 
    Set CrCd = Nothing
End Sub
 

• Pada saat Form_Load ketikkan script di bawah ini:

   
 
 
If Dir(App.Path & "\cd.mdb") = "" Then
        BuatDB
End If
 

• Simpan project tersebut dan jalankan.

Menambahkan port mySQL (3306) ke dalam Exception di Firewall Windows

Pada posting sebelumnya, langkah pertama untuk mengatasi masalah koneksi yaitu Menambahkan port mySQL (3306) ke dalam Exception di Firewall Windows pada server.
Langkahnya mudah...
contoh di Windows XP:
-  Masuk Control Panel (Start->Control Panel)
-  Pilih Windows Firewall
-  Pada bagian Exceptions, tambahkan port MySQLnya dengan cara mengklik tombol Add Port.
-  Bagian Name diisi nama port (terserah diisi apa ex:MySQL).
-  Bagian Port number diisi 3306 (maksudnya port yang dipakai MySQL).
-  Option TCP dan UDP biarkan defaultnya (TCP).
-  Lalu klik OK lalu klik OK lagi.
 
 

Masalah Koneksi VB (Visual Basic) ke MySQL : [MySQL][ODBC 3.51 Driver]Can't connect to MySQL server on (10060)

Beberapa hari ini aku dipusingkan dengan masalah koneksi program yang dibuat pake VB ke MySQL. Program VB yang aku buat tidak bisa konek ke MySQL Server yang aku install di komputer lain...padahal kalau programnya dipake di komputer MySQL Servernya sendiri (localhost) gak ada masalah...! Pada kasus ini aku menggunakan XAMPP.

Ternyata setelah baca-baca di forum...masalahnya bisa diselesaikan dengan 3 macam langkah saja...:

1. Kalau firewall aktif/diaktifkan, harus ditambahkan port mySQL (3306) ke dalam Exception di Firewallnya
2. Pada MySQL Server-nya: di Database mysql ada tabel host, tambahkan record baru untuk mengijinkan host mengakses ke MySQL yaitu dengan mengisi field host berisi alamat ip komputer client misal 192.168.1.10 kemudian field-field yang lain diisi nilai Y.
3. Pada MySQL Server-nya: di Database mysql ada tabel user, tambahkan record baru untuk mengijinkan host mengakses ke MySQL yaitu dengan mengisi field user diisi root, password diisi paswordmysqlnya (kalau xampp defaultnya kosong), host berisi alamat ip komputer client misal 192.168.1.10 kemudian field-field yang lain diisi nilai Y.

Setelah langkah-langkah tersebut dilakukan...koneksi programku bisa berjalan mulus...! Akhirnya....!

Masalah "Warning: session_start() [function.session-start]: Cannot send session cache limiter - headers already sent" di PHP

"Warning: session_start() [function.session-start]: Cannot send session cache limiter - headers already sent"
Pesan error di atas muncul bukan karena salah ngetik script php. karena itulah hal ini membuat saya bingung sampai beberapa hari. Apalagi jika settingan web servernya tidak menampilkan pesan error, malah tambah bingung...!
Setelah cari-cari di Google (terimakasih Google), banyak forum yang membahas hal serupa. Ternyata masalahnya sangat sederhana.
Penyebab:
Peletakkan baris perintah session_start() tidak di paling awal halaman. jika diilustrasikan seperti ini:
Sebelum diperbaiki:
baris
====================
1
2   <php
3   session_start()
====================
Perhatikan pada baris pertama, meskipun pada baris pertama kosong, tapi hal itulah yang menyebabkan pesan error di atas muncul.
Harus diperbaiki menjadi seperti berikut:
Sesudah diperbaiki:
baris
====================
1   <php
2   session_start()
====================
pada baris pertama diketikkan tag PHP, dan baris kedua diketikkan session_start().
Fiuh.......!