SMS

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

        Dim TextMessage As String = ""
        Dim Mno As String = ""

        TextMessage = "Test Message"
        Mno = "99658xxxxx"

        url = "http://transaction.lionsms.com/sendsms.jsp?user=sxxxxs&password=18xxxx&mobiles=" & Mno & "&sms=" & TextMessage & ""

        Dim objResponse As System.Net.WebResponse = System.Net.WebRequest.Create(url).GetResponse
        Dim stream As System.IO.Stream = objResponse.GetResponseStream()
        Dim reader As New System.IO.StreamReader(stream)

    End Sub