Aplikasi Gratis Membangun SMS Gateway Berbasis Web

Mungkin di antara pembaca sekalian ada yang masih bertanya-tanya, apa itu SMS Gateway? SMS Gateway adalah sebuah platform yang menyediakan mekanisme untuk mengirim dan menerima SMS dari peralatan mobile melalui SMSC (Short Message Service Center).

SMSC merupakan jaringan telepon seluler yang menangani pengiriman SMS. Jadi, ketika seseorang mengirimkan sebuah pesan SMS melalui ponselnya, SMSC bertugas mengirimkan pesan tersebut ke nomor tujuan. Kita dapat memanfaatkan mekanisme tersebut untuk mengirim SMS melalui komputer, salah satunya yaitu melalui aplikasi berbasis web.

Aplikasi SMS Gateway biasanya digunakan pada aplikasi bisnis, baik untuk kepentingan broadcast promosi, servis informasi terhadap pengguna, penyebaran konten produk/jasa dan lain-lain. Karena relatif lebih mudah untuk diimplementasikan, SMS Gateway dengan menggunakan ponsel GSM/CDMA modem cukup berkembang dan banyak digunakan.

Pada kesempatan kali ini penulis ingin sedikit berbagi mengenai aplikasi-aplikasi gratis SMS Gateway berbasis web yang bisa dimanfaatkan oleh pembaca sekalian. Pembaca dapat mengembangkan sendiri aplikasi SMS Gateway untuk tujuan tertentu melalui platform-platform berikut.

1. Gammu & Wammu

Gammu pada dasarnya adalah sebuah library untuk membangkitkan SMS Gateway. Karena sifatnya yang open source dan mendukung banyak jenis modem, Gammu sangat populer dalam pengembangan sistem/aplikasi berbasis SMS Gateway.

Pengembang web dapat dengan mudah membuat sistem aplikasi SMS Gateway sederhana hanya dengan menggunakan script PHP dan database MySQL, dengan bantuan Gammu. Dokumentasi Gammu sangat lengkap dan mudah untuk diikuti bagi pemula. Wammu merupakan versi GUI dari Gammu.

Read More

Program Penggajian Karyawan

Form Design:

Listing Program:

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Call ceknik()
        Call cekjabatan()
        Call cekjumlahanak()
        Call cekstatus()

    End Sub
    Sub ceknik()
        nik.Items.Add("PM010")
        nik.Items.Add("PS111")
        nik.Items.Add("KU101")
        nik.Items.Add("GD100")
        nik.Items.Add("PM011")
    End Sub

    Sub cekjabatan()
        jabatan.Items.Add("Kepala Divisi")
        jabatan.Items.Add("Staff")
        jabatan.Items.Add("Wakil")

    End Sub
    Sub cekstatus()
        Status.Items.Add("Menikah")
        Status.Items.Add("Tidak Menikah")

    End Sub

    Sub cekjumlahanak()
        Dim x As Integer
        For x = 1 To 2
            jumlah_anak.Items.Add(x)
        Next

    End Sub

Read More

Tentang Mesran.net dan mesran.blogspot.com

Mesran.net merupakan salah satu website yang berguna untuk belajar bahasa pemograman.Untuk ANDA yang ingin belajar bahasa pemograman maka Mesran.net dan mesran.blogspot.com sangat bermanfaat sekali.karna disana kita dapat mempelajari bahasa-bahasa pemograman seperti Visual Basic net, Delphi, Pascal, C++, PHP, Java dan lain-lain.Selain itu kita juga dapat mendownload program dan software loch :).  Website tersebut juga bisa digunakan untuk mengecek nilai mahasiswa dan berbagai hal tentang perkuliahan juga.tetapi khusus untuk mahasiswa yang sudah melakukan registrasi di mesran.net.
selamat berkunjung di Mesran.net dan mesran.blogspot.com

Read More

Latihan Listview Penjualan Barang

