delphi如何发送手机短信息? (100分)

  • 主题发起人 主题发起人 pingguo
  • 开始时间 开始时间
P

pingguo

Unregistered / Unconfirmed
GUEST, unregistred user!
我看了以下文章后想试一试,结果发送不了,请高手指点,给出详细的解答。

用Delphi发送SMS(手机短消息服务)
下面的例子演示了如何通过SOAP来调用一个SMS的WEB服务。

首先通过下面的地址下载并安装微软SOAP工具包2.0:
http://msdn.microsoft.com/downloads/default.asp?URL=/code/sample.asp?url=/msdn-files/027/001/580/msdncompositedoc.xml
然后就可以使用下面的简短代码发送SMS了。

uses
ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var
SoapClient: OleVariant;
v: OleVariant;
begin
SoapClient := CreateOleObject('MSSOAP.SoapClient');
SoapClient.mssoapinit('http://sal006.salnetwork.com:83/lucin/smsmessaging/process.xml');
SoapClient.SendTextMessage('Number', 'MessageBody', 'Sender');
end;

其中Number为国家代码+电话号码(不需要以零打头),
如 06 12345678 在荷兰:31612345678
 
程序也许没有问题,但是你能保证那个连接可用吗
发端消息好像没有哪个是免费的。
 
据说对中国的号码无效
 
免费?太天真了吧!
找个可以发送SMS的网站,再是程序POST数据即可
 
到www.smschina.com看看吧
你可以在delphi程序中潜入一个Ie,然后getdoc("http://..../");
参数自己设置好就行了,我就喜欢这么做。挺好用
 
我有一种设备可以发短信。装上一张手机的卡,再连接到电脑的com口上,就可以编程发短信了。
不过要在你这个手机上按电信的资费标准收费。
想购买的话,可以和我联系。fat_tao@21cn.com
 
ICQ可以发啊!
 
我看过一个内部的程序
只是教育网
没法试
 
关于GSM模块发短消息,我们已经封装了一个DLL,可以支持256个串口并行收发
 
不可用的!!!
不用想开发什么免费的发送段信息的程序了
要嘛和连通电信和做,
 
还是用手机模块吧,起码不受别人的限制,我给你提供技术支持
http://www.delphibaby.com/down/sms.zip(psw:www.delphibaby.com)
 
“装上一张手机的卡,再连接到电脑的com口上,就可以编程发短信了。”

肥涛 大侠:
能教教我怎样对那个卡编程吗?我主要是对短消息的pdu格式不熟悉。谢谢。
 
那是手机模块,差不多就可以看成一个手机
对它操作就是通过AT命令,呵呵,我们公司就是做这个应用的
 
应该是at指令吧,
谁有简单的例子?
(查了历史贴子,一大篇的at指令, 不知怎么用?)

关注。。。
 
to jollier:
http://www.delphibaby.com/down/sms.zip(psw:www.delphibaby.com)
下不了。。。

发给我一分好么?
whbell@sina.com.cn
 
我觉得还是到网易注册个帐号,反正是谁收谁交钱,另外方法也简单,post就可以了
 
网易的帐号是谁收谁收钱吗?
 
不要骗人了,哪有如此免费的东东,
 
后退
顶部