トップ > テクニカルディスカッション >Magic V10 >給与大臣ＮＥのODDSとの連携方法

Re: 給与大臣ＮＥのODDSとの連携方法

このトピックの投稿一覧へ

Re: 給与大臣ＮＥのODDSとの連携方法

msg# 1.1

depth:: 1

前の投稿 - 次の投稿 | 親投稿 - 子投稿なし | 投稿日時 2009-10-22 13:56 | 最終変更

ndn

投稿数: 23

詳細内容：
ODDSﾏﾆｭｱﾙの「ｲﾝｽﾄｰﾙと前準備(VBﾍﾞｰｽ)」を元に連携を行っており
VBでの記述を⇒に読み替えて設定してみました。
①Dim svr As Object
　Set svr = CreateObject(“KyODDS.Application”)
⇒OLE項目のｲﾝｽﾀﾝｽ化：A=自動に設定しているので不要(との認識)

②Dim strDataPath As String
　IStatus = svr.SelectData(strDataPath)
⇒OLE項目のﾀｲﾌﾟﾗｲﾌﾞﾗﾘ：KyODDS1.0ﾀｲﾌﾟﾗｲﾌﾞﾗﾘ
　　　　　ｵﾌﾞｼﾞｪｸﾄ名：AppliCation
　　外部ｺｰﾙCOMにてﾒｿｯﾄﾞ呼出=SelectDataを設定
　　ﾊﾟﾗﾒｰﾀに変数：データパス名

③svr.SetCurrentData <データパス名>
⇒OLE項目のﾀｲﾌﾟﾗｲﾌﾞﾗﾘ：KyODDS1.0ﾀｲﾌﾟﾗｲﾌﾞﾗﾘ
　　　　　ｵﾌﾞｼﾞｪｸﾄ名：AppliCation
　　外部ｺｰﾙCOMにてﾒｿｯﾄﾞ呼出=SetCurrentDataを設定
　　ﾊﾟﾗﾒｰﾀに変数：データパス名（②と同じもの）

④Dim Shozoku As String
　svr.Shain.GetByCode “0001”
⇒OLE項目のﾀｲﾌﾟﾗｲﾌﾞﾗﾘ：Kyshain1.0ﾀｲﾌﾟﾗｲﾌﾞﾗﾘ
　　　　　ｵﾌﾞｼﾞｪｸﾄ名：shain
　　外部ｺｰﾙCOMにてﾒｿｯﾄﾞ呼出=GetByCode を設定
　　ﾊﾟﾗﾒｰﾀに'0001'

⑤Shozoku = svr.Shain.strShozoku3
⇒OLE項目のﾀｲﾌﾟﾗｲﾌﾞﾗﾘ：Kyshain1.0ﾀｲﾌﾟﾗｲﾌﾞﾗﾘ
　　　　　ｵﾌﾞｼﾞｪｸﾄ名：shain
　　外部ｺｰﾙCOMにてﾌﾟﾛﾊﾟﾃｨの取得=strShozoku3 を設定

①～③は動いているのですが、④・⑤がうまく行っておらず
データが返ってこない状況です。
ちなみに①～③と④・⑤のOLEは別で変数定義しています。
（1OLE＝1ﾀｲﾌﾟﾗｲﾌﾞﾗﾘの設定しか出来ない為）
記述の誤りの可能性もあるので、経験のある方が居られれば
御教授をお願いします。

投票数:0 平均点:0.00

投稿ツリー

給与大臣ＮＥのODDSとの連携方法 (ndn, 2009-10-22 11:52)
- Re: 給与大臣ＮＥのODDSとの連携方法 (ndn, 2009-10-22 13:56)
- Re: 給与大臣ＮＥのODDSとの連携方法 (shhashin, 2009-10-26 13:35)