我在php中调用COM类中的任何方法有麻烦。为了找到该类中的所有方法,我使用:
$com = new COM('Some.Class.Name');
com_print_typeinfo($com);
这个类包含了大约100种不同的方法。但是当打电话给他们时:
$com->SomeMethod();
,此错误弹出:
Fatal error: Call to undefined method com::SomeMethod() in
C:\xampp\htdocs\www\test.php on line 22
当我使用其他COM对象,如“InternetExplorer.Application”类时,不会发生这种情况。
此外,我知道这个COM对象像其他编程语言(如Delphi)一样工作。
我使用PHP 5.5.19,64位Windows Vista和XAMPP,具有32位PHP架构。
我会感谢任何可能发生的事情或一些可能的解决办法。
编辑:
COM服务器应用程序由Delphi制作。
这可能是另一个线索:当我使用代码
$com = new COM('Some.Class.Name');
foreach ($com as $obj) {
echo $obj->Name . "
";
}
我得到:
Fatal error: Uncaught exception ‘Exception’ with message ‘Object of
type com did not create an Iterator’
我想这表明应用程序界面本身可能会出现问题,但是我不知道这个问题可能是什么。我在PHP工作,所以COM对象的内部对我来说完全模糊。但是,为了解决这个问题,我将非常感谢有关具体步骤的任何线索。
EDIT2:
这是Srv_TLB.pas文件的简短代码。
unit Srv_TLB;
{$TYPEDADDRESS OFF}
{$WARN SYMBOL_PLATFORM OFF}
{$WRITEABLECONST ON}
{$VARPROPSETTER ON}
interface
uses Windows, ActiveX, Classes, Graphics, StdVCL, Variants;
const
// TypeLibrary Major and minor versions
SrvMajorVersion = 1;
SrvMinorVersion = 0;
LIBID_Srv: TGUID = '{xxxxx-xxx-xxx-xx...}';
IID_ISrvObject: TGUID = '{yyyyy-yyy-yyy-yy..}';
CLASS_SrvObject: TGUID = '{zzzzz-zzz-zzz-z...}';
type
// *********************************************************************//
// Forward declaration of types defined in TypeLibrary
// *********************************************************************//
ISrvObject = interface;
ISrvObjectDisp = dispinterface;
// *********************************************************************//
// Declaration of CoClasses defined in Type Library
// (NOTE: Here we map each CoClass to its Default Interface)
// *********************************************************************//
SrvObject = ISrvObject;
ISrvObject = interface(IDispatch)
['{yyyyy-yyy-yyy-yy..}']
function FuncName1(const param1: WideString; const param2: WideString): Integer; safecall;
function FuncName2: OleVariant; safecall;
function FuncName3(const param: WideString): Integer; safecall;
end;
// *********************************************************************//
// DispIntf: ISrvObjectDisp
// Flags: (4416) Dual OleAutomation Dispatchable
// GUID: {yyyyy-yyy-yyy-yy..}
// *********************************************************************//
ISrvObjectDisp = dispinterface
['{yyyyy-yyy-yyy-yy..}']
function FuncName1(const param1: WideString; const param2: WideString): Integer; dispid 3;
function FuncName2: OleVariant; dispid 4;
function FuncName3(const param: WideString): Integer; dispid 5;
end;
CoSrvObject = class
class function Create: ISrvObject;
class function CreateRemote(const MachineName: string): ISrvObject;
end;
implementation
uses ComObj;
class function CoSrvObject.Create: ISrvObject;
begin
Result := CreateComObject(CLASS_SrvObject) as ISrvObject;
end;
class function CoSrvObject.CreateRemote(const MachineName: string): ISrvObject;
begin
Result := CreateRemoteComObject(MachineName, CLASS_SrvObject) as ISrvObject;
end;
end.
而问题是(从PHP方面的东西):
我可以用$ com = new COM(‘The.Class.Name’)初始化COM对象;或者使用$ com = new COM(‘{GUID}’);我得到类型信息com_print_typeinfo($ com);所以我可以看到对象应该有方法FuncName1(),FuncName2()和FuncName3( ),但是当我尝试使用$ comp> FuncName1(param1,param2)等调用它们时,它返回的是这个错误:
Fatal error: Call to undefined method com::SomeMethod() in
C:\xampp\htdocs\www\test.php on line 22