You are viewing an old version of this page. View the current version.

Compare with Current View Page History

Version 1 Next »

[ |../../index.htm#lansa/lansa048_2920.htm]
Visual LANSA フレームワーク ガイド > よくある質問 > 管理メニューのサーバーオプションを使用してフレームワークに定義されていたサーバーをどのようにして取得できますか?

管理メニューのサーバーオプションを使用してフレームワークに定義されていたサーバーをどのようにして取得できますか?


次の断片的なコードは、ネットワークに定義されているすべてのサーバーを表示するメッセージを出力する方法を示しています。

  • VL の F2 機能ヘルプを使用して、このサーバー・オブジェクトにより公開される全てのプロパティを表示
     
    Define_Com Class(#VF_FP007) Name(#Server) Reference(*dynamic)
     
  • 最初のサーバーを取得
     
    Invoke Method(#uSystem.uServerContainer.uFirstServer) Userverref(#Server) Ucursor(#vf_elnum) Ureturncode(#vf_elretc)
    Dowhile Cond('#vf_elretc = ok')
     
  • VF_FP007 サーバー・オブジェクトには、サーバーを定義するプロパティ一式
  • これらのプロパティはこの場合読み取り専用で絶対に更新されてはいけない
  • 例えば ..
     
    Use message_box_add ('Caption' #Server.uCaption)
    Use message_box_add ('Type'    #Server.uServerType)
    Use message_box_add ('LU Name' #Server.uServerLUName)
    Use Message_box_show (ok ok info)
     
  • 次のサーバー取得
     
    Invoke Method(#uSystem.uServerContainer.uNextServer) Userverref(#Server) Ucursor(#vf_elnum) Ureturncode(#vf_elretc)
    Endwhile
     
    [ |../../index.htm#lansa/lansa048_2920.htm]
  • No labels