Sytze de Boer wrote on 2010-09-03:
> Once again, I realise I'm just a beginner
>
> I have a form with 2 buttons
> The 1st button begins with
>
> LOCAL loSkype as skype4com.skype, lcPhoneNr as String, lcMessage as
> String, lnStatus as number lnStatus = 0 loSkype =
> CreateObject("Skype4COM.Skype", "Skype_") lcPhoneNr = "+6421937611" If
> Not loSkype.Client.IsRunning Then
> do while Not loSkype.Client.IsRunning
> loSkype.Client.Start()
> enddo
> EndIf
> loSkype.placecall(lcPhoneNr)
> * This works great
>
> If the call is not answered or I want to cancel the call before pickup,
> i want the 2nd button to cancel the call But I'm a bit stuck here LOCAL
> loSkype as skype4com.skype, lcPhoneNr as String, lcMessage as String,
> lnStatus as number lnStatus = 0 loSkype =
> CreateObject("Skype4COM.Skype", "Skype_") If Not
> loSkype.Client.IsRunning Then
> do while Not loSkype.Client.IsRunning
> loSkype.Client.Start()
> enddo
> EndIf
> loSkype.finish()
>
> Can someone help me out with this?
>
Sytze,
I think you need to have the Skype object as a property of the form.
You can use AddObject() or AddProperty("oSkype", CreateObject()). Sometimes
the AddObject can be a little tricky during code, so Create a new property
(via the designer or code) and always reference the same object when calling
and ending the call.
Be sure you remove the object from the form, when the form closes. (destroy
or unload event)
HTH,
Tracy
Tracy Pearson
PowerChurch Software
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/000001cb4bcd$55bd4f80$0137ee...@com
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
