VB6 Skype短信示例 [英] VB6 Skype SMS example

问题描述

我看了一个vbs示例，通过Skype4Com发送短信，但由于我缺乏vbs的经验，我无法在VB6中运行它！



1.我需要向Skype4Com.dll做声明

2.Attach到Skype

3.如果Skype没有运行，请启动Skype

4.发送短信。





我的代码到目前为止：

  Sub  mainSMS（）
 
 ' 创建Skype4COM对象： 
 设置 oSkype = WScript.CreateObject（  Skype4COM.Skype，  Skype _）' 在运行时生成需要对象。 
 
 ' 启动Skype clie nt： 
 如果 不 oSkype.Client.IsRunning 然后 
 '  oSkype.Client.Start（）生成'编译错误：expected= 
 oSkype.Client.Start ' 没有生成错误但运行时没有到目前为止！ 
 结束 如果 
 
 ' 发送短信： 
 设置 oSms = oSkype.SendSms（MobileNumber， 测试）
 WScript.Sleep（< span class =code-digit> 60000 ）' 什么是WScript ???  
 
 MsgBox（  D一个）
 
 结束  Sub  

我在电脑上在Vista上运行VB6。



有没有人有一个有效的例子拜托？



谢谢。

解决方案

您是否注册了 DLL ？

请注意，由于这些解决方案已发布， Skype API已被Microsoft淘汰 - 事实上，它们只是秘密在2013年9月降级了所有人的Skype（参见下面的链接）。正如您所期望的那样，软件工程师甚至整个公司都浪费了大量时间在Skype上开发产品，这引起了巨大的骚动。有一种称为URI的东西，但它非常简单，你不能用它来做短信（但无论如何）。

请参阅 https://aragonresearch.com/microsoft- kills-skype-desktop-apis-leaves-developers-scrambling / [ ^ ]

Franc Volke写道：

你意识到在编写Vista之前，VB6已经过时且不支持某些时间 ？你应该学习VB.NET，它是一种真正的语言，有很多支持和很多工作机会。

I have looked at a vbs example to send an SMS via Skype4Com but am not able to run it in VB6 probably due to my lack of experience with vbs!

1.I need to make declarations to the Skype4Com.dll
2.Attach to Skype
3.Start Skype if it is not running
4.Send the SMS.


My code so far:

Sub mainSMS()

'Create a Skype4COM object:
Set oSkype = WScript.CreateObject("Skype4COM.Skype", "Skype_") 'Generates "Object required" at runtime.

'Start the Skype client:
If Not oSkype.Client.IsRunning Then
   'oSkype.Client.Start() Generates 'Compile error: expected "="
   oSkype.Client.Start        'No error generated but runtime has not got this far!
End If

'Send SMS:
Set oSms = oSkype.SendSms(MobileNumber, "Test")
WScript.Sleep (60000)  'What is WScript???

MsgBox ("Done")

End Sub

I am running VB6 on Vista on a PC.

Does anyone have a working example please?

Thank you.

解决方案

Did you register the DLL?

Note that since these solutions were published, the Skype API has been obsoleted by Microsoft-- indeed, they simply "secretly" downgraded everyone's Skype in September 2013 (ref link below). There's been a huge uproar as you would expect from software engineers and even entire companies that have wasted gallons of time developing products around Skype. There is something called a URI, but it's extremely simple and you can't do SMSs with it (yet anyway).
See https://aragonresearch.com/microsoft-kills-skype-desktop-apis-leaves-developers-scrambling/[^]

Franc Volke wrote:

I am running VB6 on Vista on a PC.

You realise that by the time Vista was written, VB6 had been obsolete and unsupported for some time ? You should learn VB.NET, it's a real language, with lots of support and lots of job opportunities.

这篇关于VB6 Skype短信示例的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！