Sending SMS in VB.NET (AT COMMANDS)

Simple project, but its very useful. Device needed. GSM MODEM (globe tattoo, smart bro plugins) Visual Studio 2010.

Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. After downloading it, you will need a program like Winzip to decompress it.

Virus note: All files are scanned once-a-day by SourceCodester.com for viruses, but new viruses come out every day, so no prevention program can catch 100% of them.

FOR YOUR OWN SAFETY, PLEASE:

1. Re-scan downloaded files using your personal virus checker before using it.
2. NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.

Comments

panu naman po pala pagusto ko nakakapag reply sila sa messages ko.. pde po makahinge ng code :D tnx master

bakit po ganun? nag ssend sia, pero wla nman aq nrreciv dun sa pinag ssendan q? tnx in advance

In reply to by Anonymous (not verified)

parehas tayo men . may alam kn ? share nmn dyan :)

In reply to by linux251 (not verified)

use broadband stick para maka send ka. dapat yung broadband mo is unli para makaka receive ka.

gumagana, kailangan lang talaga ng load. Do you have codes for receiving/reading sms?

eh yung reciving txt from smartbrodband to vb.net meron ka? i just need yung pag may nag text sa smartbrodband mapupunta sa text1 ng vb.net para mabasa lng ng program ko... tnx any way

yeh its running 100% meron ka bang recieving txt from smart brodband to vb.net application?

bro, may error sa SerialPort1.Open() na line , d nya recognized ang comport 1, thanks sa mga sasagot

i need to make an application that the data is sent from one port on the mobile device, and received at another port on the same mobile device.

this is work.. thanks.. if u use wavecom, SerialPort1.BaudRate = 115200.. just for share... thanks you ^_^

i tried in SmartBro pero wala nmn eh.. may dapat bang i-edit

sir windows 10 gamit ko e .. d gumagana nag send na ako wala akong na recieve..plssss help kailangan sa thesis plsssssssss

bro reply pls how to add text character like 160 character

as far as i know, fixed syang 160 kada message, parang un ung limit. tpos pagumabot ka na 161+ characters magiging message #2 na un.

How to send unlimited sms using smart bro and vb.net

there's an error occurred,,it says "resource is in use",,,what happen? and what is smart bro plugin? reply please master :)

In reply to by zack (not verified)

send me screenshot of the error that you encountered, send at my facebook page, www.facebook.com/AskCompTutor

I find the SMS driven functionalities of ActiveXperts ( Just Google it! ) software that can be embedded in a .Net application much more flexible, and device selection could be made automatic than relying on the manual selection of COM port where the device is connected. the code is fairly straightforward and easier to understand..great job though for this sample app, i used some of your codes in my project as a reference.. :)

what should i put in the ( ) what should i change in the code to make the program run ?? thanks

PAR ERROR AKO SA CODE NA serialport1.write("AT" & vbCrLf)

sir meron na po akong hyperterminal . panu ko po sya ga2mitn sa vb.net ? thanks in advance .

gngamit sya para malaman mo kung gumagna ba tlga ung gsm modem mo para sa at command, pancheck din sya ng port para alam mo kung anung port ggmtn mo

sir , sun broadband po ginagamit ko . tapos COM3 ang port number . nachange ko na sa codes ung COM15 to COM3 pero may error pa rin . "The requested resource is in use." yan po lumalabas

Hello po... Kua Puede po patulong sa thesis ko po. Paanu po mag send using vb studio 2010 to a cellphone using globe tatto.

SIr, "Access to the port is denied" ang lumalabas once i try to send an SMS. I'm using Globe Broadband po.

Hello. pwede po ito sa postpaid at prepaid?

Imports System.IO.Ports Public Class Form1 Dim SerialPort1 As New System.IO.Ports.SerialPort() Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load SerialPort1.PortName = "COM3" SerialPort1.BaudRate = 9600 SerialPort1.Parity = Parity.None SerialPort1.StopBits = StopBits.One SerialPort1.DataBits = 8 SerialPort1.Handshake = Handshake.RequestToSend SerialPort1.DtrEnable = True SerialPort1.RtsEnable = True SerialPort1.NewLine = vbCrLf End Sub Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim message As String message = RichTextBox1.Text SerialPort1.Open() If SerialPort1.IsOpen() Then SerialPort1.Write("AT" & vbCrLf) SerialPort1.Write("AT+CMGF=1" & vbCrLf) SerialPort1.Write("AT+CMGS=" & Chr(34) & TextBox1.Text & Chr(34) & vbCrLf) SerialPort1.Write(message & Chr(26)) MsgBox("Sent") Else MsgBox("Port not available") End If End Sub End Class

sir.. the code doesnt have any error but i didn't receive any message.. can you help me please

Yung port com15 does not exist paano po sya mababago?

Saan po ang number ng cellphone? bat d naka declare sa codes?

Add new comment