Click here to Skip to main content
15,868,141 members
Articles / Mobile Apps

Control your PC with Mobile Phone

Rate me:
Please Sign up or sign in to vote.
3.55/5 (55 votes)
5 Aug 2004CPOL5 min read 326.3K   2.4K   119   151
Shutdown your PC from anywhere in this universe using mobile phone, with lesser cost.

Image 1

Introduction

This time something different but related to mobile phone. Some times I think ‘can I control my PC with my mobile phone!’. After thinking for a few days I come to know that I can. This is a simple example to control your PC with your mobile phone.

I dreamed to control my PC like shutting down, sending mails, sending files, starting or stopping services etc. from any where from this universe using my mobile phone with lesser cost. Finally I did it with simple logic.

Logic behind the scene

I am having a mobile phone and I can send SMS to my mail id. My mobile phone service provider allows me to send Mail through SMS service. I will send message to my mail Id like “SHUTDOWN” (Command to shutdown machine). Assume my system is switched on and opened Outlook 2000 (I did not tried with other versions). I set Outlook to check my mail account every 60 seconds

I have written a listener application in VB. This application will be running in my system. This listener will check if any new mail is arrived to my inbox. If any new mail received then it will open the mail and check is the message is sent from my mobile phone. If it is sent from my mobile phone then it will read the command, which I sent. If the command is “SHUTDOWN” then it will fire shutdown event to the Operating system and the Operating System will shout down the PC.

Using the code

I am used Outlook as my mail client. Create an outlook application object. From that getting name space of my inbox. After that checking each unread mail is it sent from my mobile phone. If it so then it parse the message and sent it to API function.

Here is the code to parse mail

VBScript
Private Function ParseMail() As String
….
….
  'Lets iterate through an each mail
  For Each oMails In oNpc.GetDefaultFolder(olFolderInbox).Items
    If oMails.UnRead Then
      sParam = ""
      'Change the Subject comparition string 
      'based on your service provider message
      If UCase(oMails.Subject) = UCase(Trim(txtSubject.Text)) Then
        sCommand = Mid(oMails.Body, 1, InStr(1, oMails.Body, Chr(13)) - 1)
        If InStr(1, sCommand, "~") <> 0 Then
          ParseMail =  


     
   Mid(sCommand, 1, InStr(1, sCommand,
    "~") - 1)
      sParam = 
          Mid(sCommand, InStr(1, sCommand,
      "~") +  1) Else
        ParseMail =     
           sCommand  End If
          oMails.UnRead =   False End If ' If
          Send  Unread mail Header is checked then
        send
          info  to
        mobile If
        chkUnReadMail.Value = 
       
            
       1  Then If
        UCase(oMails.Subject) <>  UCase(Trim(txtSubject.Text)) Then
          If InStr(1, sAlertedMails, Trim(oMails.EntryID)) = 0 Then
            sAlertedMails = sAlertedMails & Trim(oMails.EntryID) & ","
            sMsgHead = "From: " & oMails.SenderName & vbCrLf
            sMsgHead = sMsgHead & "Sub: " & oMails.Subject & vbCrLf
            sMsgHead = sMsgHead & "DT: " & oMails.SentOn & vbCrLf
            sMsgHead = sMsgHead & "MSGID: " & oMails.EntryID & "~"
            SendSMS sMsgHead
          End If
        End If
      End If
    End If
  Next oMails
….
….
End Function

I used more API functions and you can find it in www.allapi.net.

Using this application we can send commands to the system and also the system will report the status.

For example I like to know is there any new mail in my inbox then I will send command like CHECKMAIL. When the Listener receives this information then it will check count of unread mails and sends it to my mobile as SMS. Here is the code to parse mail

I thank http://www.spicesms.com Team for providing special SMS service for doing this application. I used XMLHTTP to pass the information as SMS to my Mobile.

VBScript
Private Sub SendSMS(sMessage As String, 
  Optional sFrom As String = "rasheedsys")
…
…
Dim oXml As New MSXML2.XMLHTTP
    Call oXml.Open("POST", "http://www.spicesms.com/abc.asp?from=" 
      & sFrom & "&msg=" & sMessage & "~") 
        'Cange your vendor URL appropriately
  Call oXml.setRequestHeader("Content-Type", "text/xml")
  Call oXml.Send
    txtLog = txtLog & "Status of: " & "http://www.spicesms.com/abc.asp?from=" 
      & sFrom & "&msg=" & sMessage & "~" & vbCrLf
  txtLog = txtLog & oXml.responseText & vbCrLf
…
…
End Sub

Here is the Command list and it’s functionality

SHUTDOWN

If we send SMS as SHUTDOWN then the machine will get shout downed

FILELIST~Folder Path~email Id

This command receives two parameters, Folder path and email Id to which we have to send the file list.

If we know the filename and file path we can use SENDFILE command to send a file from the machine to any email Id. In case we do not know the file name and path we can use FILELIST command. This command will get list of files, which is in the particular folder or Drive.

Example

FILELIST~C:\temp~rasheed1979@hotmail.com
When this message reaches my inbox then it search Temp folder in C drive and builds file list. The same is sent to the specified email id. In our example this file will be sent to rasheed1979@hotmail.com

