Upload Foto ke Database MySql menggunakan Microsoft Visual Basic 6.0

        Tutorial kali ini akan dibahas mengenai bagaimana memasukkan (upload) foto atau file ke database mysql menggunakan vb6. Okeee,,,, langsung aja, berikut step by stepnya:

• Buat database di localhost, bisa menggunakan phpmyadmin dari program wampserver (lihat tutorialnya disini). Berikut contoh tampilan tabe yang saya gunakan di phpmyadmin :

   #catatan : pastikan untuk type tabel untuk file nya adalah MediumBlob

• Setelah database dan tabel dibuat, selanjutnya membuat koneksi vb6 kedatabase mysql di localhost (lihat tutorial disini),

• Masukkan Library koneksi yg telah dibuat seperti pada langkah nomor 2,  sebelumnya pilih Project>References>Microsoft ActiveX Data Object 2.8 Library. 

•  Berikutnya, buat tampilan sederhana di vb6 seperti berikut Ini :

•  Masukkan Coding Berikut ini :

Dim rs As New ADODB.Recordset

Private Sub cmdBrowse_Click()

CommonDialog1.ShowOpen

txtFilename.Text = CommonDialog1.FileName

cmdUpload.Enabled = True

End Sub

Private Sub cmdUpload_Click()

Dim rs As ADODB.Recordset

Set rs = New ADODB.Recordset

Dim mystream As ADODB.Stream

Set mystream = New ADODB.Stream

mystream.Type = adTypeBinary

rs.Open "SELECT * FROM upload_foto WHERE 1=0", conn, adOpenStatic, adLockOptimistic

rs.AddNew

mystream.Open

mystream.LoadFromFile txtFilename.Text

rs!Nama = txtFilename.Text

rs!Foto = mystream.Read

rs.Update

mystream.Close

rs.Close

conn.Close

MsgBox "Data berhasil Disimpan !", vbInformation, "SUKSES"

Unload Me

End Sub

Private Sub Form_Load()

buat_koneksi

cmdUpload.Enabled = False

End Sub

        #ganti tulisan warna merah dengan nama tabel yang dibuat

• Coba jalankan program dengan menekan tombol F5 atau tombol Play, kemudian klik tombol browse untuk memilih file yang akan di upload dan klik tombol upload, jika berhasil maka akan muncul sebuah message box yang menyatakan bahawa upload berhasil, untuk mebuktikannya coba buka localhost dan buka tabel yang kita buat tadi di phpmyadmin,, Voilaa… file telah ter-upload.

Tampilan phpmyadmin ketika ada file sudah diupload :

Demikian tutorial singkat ini, kalau mau download contoh program ini, silahkan kesini. Bagaimana cara mendownload file dari database mysql dengan vb6??

Tunggu Tutorial Selanjutnya…:)