这段程序在DELPHI中为何出错!

Question

var
   sendsms:oleVariant;
   n:integer;
begin 
 sendsms:=CreateoleObject('SMSAPI.HTTPClient');
  n:=sendsms.Connect('test','test');
  sendsms.DstAddress:='13823273808';
  sendsms.SrcAddress:='6388';
  sendsms.ServiceID:='MFXX';
  sendsms.DLType:=15;
  sendsms.DLData:='test';
  n:=sendsms.Send();<--出错语句
.
.
end;
同是一样的代码,我用VB写能调用成功.但到了DELPHI中就出现"无效参数数目"错误.为什么?
分不够再加!
附VB代码:
        Dim nResult As Long
        Dim objSMS As Object
        Dim n As Integer
        Set objSMS = CreateObject("SMSAPI.HTTPClient")
        n = objSMS.Connect("test", "test")
        objSMS.DstAddress = "13823273808"
        objSMS.SrcAddress = "6388"
        objSMS.ServiceID = "MFXX"
        objSMS.DLType = 15
        objSMS.DLData = "test"
        nResult = objSMS.Send()
End Sub

Answer 1

我倒，2种语言，2种语法啊，自己查DELPHI里的HELP吧

Answer 2

问提供 SMSAPI.HTTPClient 的公司吧

Answer 3

是不是字符串不兼容
下列的赋植值得怀疑，将自动化兼容的字符串类型付给他！！ 
 sendsms.DstAddress:='13823273808';
  sendsms.SrcAddress:='6388';
  sendsms.ServiceID:='MFXX';
  sendsms.DLType:=15;
  sendsms.DLData:='test';

Answer 4

sendsms.Send();这里错误，在DELPHI 中要求所给的参数和方法的参数数目一致，你这里没有带参数，所以出错。你sendsms.Send(EmptyParam,....);试试。