Search  
Friday, May 25, 2012 ..:: Forum ::.. Register  Login
 Forum Minimize
Pentru a putea posta mesaje trebuie să vă înregistraţi.
Notă: Mesajele cu conţinut jignitor sau ilegal (inclusiv cereri de soft piratat) nu sunt acceptate şi vor fi şterse imediat .

Pentru a primi raspunsuri rapide si corecte, scrieti in mesaj ce intentionati sa faceti, ce mesaj de eroare primiti, in ce context si in urma caror actiuni. De asemenea, mentionati versiunea de FoxPro in care lucrati!
Dacă nu specificați versiunea, se consideră VFP 9.0 SP2.

SearchForum Home
  Visual FoxPro  Controale ActiveX  Trimitere SMS d...
 Trimitere SMS din VFoxpRO
 
 5/13/2008 12:46:50 PM
User is offlinededi02
123 posts
www.profox.ro
5th


Trimitere SMS din VFoxpRO
 (Romania)

Buna ziua.Am o aplicatie numita Agenda Telefonica si as dori sa o imbunatatesc putin.Mi-a venit o idee sa creez o clasa sau un mic programel care prin intermediul unui driver de Nokia sa pot trimite sms-uri.Stie cineva asa ceva,a incercat vreunul din voi asta? I-mi poate da cineva detalii sau ceva sfaturi , poate a  mai incercat si altcineva asa ceva.

Va multumesc.

 

 6/3/2009 2:25:18 PM
User is offlinevicos
139 posts
5th


Re: Trimitere SMS din VFoxpRO
 (N/A)
http://www.foxite.com/faq/default.aspx?id=58

download skype com-wrapper https://developer.skype.com/Download.

Cod preluat de pe Foxite.com

LOCAL loSkype as skype4com.skype, lcPhoneNr as String, lcMessage as String, lnStatus as number

lnStatus = 0

loSkype = CreateObject("Skype4COM.Skype", "Skype_")
lcPhoneNr = "+311234567890"
lcMessage = "this is a test"

If Not loSkype.Client.IsRunning Then
do while Not loSkype.Client.IsRunning
loSkype.Client.Start()
enddo
EndIf

loSkype.SendSms( lcPhoneNr, lcMessage)

INKEY(.5)

?loSkype.Convert.SmsMessageStatusToText(lnStatus)


  Visual FoxPro  Controale ActiveX  Trimitere SMS d...

Search  Forum Home         

 Google Ads Minimize

    

Copyright 2002-2010 Profox   Terms Of Use  Privacy Statement