Modul Tutorial Pemrograman SMS Gateway Tahap Awal

Short Message Service atau lebih dikenal dengan SMS merupakan media komunikasi yang sangat umum di kalangan masyarakat. Hampir semua lapisan masyarakat sudah memiliki handphone dan pastinya mereka sudah mengenal SMS. Karena faktor inilah SMS dijadikan media komunikasi yang hemat, cepat dan terjangkau.

SMS semakin berkembang penggunaanya bahkan SMS sudah dipakai sebagai media kampanye. Hehmm..ternyata SMS jika tepat penggunaanya akan sangat powerfull. Akhir-akhir ini juga banyak SMS Spam yang digunakan oleh kalangan tidak bertanggung jawab. Tetapi sekarang kita akan mengenal SMS lebih jauh.
Ternyata pengembangan SMS Gateway atau server SMS tidak sesulit yang dibayangkan. Kita hanya butuh komputer, modem support SMS (plus kartu provider yang ada pulsanya) dan sebuah aplikasi desktop. Kita akan belajar pengembangan aplikasi SMS Gateway menggunakan pemrograman Microsoft Visual Basic 6.0 dan tentunya menggunakan Gammu SMS Engine.  Gammu merupakan SMS Engine yang gratis untuk digunakan.
Kita langsung saja menuju coding VB 6.
1.  Buat satu modul sebagai koneksi ke tabel Outbox yang sudah ada di basis data. Kita namakan RSOutbox.
2.  Berikut adalah kode program koneksi untuk membuka basis data.
Sub dbSMS()
Dim konstring As String
Dim dbName As String
Dim dbServer As String
Dim dbPort As String
Dim dbUser As String
Dim dbPass As String
On Error GoTo konerror
dbName = “db_sms”
dbServer = “localhost”
dbPort = “3306″
dbUser = “root”
dbPass = “”
konstring = “driver={MySQL ODBC 3.51 Driver};SERVER=” & dbServer & “;DATABASE=” & dbName & “;UID=” & dbUser & “;PWD=” & dbPass & “;PORT=” & dbPort & “;OPTION=3″
With Koneksi
.ConnectionString = konstring
.Open
End With
End sub
3.  Berikut adalah kode program untuk membuka tabel Outbox yang ada di dalam basis data.
Sub dbOutbox()
With Koneksi
rsOutbox.CursorLocation = adUseClient
strsql = “SELECT outbox.NOTUJUAN, outbox.ISISMS FROM outbox”
rsOutbox.Open strsql, Koneksi, 1, 2
End With
End Sub
4.  Selanjutnya tambahkan 1 form dan tambahkan 2 text box dan 1 command button. Textbox1 sebagai ISI SMS, Textbox2 sebagai NOMOR HP TUJUAN dan Command1 sebagai tombol KIRIM. Berikut adalah contoh desain form.

SMS Gateway

5.  Selanjutnya doubel klik tombol KIRIM dan masukkan kode program sebagai berikut:
Private Sub Command1_Click()
With rsOutbox
.AddNew
.Fields(”nomortujuan”) = Text2.Text
.Fields(”isisms”) = Text1.Text
.UpdateBatch
End With
End sub
6.  It’s done J. Mudah kan… Untuk menggunakan tinggal masukkan ISI SMS ke Textbox1 dan NOMOR TUJUAN ke Textbox2, setelah itu pencet tombol KIRIM dan SMS akan dikirim.
Dapatkan modul tutorial versi lengkap dengan Rp 125.000,-. Anda akan mendapatkan tutorial lengkap untuk menjadi pengembang bisnis SMS Gateway. Isi modul terdiri dari:
a.  Panduan instalasi XAMPP (sebagai server lokal), MySQL Connector dan Gammu SMS.
b.  Panduan pemrograman aplikasi SMS Gateway menggunakan Visual Basic 6.
c.  Plus: Paket PHP sebagai kontrol panel Gammu SMS.
Aplikasi dapat dikembangkan ke arah SMS Massal Kampanye, Pemberitahuan program-program perusahaan, SMS auto-reply, SMS isi pulsa, SMS booking, SMS Reminder, dsb.
DOWNLOAD VERSI PDF >> CLICK ME <<

Source :  http://veriawan.blog.uns.ac.id/

HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari SMS Gateway Visual Basic di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.