PB 電子会議室
発言No. | 更新日 | 題名(クリックすると発言内容と関連するコメントが表示されます) |
---|---|---|
23449 | 08/12/08 09:15:39 | RE(3):PB10.0: 外部関数の呼び出しについて By tmiyoshi |
23448 | 08/12/07 23:28:09 | RE(2):PB10.0: 外部関数の呼び出しについて By class |
23446 | 08/12/05 15:38:12 | RE(1):PB10.0: 外部関数の呼び出しについて By tmiyoshi |
23445 | 08/12/05 15:37:20 | PB10.0: 外部関数の呼び出しについて By tmiyoshi |
カテゴリ:スクリプトの記述
日付:2008年12月08日 09:15 発信者:tmiyoshi
題名:RE(3):PB10.0: 外部関数の呼び出しについて
classさん、おはようございます。
SvfrServer.exeの格納してあるフォルダのパスがどうも
通っていない事が原因でした。
(手動で動かした結果上手く行きました)
これで先に進めそうです。
ありがとうございました。
>tmiyoshiさん、こんばんは。
>
>サポートページからの抜粋です。
>
>SVF for .NET Framework がセットアップされているコンピュータでは、
>SvfrServer.exe が起動されている必要があります。
><--起動していますか?
>
>Cで書くと、
>HSVFRCLIENT (SVFRCLIENT_API *lpVrConnect)(char *host);
>
>HSVFRCLIENT svf;
>char host[256];
>svf = lpVrConnect(host)
><--HSVFRCLIENTとOLEObjectは型は一致しますか?
>
>
>> 3.ソースの記述
>> [VB記述]
>> \' オブジェクト生成
>> Set svf = CreateObject(\"vfreport.client).vrConnect(\"localhost\")
>>
>> if (svf.VrInit() >=0) then
>>
>>
>> [PB記述]
>> OLEObject objClient //vfreport.client
>> OLEObject svr //vfreport.connection
>> integer iRet
>> Long handle
>>
>> objClient = CREATE OLEObject
>> iRet = objClient.ConnectToNewObject(\"vfreport.client\")
>> IF iRet<0 THEN
>> messagebox(\"\",iRet)
>> END IF
>>
>> svr=objClient.VrConnect(\"localhost\") →ここでエラーが発生(下記記載)
>> handle = objClient.VrInit()
>>
>>
>>上記のとおり記述し実行すると、
>>「エラー:外部オブジェクト関数 vrconnectの呼び出しエラーです。・・・」
>>となります。
>>
>>ちなみに環境ですが、
>> [開発環境]
>> OS:Windows XP
>> Power Builder 10
>> [実行環境]
>> OS:Windows Vista
>> (WindowsXPでの実行でも同様のエラーが出ます)
>>
>>おそらくオブジェクトの生成に関する記述の問題のような気がしていますが
>>記述についてもよく分からないので、ご伝授頂けると幸いです。
>>よろしくお願いいたします。
>>
>
>
付加情報:
PowerBuilder Version (記載なし)
Client SoftWare
OS Windows XP
DBMS Oracle Net 10
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS Oracle10G
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.