Namun pembaruan terbaru memberi pengguna lebih banyak opsi untuk menonaktifkan notifikasi . Saat ini, pengguna dapat menjeda notifikasi selama 30 menit, dan ada juga opsi 2 bulan untuk periode yang lebih lama. fight sports cyborg. here tv activate; how does netflix pay employees; online jobs hiring now no experience how to Smsblast gratis. masuk atau pesan keluar. Sebelum mengeksekusi rencana anda untuk melakukan sms marketing, ada baiknya anda melakukan peninjauan yang mendasar dan komprehensif terlebih dahulu. Tips melakukan sms blast atau sms marketing. Just follow the steps carefully. Importxls. SAGA versi sebelumya hanya bisa export ke excel saja untuk saga kali ini bisa import data dari file xls, untuk format excel bisa di klik tombol download yang ada di aplikasi nya, masuk ke daftar kontak lalu pilih import xls maka akan muncul seperti gambar di bawah ini. 5. Costume Polling sms. Inilah spesial dari updatean SAGA 3 kali Aplikasiberbasis command line di android ini cukup populer karena banyak fitur yang sangat menarik untuk kamu coba. Jasa PayPaL Jasa Bayar & Isi Balance Paypal Kontak Membuat sms gateway menggunakan api whatsapp. Cara buat sms gateway gratis. blast Vay Tiền Trả Góp Theo Tháng Chỉ Cần Cmnd. Bagi para pengembang aplikasi, membuat sebuah aplikasi SMS gateway dapat menjadi sebuah tantangan yang menarik. Dengan aplikasi ini, Anda dapat mengirim dan menerima pesan teks melalui jaringan seluler. Namun, sebelum Anda memulai, pastikan bahwa Anda memahami langkah-langkah yang diperlukan untuk membuat aplikasi SMS gateway. Panduan Membuat Aplikasi SMS GatewayLangkah 1 Pilih PlatformLangkah 2 Pilih Bahasa PemrogramanLangkah 3 Buat Koneksi dengan Operator SelulerLangkah 4 Buat User InterfaceLangkah 5 Uji AplikasiLangkah 6 Rilis AplikasiYang sering ditanyakanKelebihan Membuat Aplikasi SMS GatewayTipsRingkasan Panduan Membuat Aplikasi SMS Gateway Langkah 1 Pilih Platform Sebelum Anda mulai membuat aplikasi SMS gateway, Anda perlu memutuskan di platform mana aplikasi ini akan dijalankan. Ada beberapa platform populer yang dapat Anda gunakan, termasuk Android, iOS, dan Windows. Pastikan Anda memilih platform yang sesuai dengan kebutuhan Anda. Langkah 2 Pilih Bahasa Pemrograman Setelah Anda memilih platform, langkah selanjutnya adalah memilih bahasa pemrograman yang akan digunakan. Beberapa bahasa pemrograman yang populer untuk membuat aplikasi SMS gateway termasuk Java, Python, dan PHP. Pastikan Anda memilih bahasa pemrograman yang Anda kuasai dengan baik. Langkah 3 Buat Koneksi dengan Operator Seluler Setelah Anda memilih platform dan bahasa pemrograman, langkah selanjutnya adalah membuat koneksi dengan operator seluler. Ini memungkinkan aplikasi Anda untuk mengirim dan menerima pesan teks melalui jaringan seluler. Untuk melakukan ini, Anda perlu memperoleh izin dari operator seluler dan mengikuti petunjuk yang diberikan. Langkah 4 Buat User Interface Setelah Anda membuat koneksi dengan operator seluler, langkah selanjutnya adalah membuat user interface untuk aplikasi Anda. Ini memungkinkan pengguna untuk mengakses aplikasi dan mengirim dan menerima pesan teks dengan mudah. Pastikan Anda membuat user interface yang intuitif dan mudah digunakan. Langkah 5 Uji Aplikasi Setelah Anda selesai membuat aplikasi SMS gateway, langkah terakhir adalah mengujinya. Pastikan Anda menguji aplikasi Anda secara menyeluruh untuk memastikan bahwa semuanya berfungsi dengan baik sebelum Anda merilisnya ke publik. Langkah 6 Rilis Aplikasi Setelah Anda menguji aplikasi Anda dan memastikan bahwa semuanya berfungsi dengan baik, langkah terakhir adalah merilis aplikasi Anda ke publik. Pastikan Anda mempromosikan aplikasi Anda dengan baik untuk meningkatkan jumlah pengguna. Yang sering ditanyakan Apakah sulit membuat aplikasi SMS gateway? Membuat aplikasi SMS gateway dapat menjadi tantangan yang menarik, tetapi memerlukan keterampilan dan pengetahuan yang cukup untuk berhasil. Saya harus menggunakan platform apa untuk membuat aplikasi SMS gateway? Ada beberapa platform yang dapat Anda gunakan, termasuk Android, iOS, dan Windows. Pilihlah platform yang sesuai dengan kebutuhan Anda. Bahasa pemrograman apa yang terbaik untuk membuat aplikasi SMS gateway? Ada beberapa bahasa pemrograman yang dapat Anda gunakan, termasuk Java, Python, dan PHP. Pilihlah bahasa pemrograman yang Anda kuasai dengan baik. Apa yang harus saya lakukan jika aplikasi SMS gateway saya tidak berfungsi dengan baik? Pastikan Anda menguji aplikasi Anda secara menyeluruh dan mencari bantuan dari ahli jika perlu. Apakah saya harus memperoleh izin dari operator seluler untuk membuat aplikasi SMS gateway? Ya, Anda perlu memperoleh izin dari operator seluler untuk membuat aplikasi SMS gateway. Berapa biaya yang saya perlu keluarkan untuk membuat aplikasi SMS gateway? Biaya untuk membuat aplikasi SMS gateway dapat bervariasi tergantung pada platform yang Anda gunakan dan sumber daya yang Anda butuhkan. Apakah saya dapat menghasilkan uang dengan membuat aplikasi SMS gateway? Ya, Anda dapat menghasilkan uang dengan membuat aplikasi SMS gateway dan memasarkannya dengan baik. Apakah saya perlu memiliki pengetahuan teknis yang tinggi untuk membuat aplikasi SMS gateway? Ya, Anda perlu memiliki pengetahuan teknis yang tinggi untuk membuat aplikasi SMS gateway yang sukses. Kelebihan Membuat Aplikasi SMS Gateway Membuat aplikasi SMS gateway dapat memberikan banyak manfaat, termasuk Memungkinkan pengguna untuk mengirim dan menerima pesan teks melalui jaringan seluler. Memungkinkan pengguna untuk mengakses aplikasi dengan mudah dan mengirim dan menerima pesan teks dengan mudah. Bisa menghasilkan uang dengan memasarkan aplikasi Anda dengan baik. Tips Berikut adalah beberapa tips untuk membuat aplikasi SMS gateway yang sukses Pilih platform yang sesuai dengan kebutuhan Anda. Pilih bahasa pemrograman yang Anda kuasai dengan baik. Membuat user interface yang intuitif dan mudah digunakan. Menguji aplikasi Anda secara menyeluruh sebelum merilisnya ke publik. Mempromosikan aplikasi Anda dengan baik untuk meningkatkan jumlah pengguna. Ringkasan Membuat aplikasi SMS gateway dapat menjadi tantangan yang menarik, tetapi memerlukan keterampilan dan pengetahuan yang cukup untuk berhasil. Pastikan Anda memilih platform yang sesuai dengan kebutuhan Anda, memilih bahasa pemrograman yang Anda kuasai dengan baik, membuat koneksi dengan operator seluler, membuat user interface yang intuitif dan mudah digunakan, menguji aplikasi Anda secara menyeluruh, dan mempromosikan aplikasi Anda dengan baik untuk meningkatkan jumlah pengguna. Aplikasi cara membuat Masih terkait dengan SMS gateway, dalam artikel kali ini saya akan mencoba memaparkan cara membuat sendiri aplikasi kirim SMS gratis via web. Permintaan untuk membuat artikel dengan topik ini sudah banyak masuk ke email saya maupun komentar dalam blog ini. Namun, mohon maaf baru kali ini saya bisa mewujudkannya. Untuk membuat fasilitas kirim SMS gratis via web, kita membutuhkan sebuah aplikasi gateway untuk mengirim SMS. Aplikasi sms gateway ini nanti kita install atau letakkan di pc yang ada di rumah kita beserta modem/hp yang tercolok pada PC tersebut sebagai alat untuk mengirim SMS. PC ini harus senantiasa terhubung ke internet untuk berkomunikasi dengan PC server yang ada di hosting. Sedangkan di dalam hosting, kita buat semacam script form untuk interface user yang ingin mengirim SMS. Untuk aplikasi sms gateway yang diinstall di PC rumah, Anda bisa menggunakan Gammu sebagai enginenya. Pertanyaan yang muncul kemudian adalah bagaimana cara mengkomunikasikan PC server yang ada di hosting dengan PC di rumah, atau dengan kata lain bagaimana mengirim data sms yang disubmit via hosting kemudian bisa sampai di PC rumah lalu mengirimkan sms tersebut via modem/hp? OK… konsep dasar atau ide dasar dalam pembuatannya adalah kita menggunakan semacam web service yang dibuat di server hosting untuk komunikasi antara PC rumah dan PC hosting. Web service ini nanti senantiasa akan diakses oleh PC rumah. Melalui web service inilah SMS akan dikirim dari PC hosting ke PC rumah. Lantas, apa bentuk output dari web service ini? Web service disajikan dalam bentuk XML yang isinya adalah bunyi SMS dan nomor tujuan SMS yang akan dikirim. Data XML yang berisi bunyi sms dan nomor tujuan inilah yang nanti akan dibaca oleh PC rumah, lalu mengirimkannya lewat SMS gateway Gammu. Nah.. sekarang kita menuju implementasi cara pembuatannya. Langkah pertama, Anda harus sudah menginstall Gammu sebagai tool SMS gateway nya. Pastikan Anda bisa mengirim SMS menggunakan Gammu dan HP/modem yang tercolok di PC Anda. Langkah kedua, buatlah script form untuk mengirim SMS. Script form ini nanti diletakkan di server hosting No. Tujuan Isi SMS Bila diperhatikan, form kirim SMS di atas nantinya akan disubmit di script Di dalam script inilah nomor tujuan dan isi SMS akan disimpan dalam tabel temporary pada database server hosting. Misalkan kita beri nama tabel temporary tersebut adalah outbox’. Kita bisa buat tabel outbox’ ini dengan struktur sbb CREATE TABLE `outbox` `id` int11 AUTO_INCREMENT, `destinationNumber` varchar20, `sms` text, PRIMARY KEY `id` Field id’ digunakan sebagai nomor unik penanda setiap SMS yang akan dikirim, field destinationNumber’ untuk menyimpan nomor tujuan SMS, dan sms’ untuk menyimpan isi SMS. OK, kita buat script nya Setelah data sms yang dikirim tersimpan dalam tabel outbox’, langkah selanjutnya kita buat script web service untuk menyajikan data sms yang tersimpan dalam tabel outbox’ tersebut ke dalam bentuk dokumen XML. Misalkan kita beri nama script untuk mengenerate XML ini "; // membuat root tag untuk data XML echo ""; // query untuk membaca seluruh SMS yang ada di tabel outbox $query = "SELECT * FROM outbox ORDER BY id"; $hasil = mysql_query$query; while $data = mysql_fetch_array$hasil { // representasi data sms echo ""; echo "".$data['id'].""; echo "".$data['destinationNumber'].""; echo "".$data['sms'].""; echo ""; } echo ""; ?> OK… ketiga file di atas dan nanti diletakkan di dalam server hosting. Sampai langkah ini, kita sudah selesai bekerja di level server hosting. Langkah berikutnya adalah membuat script di sisi PC rumah. Di dalam PC rumah, nantinya kita akan membuat script untuk membaca data sms yang tersaji dalam bentuk XML yang digenerate melalui script yang ada di server hosting. Setelah data sms ini dibaca, kemudian kita masukkan ke dalam tabel outbox’ bawaannya Gammu untuk dikirim melalui hp/modem. Oya, kita perlu juga menghapus setiap data sms di server hosting yang sudah dibaca. Mengapa hal ini dilakukan? ya dong, supaya tabel outbox’ nya di server hosting tidak penuh. Lantas, bagaimana cara menghapus data secara otomatis di server hosting setelah data sms nya terbaca? ya… kita gunakan CURL. OK… ini dia script untuk membaca data sms dari XML nya. data as $data { // baca field ID $id = $data->id; // baca nomor tujuan $destination = $data->destination; // baca isi sms $sms = $data->sms; // mengirim SMS via Gammu dengan insert data ke tabel outbox Gammu $query = "INSERT INTO outbox DestinationNumber, TextDecoded VALUES '$destination', '$sms'"; mysql_query$query; // hapus data SMS di server hosting yang sudah terbaca berdasarkan ID $curlHandle = curl_init; curl_setopt$curlHandle, CURLOPT_URL, 'http//namasitus/ curl_setopt$curlHandle, CURLOPT_POSTFIELDS, 'id='.$id; curl_setopt$curlHandle, CURLOPT_HEADER, 0; curl_setopt$curlHandle, CURLOPT_RETURNTRANSFER, 1; curl_setopt$curlHandle, CURLOPT_TIMEOUT,30; curl_setopt$curlHandle, CURLOPT_POST, 1; curl_exec$curlHandle; curl_close$curlHandle; } ?> Jika web server di PC localhost belum mendukung CURL, maka lakukan setting CURL terlebih dahulu. Eh… kalo kita liat pada script di atas, pada proses penghapusan data SMS yang ada di server hosting melalui CURL terdapat pemanggilan script Nah… script ini belum kita buat di server hosting. Script ini nanti berfungsi untuk menghapus data sms yang ada di tabel outbox dalam database server hosting berdasarkan ID nya setelah data sms tersebut di baca oleh script Sekali lagi script di atas harus ditaruh di server hosting lho ya… !!! Selanjutnya script ini harus senantiasa kita jalankan melalui web browser localhost di PC rumah kita supaya bisa selalu membaca data sms yang ada di hosting lalu mengirimnya via Gammu. Lalu bagaimana supaya script ini bisa secara otomatis berjalan dan selalu bisa membaca data dari server hosting? Sebenarnya Anda bisa mengklik tombol REFRESH pada web browser supaya script ini bekerja, namun tentu hal ini membuat report kan? Nah… salah satu solusi dari hal ini adalah Anda bisa menjalankan autorefresh melalui AJAX yang secara otomatis merefresh script ini pada setiap selang n detik. Ini dia script nya… SMS Server Running... function ajax { if { xmlhttp=new XMLHttpRequest; } else { xmlhttp =new ActiveXObject" } { if && { } } setTimeout"ajax", 5000; } SMS Server Running... Contoh script AJAX yang ada di di atas diset supaya bisa merefresh secara otomatis dalam interval 5 detik 5000 ms. Dengan demikian yang perlu Anda jalankan di localhost hanyalah script di atas melalui browser. Nah.. konsep di atas memungkinkan kita untuk bisa membangun aplikasi SMS gateway yang terintegrasi antara PC di server hosting dengan PC di rumah tanpa menggunakan IP public yang urusan untuk mendapatkannya sangat ribet dan mahal biayanya, atau tanpa menggunakan VPS maupun dedicated server untuk tipe hostingnya yang juga sangat mahal biayanya. Anda dapat belajar teknik-teknik lain kaitannya dengan SMS gateway yang mengintegrasikan server hosting dengan pc rumah dengan contoh-contoh script SMS gateway yang saya buat untuk belajar. Oya… meskipun namanya SMS gratis, tapi tidak sepenuhnya gratis. Istilah Gratis hanya bagi si pengguna atau pengirim SMS melalui web Anda, namun tidak gratis bagi si pemilik web karena harus menyisihkan sedikit biaya untuk bayar pulsa. Tapi tak apalah, anggap saja itu biaya marketing untuk lebih mengenalkan web Anda, apalagi saat ini pulsa sms sangat murah Ÿ™‚ Bisa pula tambahkan string pada setiap SMS yang dikirimkan dengan nama situs Anda untuk lebih memperkuat branding web Anda. Untuk hal ini silakan utak-atik sendiri ya Ÿ™‚ Simpel bukan idenya??? Selamat mencoba… Bagikan artikel ini jika bermanfaat ! SMS Gateway Adalah satu platform yang menyediakan mekanisme untuk menghantar dan menerima SMS dan Merupakan pintu gerbang bagi penyebaran Informasi dengan menggunakan SMS, sehingga memudahkan dalam menyebarkan pesan ke ratusan nomor secara otomatis dan cepat yang langsung terhubung dengan database nomor-nomor ponsel. Sms sekarang bisa jadi sudah mulai di tinggalkan karena sudah banyak aplikasi yang dapat mengirimkan yang lebih baik mulai dari BBM, Whatsapp, chat On dan masih banyak lagi fasilitas untuk mengirim pesan pada smartphone pada saat ini, walaupun sms ketinggalan jaman tapi tetap bisa menjadi salah satu alat mengirim pesan sederhana yang memiliki pusa terbatas, kali ini saya coba shering cara membangun SMS Gateway atau Sebutan yang kerennya saat ini SMS Center, pasti pada penasaran yup untuk alat dan bahan sederhana yakni Alat dan Bahan yang Digunakan PC/Laptop Minimal Dengan Sistem Operasi Windows XP Sp 3 Modem GSM/CDMA Kartu operator GSM/CDMA dan tentunya jangan lupa kartunya di isi pulsa Download Software yang Akan Digunakan Kalkun program opensource untuk mengatur sms yang keluar dan masuk Gammu Engine untuk penghubungnya dengan modem dan Kalkun agar sms yang masuk lansung di transfer ke Inbox Aplikasi Kalkun, dengan Alat dan bahan yang dipersiapkan adalah Modem GSM. XAMPP sebagai webserver dan database server. Untuk lebih lengkapnya tutorial SMS Gateway dapat di Download disini. Saat ini fungsi sms tidak sekedar untuk berkirim pesan kepada kerabat saja, tapi sudah beralih ke fungsi yang lain misalnya quiz sms, polling sms, layanan Info On Demand, dan sebagainya. Semua aplikasi tersebut membutuhkan suatu aplikasi yang disebut sms gateway. Aplikasi SMS gateway bisa diterapkan pada Café, Toko, Rumah sakit, Sekolah, maupun instansi pemerintah. Contoh aplikasi Info On Demand untuk Sekolah misalnya -> Info nilai ujian siswa. cara kerja client mengirim siswa diikuti mata pelajaran ke nomor server lalu server akan mengirim nilai ujian secara otomatis -> Info jadwal ujian, pendaftaran siswa baru dsb. Sebenarnya untuk membuat SMS gateway tidak terlalu sulit. Bahkan bagi yang awam coding sekalipun. Cukup sedikit pengetahuan tentang Visual Basic dan MsAccess, anda bisa membuat apikasi SMS Gateway sendiri. Yang diperlukan untuk membuat aplikasi SMS Gateway Hardware – Computer – GSM Modem atau HP Nokia series sebagai sms gateway – Kabel Data USB /serial Software – Visual Basic – FBus Activex sebagai komponen Visual Basic – MsAccess sebagai database Dengan SMS Activex, kita sudah bisa menerima sms, membaca inbox, maupun mengirim sms melalui PC. Lalu gimana caranya agar kita bisa membuat sms gateway yang bisa memberikan layanan Info On demand? Berikut langkah-langkahnya 1. Koneksikan database MsAccess dengan Visual Basic 2. Isi database MsAccess dengan database Buku Telepon 3. Memodifikasi script dari smsactivex. Sehingga setiap ada pesan masuk, program akan membalas secara otomatis. Source Codenya plus Componentnya. Silahkan anda Download TUTORIAL Oke jadi kasusnya apa nih, kita ambil aja sample sederhana yaitu “pembuatan sms gateway untuk request nilai siswa” dan untuk menyederhanakan pembahasan keywordnya kita batasi saja yaitu request nilai tugas dan ulangan. Apa yang harus di persiapkan, pertama kita rancang dulu databasenya dan berhubung artikelsaya yang membahas tentang database SQLite masih hangat jadi untuk databasenya kita menggunakan SQLite saja. SQLite adalah database standalone yang kecil, mungil dan gratis. Bagaimana cara membuat database di SQLite sudah saya bahas disini kemudian bagaimana mengaksesnya dari aplikasi juga sudah saya bahasa disini. Berikut adalah rancangan sederhana database sms yang akan kita buat Ada banyak cara untuk membaca sms masuk dan membalasanya, salah satunya adalah menggunakan perintah AT COMMAND dan Microsoft sendiri sudah menyediakan komponenyang bisa mengeksekusi perintah-perintah tersebut. Tentunya cara ini menggunakan AT COMMAND bukan cara yang favorit dikalangan programmer instan seperti Anda dan Saya , jadi diartikel ini saya menggunakan komponenpihak ketiga. Ingat komponen ini adalah shareware, segala resiko kemudahan dalam membuat aplikasi sms gateway ditanggung sendiri , saya disini hanya share dan tidak terikat kerja sama dengan pihak ketiga tersebut. Halah pernyataan ngawur Berikut adalah cuplikan source code untuk membaca dan mengirim sms menggunakan komponen ActiveXpert SMS 1. Membaca SMS Masuk Private Sub cmdBacaSMS_Click Dim objGsmIn As Set objGsmIn = New With objGsmIn .Activate "XXX-XXXX-XXXX-XXXXX" 'diisi serial number yg Anda dapatkan secara ilegal .Device = "COM1" 'disesuaikan dengan port COM yang digunakan .DeviceSpeed = 19200 'default = 0 .Storage = 2 '0=sim 1=device 2=any .DeleteAfterReceive = True .Receive If .LastError = 0 Or .LastError = 23140 Then ' Success .GetFirstMessage While .LastError = 0 "Pengirim " & .MessageSender "Isi SMS " & .MessageData 'TODO INSERT KE TABEL SMS_IN .GetNextMessage Wend End If End With Set objGsmIn = Nothing End Sub 2. Mengirim sms Private Sub cmdKirimSMS_Click Dim objGsmOut As Dim objConstants As Set objGsmOut = New Set objConstants = New With objGsmOut .Activate "XXX-XXXX-XXXX-XXXXX" 'diisi serial number yg Anda dapatkan secara ilegal .Device = "COM1" 'disesuaikan dengan port COM yang digunakan .DeviceSpeed = 19200 'default = 0 .RequestStatusReport = False .MessageType = 'mengirim pesan maksimal 160 karakter '.MessageType = 'jika lebih dari 160 karakter gunakan opsi ini .MessageRecipient = "nomor tujuan" 'biasanya menggunakan prefix +62 .MessageData = "isi pesan" .Send 'kirim End With Set objConstants = Nothing Set objGsmOut = Nothing End Sub Jadi cukup dengan bermodalkan 2 cuplikan kode diatas kita akan menyelesaikan aplikasi yg dibahas pada artikel kali ini. Adapun untuk keyword yang akan digunakan sebagai berikut 1. Request nilai tugas keyword tgsnis contoh tgs9941224165 balasan Nilai tugas NAMA SISWA BI=95, IPA=75, IPS=80, MTK=85 2. Request nilai ulangan harian keyword uhnis contoh uh9941224165 balasan Nilai ulangan NAMA SISWA BI=95, IPA=75, IPS=80, MTK=85 Berikut penjelasan ringkas beberapa cuplikan source code yang digunakan dalam pembuatan aplikasi sms gateway ini. Private Function connectToDeviceByVal device As String As Boolean Dim objGsm As Dim manufaktur As String On Error GoTo errHandle Set objGsm = New With objGsm .Activate SERIAL_NUMBER .device = device manufaktur = .SendCommand"AT+CGMI", 500 'menampilkan informasi manufactur manufaktur = Replace$manufaktur, vbCrLf, "" manufaktur = Replace$manufaktur, "OK", "" manufaktur = Replace$manufaktur, "ERROR", "" manufaktur = Replace$manufaktur, "AT+CGMI", "" End With Set objGsm = Nothing If Lenmanufaktur > 0 Then = manufaktur connectToDevice = True End If Exit Function errHandle connectToDevice = False End Function Sesuai namanya fungsi connectToDevice digunakan untuk mengecek status modem sms yang terpasang, salah satu caranya adalah dengan mengirimkan AT COMMAND “AT+CGM”, AT COMMAND ini berfungsi untuk mendapatkan informasi manufaktur. Sebagai contoh jika modem sms yg digunakan adalah hp siemens maka nilai yg dihasilkan dari perintah ini adalah “SIEMENS” dan tentunya hp yg bersangkutan juga harus mendukung AT COMMAND. Private Sub readSMS Dim objGsmIn As Dim objConstants As Dim cmd As cCommand Dim keyword As String Dim phoneNumber As String Dim i As Integer On Error GoTo errHandle = vbHourglass = False = False DoEvents Set objGsmIn = New Set objConstants = New With objGsmIn .Activate SERIAL_NUMBER .device = .DeviceSpeed = 0 .Storage = .DeleteAfterReceive = True 'hapus sms jika sudah dibaca .Receive If .LastError = 0 Or .LastError = 23140 Then 'baca sms sukses .GetFirstMessage strSql = "INSERT INTO sms_in phone_number, sms_keyword, date_in, time_in VALUES ?, ?, ?, ?" Set cmd = i = 1 While .LastError = 0 phoneNumber = rep0to62.MessageSender keyword = .MessageData 1, phoneNumber 2, keyword 3, FormatNow, "yyyy/MM/dd" 4, FormatNow, "hhmmss" If i Mod 10 = 0 Then DoEvents End If i = i + 1 .GetNextMessage Wend Set cmd = Nothing End If End With Set objGsmIn = Nothing If cekSMSIn Then Call sendSMS Else Call Wait5000 End If = True = vbDefault = True Exit Sub errHandle = True End Sub Prosedur readSMS digunakan untuk membaca sms masuk dan menyimpannya ke tabel sms_in, berhubung komponen ActiveXpert SMS tidak mempunyai event yg menandai adanya sms masuk maka sebagai gantinya kita menggunakan timer untuk memanggil prosedur readSMS. Salah satu properties penting yang dimiliki oleh ActiveXpert SMS adalah DeleteAfterReceive, jika nilainya diset true maka sms yg masuk akan otomatis dihapus dan tentunya setelah smsnya dibaca. Private Function cekSMSIn As Boolean Dim ret As Integer strSql = "SELECT COUNT* FROM sms_in WHERE status = 0" 'jika status = 0 berarti sms masuk belum di proses ret = CIntdbGetValuestrSql, 0 If ret > 0 Then 'ada sms yg belum diproses cekSMSIn = True End If End Function Prosedur cekSMSIn dibutuhkan oleh prosedur readSMS, jadi dengan adanya prosedur cekSMSIn ini program akan mengetahui kapan waktu yg tepat untuk memanggil prosedur sendSMS. Private Sub sendSMS Dim rsSend As cRecordset Dim cmd As cCommand Dim objGsmOut As Dim objConstants As Dim phoneNumber As String Dim keyword As String Dim smsBalasan As String On Error GoTo errHandle 'cek sms yang belum di proses, ditandai dg status = 0 strSql = "SELECT id, phone_number, sms_keyword " & _ "FROM sms_in " & _ "WHERE status = 0 " & _ "ORDER BY id" Set rsSend = If Not Then Set objGsmOut = New Set objConstants = New SERIAL_NUMBER = = 0 = False = Do While Not 'ganti prefix nomor hp 0 -> +62 phoneNumber = rep0to62"" & rsSend"phone_number".Value keyword = rsSend"sms_keyword".Value smsBalasan = getBalasanSmskeyword, phoneNumber = phoneNumber = smsBalasan If = 0 Or = 23140 Then 'sms sukses dikirim 'update status sms -> 1 strSql = "UPDATE sms_in SET status = ?, no_ref = ? " & _ "WHERE id = ?" Set cmd = With cmd .SetInt32 1, 1 .SetInt32 2, .SetInt32 3, rsSend"id".Value .Execute End With Set cmd = Nothing 'insert ke tabel sms_out, untuk histori sms keluar strSql = "INSERT INTO sms_out phone_number, replay_msg, date_out, time_out VALUES ?, ?, ?, ?" Set cmd = With cmd .SetText 1, phoneNumber .SetText 2, smsBalasan .SetDate 3, FormatNow, "yyyy/MM/dd" .SetTime 4, FormatNow, "hhmmss" .Execute End With Set cmd = Nothing Else 'sms gagal dikirim 'update status sms -> 1 'ini masih bisa dikembangkan lagi dengan menambah kolom max_jumlah_kirim di tabel sms_in 'jadi bisa diberi aturan sms yg gagal dikirim > 3x baru status smsnya diupdate menjadi 1 strSql = "UPDATE sms_in SET status = ?, no_ref = ? " & _ "WHERE id = ?" Set cmd = With cmd .SetInt32 1, 1 .SetInt32 2, .SetInt32 3, rsSend"id".Value .Execute End With Set cmd = Nothing End If Call Wait5000 Loop Set objConstants = Nothing Set objGsmOut = Nothing End If Exit Sub errHandle Resume Next End Sub Prosedur sendSMS akan mengolah sms masuk yg belum di proses ditandai dengan status = 0, mengupdate statusnya menjadi 1 jika berhasil mengirimkan sms, kemudian menyimpannya ke tabel sms_out sebagai histori pengiriman sms. Public Function rep0to62ByVal phoneNumber As String As String 'fungsi untuk mengganti prefix 0 -> +62 rep0to62 = phoneNumber If LeftphoneNumber, 1 = "0" Then rep0to62 = "+62" & RightphoneNumber, LenphoneNumber - 1 End Function Sesuai namanya fungsi ini berguna untuk mengganti prefix nomor hp 0 menjadi +62 kode indonesia. Terakhir fungsi untuk memproses keyword sms yang masuk dan sekaligus sebagai balasan untuk sms keluar. Public Function getBalasanSmsByVal keywordSms As String, ByVal phoneNumber As String As String Dim rs As cRecordset Dim param1 As String Dim arrKeyword As String Dim prefix As String Dim nilai As String Dim nama As String Dim tha As String Dim semester As String If LenkeywordSms > 0 Then If InStr1, keywordSms, "" > 0 Then 'karakter -> separator keyword arrKeyword = SplitkeywordSms, "" If Not LenarrKeyword0 > 0 Then getBalasanSms = "Keyword sms salah" Exit Function Else 'do nothing End If Else ReDim arrKeyword0 arrKeyword0 = keywordSms End If Else getBalasanSms = "Keyword sms salah" Exit Function End If prefix = arrKeyword0 prefix = UCase$prefix If UBoundarrKeyword > 0 Then param1 = arrKeyword1 'untuk contoh disini param1 bernilai nomor induk siswa 'untuk pengembangan lebih lanjut tahun ajaran dan semester dibuat settingan tersendiri tha = "2009/2010" semester = 2 Select Case prefix Case "TGS" 'validasi nis siswa If Not isValidNISparam1 Then getBalasanSms = ReplaceNIS_SALAH, "", param1 Exit Function 'validasi no hp siswa 'nama sekolah sebaiknya disimpan didalam variabel If Not isValidHPSiswaparam1, phoneNumber Then getBalasanSms = ReplaceHP_UNREG, "", "SMA Negeri Yogyakarta" getBalasanSms = ReplacegetBalasanSms, "", phoneNumber Exit Function End If strSql = "SELECT UPPERnama FROM siswa WHERE nis = '" & param1 & "'" nama = CStrdbGetValuestrSql, "" 'mulai proses pencarian nilai strSql = "SELECT matapelajaran_kode, nilai " & _ "FROM nilai_tugas " & _ "WHERE siswa_nis = '" & param1 & "' AND tahun_ajaran = '" & tha & "' AND semester = " & semester & " " & _ "ORDER BY matapelajaran_kode" Set rs = If Not Then Do While Not nilai = nilai & rs"matapelajaran_kode".Value & "=" & rs"nilai".Value & ", " Loop End If If Lennilai > 0 Then nilai = Leftnilai, Lennilai - 2 getBalasanSms = "Nilai tugas " & nama & " " & nilai Else getBalasanSms = "Nilai tugas " & nama & " sedang dalam proses pendataan" End If Case "UH" 'validasi nis siswa If Not isValidNISparam1 Then getBalasanSms = ReplaceNIS_SALAH, "", param1 Exit Function 'validasi no hp siswa 'nama sekolah sebaiknya disimpan didalam variabel If Not isValidHPSiswaparam1, phoneNumber Then getBalasanSms = ReplaceHP_UNREG, "", "SMA Negeri Yogyakarta" getBalasanSms = ReplacegetBalasanSms, "", phoneNumber Exit Function End If strSql = "SELECT UPPERnama FROM siswa WHERE nis = '" & param1 & "'" nama = CStrdbGetValuestrSql, "" 'mulai proses pencarian nilai strSql = "SELECT matapelajaran_kode, nilai " & _ "FROM nilai_ulangan " & _ "WHERE siswa_nis = '" & param1 & "' AND tahun_ajaran = '" & tha & "' AND semester = " & semester & " " & _ "ORDER BY matapelajaran_kode" Set rs = If Not Then Do While Not nilai = nilai & rs"matapelajaran_kode".Value & "=" & rs"nilai".Value & ", " Loop End If If Lennilai > 0 Then nilai = Leftnilai, Lennilai - 2 getBalasanSms = "Nilai ulangan " & nama & " " & nilai Else getBalasanSms = "Nilai ulangan " & nama & " sedang dalam proses pendataan" End If Case Else getBalasanSms = "Keyword sms salah" End Select End Function Untuk mengetahui daftar hp/modem apa saja yang didukung, jangan sungkan dan malu-malu 0% found this document useful 0 votes4K views11 pagesOriginal TitleTutorial SMS Gateway Gratis _ Membuat Sendiri Kirim SMS Gratis via Web Dengan PHP Dan MySQLCopyright© Attribution Non-Commercial BY-NCAvailable FormatsPDF, TXT or read online from ScribdShare this documentDid you find this document useful?0% found this document useful 0 votes4K views11 pagesTutorial SMS Gateway Gratis - Membuat Sendiri Kirim SMS Gratis Via Web Dengan PHP Dan MySQLOriginal TitleTutorial SMS Gateway Gratis _ Membuat Sendiri Kirim SMS Gratis via Web Dengan PHP Dan MySQLJump to Page You are on page 1of 11 You're Reading a Free Preview Pages 6 to 10 are not shown in this preview. Reward Your CuriosityEverything you want to Anywhere. Any Commitment. Cancel anytime.

cara buat sms gateway gratis