Skype (Go away when I am away)

Huhh.. m off the topic today….

Actually I found a very interesting trick to turn your Skype status to “Away” when you lock your desktop and back “Online” when you are back logged in…

This process is configured in 2 steps:

1. Visual Basic Scripts: There are 2 scripts in the package one to switch the status online “GetSkypeOnline.vbs” and one to switch the status back to away “GetSkypeAway.vbs”.

GetSkypeOnline.vbs

On Error Resume Next
Dim cur_skype 
Set cur_skype = CreateObject("Skype4COM.Skype")
if not (cur_skype is nothing) then 
'MsgBox cur_skype.CurrentUserStatus
 cur_skype.CurrentUserStatus = 1 'Online
end if

GetSkypeAway.vbs

On Error Resume Next
Dim cur_skype 
Set cur_skype = CreateObject("Skype4COM.Skype")
if not (cur_skype is nothing) then 
'MsgBox cur_skype.CurrentUserStatus
 cur_skype.CurrentUserStatus = 2 'Away
end if

2. Lock and Load: This a very brilliant tool I found recently with which we can capture the user activity events and fire off scripts based on events like SessionLock/SessionUnLock. Just configure the tool to fire off the correct script on the corresponding event and that’s it...

    

                
  
  

    

    C:\Documents and Settings\ampandey\Application Data\notunusual\LockAndLoad\logging.xml

    true

Your Skype contacts are now keeping a close eye when you lock and unlock your desktop… (via ur status).


Download solution


References:
Link1: http://www.notunusual.net/lock-and-load/
Link2: http://www.skype.com