Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > it.comp.lang.visual-basic > #18938

Re: Uso di SKYPE4COM con Visual basic 6

X-Received by 10.176.86.130 with SMTP id a2mr23432003uab.32.1480962360909; Mon, 05 Dec 2016 10:26:00 -0800 (PST)
X-Received by 10.157.18.211 with SMTP id g77mr3751034otg.14.1480962360845; Mon, 05 Dec 2016 10:26:00 -0800 (PST)
Path csiph.com!weretis.net!feeder6.news.weretis.net!news.glorb.com!p16no2926037qta.1!news-out.google.com!j8ni5520qtc.0!nntp.google.com!p16no2926035qta.1!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups it.comp.lang.visual-basic
Date Mon, 5 Dec 2016 10:26:00 -0800 (PST)
In-Reply-To <4fa79d2d$0$1380$4fafbaef@reader2.news.tin.it>
Complaints-To groups-abuse@google.com
Injection-Info glegroupsg2000goo.googlegroups.com; posting-host=31.159.251.32; posting-account=zCkRSwoAAADf-7Xy4FhUIILtorHbHa2t
NNTP-Posting-Host 31.159.251.32
References <bd07243f-06de-43cf-86fa-63ba09d82219@t20g2000vbx.googlegroups.com> <1a159f36-1d23-44ea-8649-667ebd7cba30@l7g2000vbz.googlegroups.com> <1397399.1003.1336135675327.JavaMail.geo-discussion-forums@vbay5> <2012050412590422084@mynewsgate.net> <24692032.725.1336137032738.JavaMail.geo-discussion-forums@vbuo17> <2012050413260722084@mynewsgate.net> <19445733.1154.1336138904335.JavaMail.geo-discussion-forums@vbvx4> <2012050417120622084@mynewsgate.net> <13593876.4365.1336381840071.JavaMail.geo-discussion-forums@vbbfk16> <4fa794af$0$1384$4fafbaef@reader2.news.tin.it> <33039603.1473.1336384119215.JavaMail.geo-discussion-forums@vbvx4> <4fa79d2d$0$1380$4fafbaef@reader2.news.tin.it>
User-Agent G2/1.0
MIME-Version 1.0
Message-ID <1f22dc57-199e-4698-af07-62a2abc2e46e@googlegroups.com> (permalink)
Subject Re: Uso di SKYPE4COM con Visual basic 6
From MYAo <maurotassera@gmail.com>
Injection-Date Mon, 05 Dec 2016 18:26:00 +0000
Content-Type text/plain; charset=UTF-8
Content-Transfer-Encoding quoted-printable
Xref csiph.com it.comp.lang.visual-basic:18938

Show key headers only | View raw


Scusate l'intromissione,

mi aggancio a questa discussione in quanto mi trovo in una situazione simile a dcomerlati e visto che siete utenti esperti.
Vorrei sviluppare un semplice sript VB per fare in modo di inviare un sms via skype. Premetto che sto utilizzando un editor incluso in un programma di supervisione per impianti e che non ho una profonda conoscenza di VB. 

Attualmente ho testato con successo questo banale listato che gira correttamente e nel momento in cui viene richiamato fa partire una chiamata voip indirizzata all'utente skype della mia rubrica:

Private cimOleObj As SKYPE4COMLib.ISkype
Sub OnExpressionHigh(exprValue As Variant)
End If
cimOleObj.PlaceCall "utentediskype"
End Sub

Quindi, ingenuamente, visto che vi è una funzione simile ma che tratta gli sms ho ricaricato il credito skype e ho tentato di svilupparla come segue:

Private cimOleObj As SKYPE4COMLib.ISkype
Sub OnExpressionHigh(exprValue As Variant)
End If
cimOleObj.SendMessage "utenteskype", "Messaggio per l'utente"
End Sub

Purtroppo però a differenza del listato precedente, quando viene richiamato non succede proprio nulla.
Ho tentato anche di svilupparlo come è stato suggerito a dcomerlati, ma niente, ricevo un errore 168 "Expeting:End of Line" riferito alla penultima riga:


Dim mySkype As SKYPE4COMLib.Skype
Dim mySmsMessage As SKYPE4COMLib.SmsMessage
Dim mySmsNumber As String
Dim mySMSText As String

Sub OnKeyDown(key As Integer)
   
   mySmsNumber = "+16515551212"
   mySMSText = "This is a test message"
   
   Set mySmsMessage = mySkype.CreateSms(smsMessageTypeOutgoing, mySmsNumber)
   mySmsMessage.Body = mySMSText
   Call mySmsMessage.Send 
   
End Sub


Se foste così gentili da aiutarmi ve ne sarei grato.
Grazie

Back to it.comp.lang.visual-basic | Previous | Next | Find similar


Thread

Re: Uso di SKYPE4COM con Visual basic 6 MYAo <maurotassera@gmail.com> - 2016-12-05 10:26 -0800

csiph-web