SENDFILE~File Name With Path~email Id

This command used to send a specific file from my system to specific email Id.

Example

SENDFILE~C:\myfile.txt~rasheed1979@hotmail.com
The file myfile.txt will be sent to the mail id rasheed1979@hotmail.com

WHO

This command used to find the user who currently logged in the machine

NETSEND~System name~Message to send

Using this command we can send message from one machine to another machine without physical presence.

Example

NETSEND~SYS1~Hi
A message Hi will be sent to the machine named SYS1

CHECKMAIL

This command used to check number of unread mails in inbox. This command counts number unread mails in inbox and sends SMS to your mobile device (I used www.spicesms.com service)

READMAILHEADER

This command used to check important information about the mail like from whom the message received, subject, Date time and message id (Used to read message).Read mail header info like From, Subject and Message id

READMSG~msgid

We can get message important detail using READMAILHEADER function. This function will returns message id. If we pass that message id like READMSG~adwerv354yjgh5fgrweg then the content of mail is sent to your mobile phone.

Using the application

You need VB runtime in your machine. I am not used any additional component in this application. You need MSXML 3.0 parser in your machine. You can find it in www.microsot.com download section

When you compile and run this application an icon will be displayed in the system tray

Image 2

Right click on it to get setup screen

Image 3

Click on Setup menu to view the listener configuration screen. Click on Exit to close the listener

Image 4

Conclusion

We all know that we can control a PC from another PC. This is an initial approach to control PC using mobile phone. Not only controlling a PC we can get report from PC, File list, PC status, any other information stored in PC and much more. It is a beginning…

History

  • Initial version 0.1.0
  • Version 0.1.1
    • Commands Added

    • FILELIST
    • SENDFILE
    • WHO
    • NETSEND
    • CHECKMAIL
    • READMAILHEADER
    • READMSG 

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)


Written By
India India
Called as Rasheed. Completed Master of Computer science. Working as Senior Consultant in Chennai, India.

Try to achive in different stream

Comments and Discussions

 
Questionfinal year project help Pin
Member 1342896713-Nov-17 4:04
Member 1342896713-Nov-17 4:04 
QuestionNeed help Pin
Member 1100419313-Aug-14 17:15
Member 1100419313-Aug-14 17:15 
Questionquestion Pin
chaitanya668-Jun-12 3:59
chaitanya668-Jun-12 3:59 
Questionurjent Pin
Member 873418015-Mar-12 22:25
Member 873418015-Mar-12 22:25 
AnswerRe: urjent Pin
rasheed197916-Mar-12 14:22
rasheed197916-Mar-12 14:22 
GeneralMy vote of 5 Pin
Member 43208441-Mar-12 9:08
Member 43208441-Mar-12 9:08 
Questionsoure code of sending messages from mobile keypad to PC in java swings Pin
Member 867064322-Feb-12 22:28
Member 867064322-Feb-12 22:28 
GeneralMy vote of 5 Pin
daud ahmad5-Aug-10 10:29
daud ahmad5-Aug-10 10:29 
Questionhow to run the project? Pin
sunilguptamait21-Mar-10 6:08
sunilguptamait21-Mar-10 6:08 
Generalexplain me Pin
balajistm16-Mar-10 4:10
balajistm16-Mar-10 4:10 
Generalplease explain the code Pin
balajistm16-Mar-10 4:06
balajistm16-Mar-10 4:06 
GeneralMy vote of 2 Pin
ramakrishnadonlee15-Mar-10 7:19
ramakrishnadonlee15-Mar-10 7:19 
Generalplease help me Pin
sasank129-Mar-10 23:25
sasank129-Mar-10 23:25 
Generalsecurity Pin
vaidheeswaran22-Dec-09 1:19
vaidheeswaran22-Dec-09 1:19 
Generalproblem Pin
a.bashar0425-Dec-09 22:32
a.bashar0425-Dec-09 22:32 
QuestionHow can i send sms to my email id Fast Pin
BoltBhupenda19-Nov-09 1:30
BoltBhupenda19-Nov-09 1:30 
Generalsms project Pin
kalaikathiravan20-Oct-09 20:47
kalaikathiravan20-Oct-09 20:47 
GeneralRe: sms project Pin
rasheed19798-Nov-09 19:42
rasheed19798-Nov-09 19:42 
Generalurgent!!!!!!!!!!!!!!!!! Pin
kshiti kaushik7-Oct-09 4:33
kshiti kaushik7-Oct-09 4:33 
GeneralRe: urgent!!!!!!!!!!!!!!!!! Pin
rasheed19798-Nov-09 19:43
rasheed19798-Nov-09 19:43 
Generali have question Pin
vbEndUser18-Sep-09 22:59
vbEndUser18-Sep-09 22:59 
Generalproject Pin
amol897-Sep-09 18:34
amol897-Sep-09 18:34 
Generalvery very urgent Pin
prathyush8829-Aug-09 4:17
prathyush8829-Aug-09 4:17 
GeneralRe: very very urgent Pin
rasheed197929-Aug-09 22:19
rasheed197929-Aug-09 22:19 
GeneralRe: very very urgent Pin
prathyush885-Sep-09 9:36
prathyush885-Sep-09 9:36 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.