Sunday - July 20, 2008

Home | Site Map | Channels | Profile | Press Room | Services | Contact 

currently 6 user(s) online

search 

   Latest News

»

sony-ak.com Luncurkan Kamus Teknologi Informasi (May 27, 2006)

»

sony-ak.com Luncurkan IT Event Calendar (May 20, 2006)

»

Web Chat Berbasis AJAX dari sony-ak.com (May 09, 2006)

»

sony-ak.com Advertising Program (May 01, 2006)

»

Sony AK di Tabloid PCplus (April 18, 2006)

news archives » 


   Random Article

»

Membuat Sistem Login dengan Menggunakan Session pada PHP, MySQL dan Apache (9659)

»

Apa itu Protocol? (5760)

»

Contoh Berkirim E-mail dengan Menggunakan Telnet (4350)

»

Apa itu Metadata? (3326)

»

Contoh Membuat Laporan Pada Borland Delphi dengan Quick Report (10843)

   Newsletter

Join our newsletter, you will get alert about content updates

powered by Yahoo! Groups















Nedstat Basic - Free web site statistics

 
 
Tips Visual Basic: Mengetahui Versi MDAC Yang Terpasang di Komputer Anda

Author: Sony Arianto Kurniawan
Published: August 17, 2002
Visits: 2667 - Category: Visual Basic
 
     
 

Hello pembaca. Suatu hari penulis pernah menanyakan ke mailing list Visual Basic mengenai cara mengetahui versi terakhir dari MDAC (Microsoft Data Access Component) yang terinstall pada suatu komputer. Beberapa rekan kemudian memberikan beberapa jawaban yang menarik.

Salah seorang penjawab (saya lupa namanya) memberikan solusi dengan menggunakan program Component Checker dari Microsoft (correct me if I'm wrong). Namun ada salah seorang penjawab lainnya yang memberikan solusi yang cukup menarik yaitu memberi secuil code dalam Visual Basic untuk mengetahui versi MDAC yang sedang terinstall saat ini (thanks to Panji Aryaputra).

Nah solusinya begini. Pada class ADODB.Connection ternyata terdapat suatu property Version yang ternyata berisi informasi mengenai nomer versi dari MDAC. OK, bagaimana code-nya? Ikuti saja langkah-langkah berikut ini:

1. Buat sebuah project baru di Visual Basic (Standard EXE).
2. Tambahkan sebuah kontrol CommandButton pada Form1.
3. Tulis code berikut pada event Click di kontrol CommandButton tadi:

Dim conn As Object
On Error GoTo ErrHandler
Set conn = CreateObject("ADODB.Connection")
MsgBox "MDAC version is " & conn.Version
GoTo EndSub
ErrHandler:
MsgBox "MDAC is not installed !!"
Resume Next
EndSub:
Set conn = Nothing


4. Jalankan project tersebut dengan menekan tombol F5.

Nah, kemudian tekan tombol Command1 dan program akan menampilkan versi dari MDAC yang sedang ter-install di komputer Anda. Kalau kita lihat sejenak pada code di atas maka pertama-tama kita mendeklarasikan suatu variabel yang ber-type Object. Kemudian kita mencoba untuk meng-create instance dari class Connection pada object ADODB melalui variabel conn. Jika proses pembuatan instance sukses maka kita tinggal mengambil nilai versi dari property conn.Version. Sedangkan jika ternyata di komputer belum terinstall MDAC maka sudah disediakan error handler yang akan menangani error dan akan menampilkan pesan bahwa MDAC belum terinstall.

Demikian tulisan singkat ini semoga bermanfaat bagi Anda semua dan jika ada komentar atau kritik bisa dikirim melalui sony-ak@sony-ak.com. Untuk melihat artikel menarik lainnya silakan kunjungi Sony AK Knowledge Center.

Terakhir penulis ingin mengucapkan terimakasih kepada Panji Aryaputra yang sudah memberi secuil code VB untuk mengetahui versi MDAC. Tak lupa juga buat Esa Ivani, thanks for support and your sweet love for me.

Mission completed on 19:36 PM.




 Recommended articles
 

»

Mengirim E-Mail Melalui Server SMTP dengan C# (3870)

»

Belajar Programming dari Blog Para Programmer di Internet (4639)

»

AJAX (Asynchronus JavaScript and XML) - Bagian II (1802)

»

Seberapa Amankah VoIP? (2509)

»

Menggunakan Alias pada MySQL (1869)

 Send your comments or suggestions
Full Name :
E-mail :
Comments :
 
 

  Privacy | Site Map | Advertise

  Copyright © 2003 - 2006 Sony AK Knowledge Center - all rights reserved

  info@sony-ak.com