PB 電子会議室
発言No. | 更新日 | 題名(クリックすると発言内容と関連するコメントが表示されます) |
---|---|---|
23443 | 08/12/03 18:22:21 | RE(3):dllの外部関数呼出 By tmiyoshi |
23347 | 08/06/07 16:24:10 | RE(2):dllの外部関数呼出 By shimiyan |
23346 | 08/06/07 14:27:00 | RE(1):dllの外部関数呼出 By ace |
23345 | 08/06/07 13:09:35 | dllの外部関数呼出 By shimiyan |
カテゴリ:スクリプトの記述
日付:2008年06月07日 13:09 発信者:shimiyan
題名:dllの外部関数呼出
いつも拝見させて頂いています。
質問なのですが、帳票作成用メーカーさんのdllを外部関数として呼出たいのですが
VB用のサンプルしかないのです。
PB用に置き換えるにはどのように記述すればよいのでしょう?
svfrclient.dllをwindowsフォルダーにコビー済み pathは通ってます
-------------------------------------------------------------------------
VB用サンプル
\'********[module svfrclient.dll]
[class vfreport.client]
Function VrConnect(host As String) As Object
Function CrconnectEx(host As String,port As Long) As Object
\'********[class vfreport.connection]
Function VrSetSpoolFileName2(fileName As String) As Long
Function VrInit() As Long
Private Sub Main()
Dim svf As Object
\'**************** オブジェクト生成 ***************
Set svf = CreateObject(\"vfreport.client).vrConnect(\"localhost\")
\'*************************************************
if (svf.VrInit() >=0) then
と続きます。
----------------------------------------------------------------------
PB側のプログラム
Gloval External Functions に
public Function long VrInit() LIBLARY \"svfrclient.dll\"
イベント部のスクリプトで
long handole
handole = vrInit() <--エラー
----------------------------------------------------------------------
アプリケーションの実行エラー(R0015)
エラー:外部関数 %s の呼び出しエラーです
と表示されます。
よろしくお願いします。
環境 Windows Vista
Power Builder 11
shimiyan
付加情報:
PowerBuilder Version (記載なし)
Client SoftWare
OS (記載なし)
DBMS Oracle Net 10
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.