Hasil Outputnya:

 
Listing programnya:

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        BuatTabel()
        kd_barang.Items.Add("TS001")
        kd_barang.Items.Add("TS002")
        kd_barang.Items.Add("VG001")
        kd_barang.Items.Add("VG002")
    End Sub

    Private Sub kd_barang_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kd_barang.SelectedIndexChanged
        Dim X As String
        Dim Y As String
        X = Microsoft.VisualBasic.Left(kd_barang.Text, 2)
        Y = Microsoft.VisualBasic.Right(kd_barang.Text, 3)
        Select Case X
            Case "TS"
                merk.Text = "TOSHIBA"
                Select Case Y
                    Case "001"
                        nama_barang.Text = "FLASHDISK 4GB"
                        harga.Text = 105000
                    Case "002"
                        nama_barang.Text = "FLASHDISK 2GB"
                        harga.Text = 75000
                End Select
            Case "VG"
                merk.Text = "V-GEN"
                Select Case Y
                    Case "001"
                        nama_barang.Text = "FLASHDISK 4GB"
                        harga.Text = 90000
                    Case "002"
                        nama_barang.Text = "FLASHDISK 2GB"
                        harga.Text = 60000
                End Select
        End Select
    End Sub

    Sub BuatTabel()
        With LV
            .FullRowSelect = True
            .GridLines = True
            .View = View.Details
            .Columns.Add("No Pembelian", 110)
            .Columns.Add("Kode", 100)
            .Columns.Add("Nama", 140)
            .Columns.Add("Merk", 120)
            .Columns.Add("Jumlah", 100)
            .Columns.Add("Total Harga", 100)
        End With
    End Sub

    Sub Isitabel()
        Dim lst As New ListViewItem
        With lst
            .Text = noPembelian.Text
            .SubItems.Add(kd_barang.Text)
            .SubItems.Add(nama_barang.Text)
            .SubItems.Add(merk.Text)
            .SubItems.Add(jumlahbeli.Text)
            .SubItems.Add(totalHarga.Text)
        End With
        LV.Items.Add(lst)
    End Sub


    Private Sub jumlahbeli_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles jumlahbeli.TextChanged
        If harga.Text = "" Then
            Exit Sub
        ElseIf jumlahbeli.Text = "" Then
            Exit Sub
        Else
            totalHarga.Text = jumlahbeli.Text * harga.Text
        End If
    End Sub

    Private Sub Btn_simpankelistview_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_simpankelistview.Click
        Isitabel()
        bersih()
    End Sub

    Private Sub Btn_bersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_bersih.Click
        bersih()
    End Sub

    Private Sub Btn_hapussmuadata_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_hapussmuadata.Click
        LV.Items.Clear()
    End Sub

    Private Sub Btn_hapusdatayangdipilih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_hapusdatayangdipilih.Click
        LV.Items.Remove(LV.SelectedItems(0))
    End Sub

    Private Sub Btn_keluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_keluar.Click
        Me.Close()
    End Sub

    Sub bersih()
        noPembelian.Text = ""
        kd_barang.Text = ""
        nama_barang.Text = ""
        merk.Text = ""
        harga.Text = ""
        jumlahbeli.Text = ""
        totalHarga.Text = ""
    End Sub
End Class

Read More

Fungsi Math Dalam PHP

PHP merupakan bahasa pemrograman yang mempunyai banyak fungsi bawaan  ( Fungsi Standar ) salah satunya adalah fungsi math. Fungsi math sendiri digunakan untuk melakukan perhitungan yang berhubungan dengan angka. Secara umum fungsi math dibagi dalam beberapa bagian sebagai berikut :

Fungsi Floor()

Fungsi floor merupakan bagian dari fungsi math dalam php yang digunakan untuk membulatkan bilangan ke arah bawah (misal : 1,4 menjadi 1)  . Berikut ini sintaks dasar fungsi floor dalam php :

floor(bilangan)

1	floor(bilangan)

Contoh penggunaan fungsi floor dalam pemrograman php :

<html> <body> <h1> Belajar PHP <br> Bersama Hastomo Network </h1> <h3> Fungsi floor : </h3> <? echo floor(4.34)."</br>"; echo floor(3.25)."</br>"; ?> </body> </html>

1 2 3 4 5 6 7 8 9 10 11

<html> <body>     <h1> Belajar PHP     <br> Bersama Hastomo Network </h1>     <h3> Fungsi floor : </h3>     <?         echo floor(4.34)."</br>";         echo floor(3.25)."</br>";     ?> </body> </html>

Tampilan floor dalam browser :

Read More

Operator Aritmetika dalam PHP

Operator Aritmetika adalah operator yang digunakan untuk melakukan perhitungan matematis. Untuk lebih lengkapnya lihat tabel berikut :

Nama Operasi	Contoh	Keterangan
Penjumlahan	$a + $b	Jumlah $a dan $b
Pengurangan	$a – $b	Selisih $a dan $b
Perkalian	$a * $b	Hasil kali $a dan $b
Pembagian	$a / $b	Hasil bagi $a dibagi $b
Modulus	$a % $b	Sisa hasil bagi $a dibagi $b

Operator String dalam PHP

Berbeda dengan operator logika, operator String digunakan untuk melakukan pemprosesan perintah antar string seperti yang ditunjukkan pada tabel berikut :

Nama Operasi	Contoh	Keterangan
Penggabungan (concatenation)	$a .  $b	Gabung string $a dan $b

Read More