SMS Gateway Dengan Visual Basic

Sangat banyak tutorial SMS Gateway jika Anda browsing lewat om google.com, tinggal pilih mau yang bersifat open source menggunakan Kannel di Linux atau dengan gammu yang bisa digunakan di Windows atau di Linux, dan bagi Anda penggemar windows dan familiar dengan program Visual Basic atau Delphi pasti sangat banyak sekali Anda temukan, saya pernah berkunjung ke situs http://bengkelprogram.com, disitu sangat banyak sekali membahas tentang SMS Gateway dengan menggunakan program Delphi dan Visual Basic.

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
Untuk source program Anda dapat melakukan permintaan dengan donasi terlebih dahulu, nanti akan dikirim via email beserta contoh-contoh source aplikasi SMS Gateway dengan menggunakan Visual Basic dan Delphi jika Anda males untuk mengumpulkan source-source program dari internet. Harga cuman Rp. 30.000, berikut contoh salah satu source program dari IndoprogSMS

http://rapidshare.com/files/217000076/IndoprogSMS.zip.html

Copy link tersebut dan buka dengan browser yang Anda gunakan.

Untuk yang menggunakan gammu dan berbasis web melakukan penawaran khusus sesuai dengan kebutuhan.