Help needed sending SMS from Access 2010

[Stroud1977]

Hi, I have a pretty simple Entertainments Agency database that I've put together (With your help!).

My latest issue is that I'm struggling with sending SMS messages from my database.

I have an Artist Page and the artist has a Mobile phone number field "Artist Tel".

I've set up a Skype account which enables me to send SMS to mobile phones via web.

What I'm strugging to do is find the correct code to assign to a command button ("Send SMS")

I've searched this forum and also google, I've even downloaded templates that don't seem to work for me and everything seems to require SKYPE4COM.dll and SKYPE4COMlib.dll which isn't available from Skypes website anymore and doesn't seem to be on my laptop even after I've installed Skype.

I downloaded a 'SKYPE4COM.dl' file from somewhere, but it seems that the code needs the 'SKYPE4COMlib.dll' file to work and I can't find that anywhere!

Any advice? IS there an easier way of doing this than Skype?

Many thanks

 

[jdraw]

I did some googling and found http://www.experts-exchange.com/Microsoft/Development/MS_Access/Q_27414783.html. Good luck.

On the EE site go to the bottom to see answers.

 

[Stroud1977]

I did some googling and found http://www.experts-exchange.com/Microsoft/Development/MS_Access/Q_27414783.html. Good luck.

On the EE site go to the bottom to see answers.

Hi, thanks for the reply, unfortunately when i scroll to the bottom, there's no answers, it just wants me to sign up (I'm using Chrome).

It looks like he's using the Skype4com route, which is what I'm struggling with also.

Is there an easier way? I think the issue is, this is a brand new laptop and has the latest Windows 8 version of Skype (I've got both the app and the desktop version installed) and all these codes use an older version of Skype.

Maybe I'm way off...any suggestions?

 

[jdraw]

I've copied info from the link I gave earlier'

Question:

Hi

I'm using the following code to make a Skype Call from VBA in Access 2010

Dim skpSkype As SKYPE4COMLib.Skype
Dim calCall As SKYPE4COMLib.Call

Set skpSkype = New SKYPE4COMLib.Skype
Set calCall = skpSkype.PlaceCall(Phone_Number.Text)

I want to place another button on the screen which will end the call but am having a few problems getting it to work.

I'd also like to hide the Skype window, can this be done? I'd like my app to control making and killing calls without the user having to see Skype at all.

Answers:

Answers


by: boag2000Posted on 2011-10-25 at 12:23:02ID: 37026969
Not sure but most functions like this have some sort of visibility command:

calCall.Visible=False

...perhaps...?


by: danishaniPosted on 2011-10-25 at 12:43:53ID: 37027150
This works for me, to hang-up:

Private Sub cmdHangUp_Click()
Dim skpSkype As SKYPE4COMLib.Skype
Set skpSkype = New SKYPE4COMLib.Skype

skpSkype.ActiveCalls(1).Finish

Set skpSkype = Nothing

End Sub

My Skype is already minimized in Taskbar, and can Call and HangUp in minimized modus.

Hope this helps,
Daniel


by: bridgegaelPosted on 2011-10-26 at 01:27:01ID: 37029717
Thanks thats exactly what I needed.

 

[spikepl]

b....r Skype. Their SMS are expensive. We use them because our other cheap suppliers have a problem with special characters. If you are in an anglosaxon environment use the Betamax bundle, http://backsla.sh/betamax. Find the one with the cheapest SMS to your area of interest, (or find a business that provides an SMS-gateway in your country) and google for the POST solution - you stuff all the data into an URL.