954,549 Members — Technology Publication meets Social Media
Username:
Password:
Lost login information?
Have something to say? Contribute New Article Reply to this Article

sms sending using vb 2008

hi guys.im new here at the community.
im marco a computer science student.

guys/sir/madam is it ok for you if ill ask a help from your expertise.
right now im doing a project a bout a home security system its a simple anti burglar system, its kinda weird but it goes like this:

when the sensors are "tripped" the system will capture a video and automatically stores it on pc.this video can be later view by home owner when she/he arrive.

then after capturing video the system also simultaneously send an sms to homeowner,a predefined sms that informs the owner that his/her house has burglar.

i use webcam only as my video capture device for practicality..

any one has detailed idea or knowledge about how to send sms using vb2008?.
i use also a infrared sensor but i don't know how to "interface" it with vb2008.

im a computer science student but honestly speaking i'm not very good in analysis and logical thinking i knew about basics only but im easy to be guided.

your ideas are much more appreciated.
thank you so much.

hoping and waiting and bleeding
marco from Philippines

marc311
Newbie Poster
1 post since Jan 2010
Reputation Points: 10
Solved Threads: 0
 

Hi!
I am 11 year old and i am giving you a tip!

Well as you can see sending an sms is a tough job but here is the code:

Try
            'Connect to the database
            Dim conn As New OleDb.OleDbConnection()

            conn.ConnectionString = "Provider=SQLNCLI;Server=.\;" & "User ID=ozekiuser;password=ozekipass;Database=ozeki;Persist Security Info=True"
            conn.Open()
            If conn.State = ConnectionState.Open Then
                'Send the message
                Dim cmd As New OleDb.OleDbCommand()
                cmd.Connection = conn
                Dim SQLInsert As String = (("INSERT INTO " & "ozekimessageout (receiver,msg,status) " & "VALUES " & "('") + tbsender.Text & "','") + tbmsg.Text & "','send')"
                cmd.CommandText = SQLInsert
                cmd.ExecuteNonQuery()
                MessageBox.Show("Message sent")
            End If

            'Disconnect from the database
            conn.Close()
        Catch ex As Exception
            '    MessageBox.Show(ex.Message)

        End Try

This works in your country but sadly not in my country - india

Happy Coding
TheMasterThigMaker

TheMasterThingM
Newbie Poster
1 post since May 2010
Reputation Points: 10
Solved Threads: 0
 

This article has been dead for over three months

Post: Markdown Syntax: Formatting Help
You
View similar articles that have also been tagged: