Walaupun saya tidak begitu banyak mengerti SMS Gateway menggunakan Visual Basic dan Delphi tapi ini ada sedikit sharing buat rekan2 yang membutuhkannya, yang saya temukan dari beberapa artikel. YUp langsung saja contoh koneksi handphone ke program dengan visual basic:
1. Program Visual Basic harus sudah terinstall dikomputer Anda pastinya.
2. Download file Mfbus (sudah saya sertakan bersama contoh program), kemudian ekstrak ke folder windows\system32.
3. Registrasi dulu MFbus nya melalui command promt atau di klik aja tuh yang sudah ada di folder contoh prograh yang bertuliskan Regsvr32), jika dengna command promt caranaya ketik di kotak Run "regsvr32 Mfbus15.ocx "
4. Jangna lupa kabel datanya harus sudah terhubung dengan komputer Anda.
Setelah persiapan diatas Anda lakukan, tahap selanjutnya buat form seperti ini di program VB Anda:
- Double klik commandbutton "Connect" kemudian beri script berikut:
Private Sub Command1_Click()
'Untuk koneksi antara Handphone
'dengan Komputer. Nilai "COM1" dapat
'berubah-ubah sesuai dengan nomor
' COM yang digunakan namun
'jika menggunakan fbus biasanya
'antara COM1 atau COM2
MFBUS15Control1.Connect "COM1"
'Untuk menampilkan signal Handphone
Label1.Caption = "Signal : " & MFBUS15Control1.RfLevel
'Untuk mencek apakah koneksi berhasil atau gagal
If MFBUS15Control1.Connected = True Then
MsgBox "KONEKSI BERHASIL"
Else
MsgBox "KONEKSI GAGAL"
End If
End Sub
- Untuk Disconnectnya tempelkan program berikut:
Private Sub Command2_Click()
' Script memutus koneksi
MFBUS15Control1.Disconnect
'Untuk menyembunyikan tampilan nilai signal
Label1.Caption = "Signal : "
End Sub
Ingat yang ada gambar tulisan Fbus disana muncul jika Activex Mfbus sudah diaktifin. Setelah semuanya beres coba jalankan programnya.
Untuk mengetahui port berapa yang digunakan lihat di Device Manager.
Contoh program visual basic untuk sms gateway informasi valas dapat di download disini:
http://rapidshare.com/files/216611750/Program_SMS.rar.html
Source : http://tinggiraja.blogspot.com/
Thank you for informative article! It has been extremely helpful. I wish that you will continue posting your knowledge with us.
ReplyDeleteOcala mobile ads