Menampilkan Gambar Pada Form

MENAMPILKAN GAMBAR PADA FORM Access

 

Pada dasarnya, Microsoft access bisa menyimpan data berupa gambar dalam database yaitu menggunakan file bertipe OLE object. Akan tetapi pada kenyataannya, menampilkan Gambar yang disimpan tersebut pada form tidak selalu bisa dilakukan. Acces kadang-kadang hanya menampilkan gambar icon, atau nama pathnya. Jika kita mengkorvensi

Format gambar ke windows Bitmap sekalipun, sebelum disimpan ke database, data tersebut adakalanya masih tidak bisa ditampilkan.

Trik untuk menampilkan gambar tersebut, yang ternyata tidak mengggunakan kontrol yang seharusnya (yaitu bond object frame). Melainkan kontrol image yang sebenarnya untuk memasang field image.

Berikut adalah tata cara menampilakan data gambar yang sesuai dengan record-record pada database.

  1. Pada tabel hapuslah field yang menyimpan data gambar(field berupa OLE Object) karena kita TIDAK menyimpan data gambartersebut dalam database
  2. Buatlah sebuah data field untuk menampung data path (alamat dan nama) file gambar.ini berarti, file-file gambar yang diperlukan record disimpan di luar database, di dalam folder atau direktori tertentu pada harddisk lokal maupun lokasi tertentu di dalam jaringan.
  3. Untuk menampilkan gambar pada form, tambahkan sebuah kontrol image. Ketika di-prompt untuk memilih sebuah gambar pilihlah sebuah file gambar seadanya.control image harus berisi sebuah file gambar,dan jika anda menghapus kembali alamat file gambar pada properti picture(misalnya dengan niat untuk mengkosongkannya),kontrol image akan terhapus dari form.
  4. Pada event current form masukkan kode berikut:

    Private Sub Form current ()

    On Error Resume Next

    If Not IsNull (Me. FileGambar)Then

    Me. Image4picture =Me.FileGambar

    Else

    Me. Image4picture=”c:\dummy.jpg

    End if

    End sub

 

Pada kode di atas, Field FileGambar Yang akan ditampilkan. Control Image 4 adalah kontrol untuk menampilkan gambar, Dan file “c:\dummy.jpg” adalah file gambar yang akan ditampilkan jika field FileGambar pada current record tidak mempunyai isi.

Leave a Reply

Your email address will not be published. Required fields are marked *