PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
24024 15/10/15 14:57:36 RE(3):PB12.5: ファイルバージョン取得 By itigo
24022 15/09/15 16:44:41 RE(2):PB12.5: ファイルバージョン取得 By ポン
24020 15/09/15 15:53:54 RE:PB12.5: ファイルバージョン取得 By asano01
24018 15/08/28 14:41:16 PB12.5: ファイルバージョン取得 By ポン

カテゴリ:スクリプトの記述
日付:2015年10月15日 14:57 発信者:itigo
題名:RE(3):PB12.5: ファイルバージョン取得

ポンさんこんにちは。

id:3404の記事を参考にされると良いと思います。
こちらの例では製品バージョンを取得していますが、
dwProductVersionXXをdwFileVesionXXに置き換えればファイルバージョンを取得できます。
また、
Version = String(Integer(VersionMS / 65536))+\".\"+String(Mod(VersionMS,65536),\"00\")+\".\"+&
          String(VersionLS,\"00\")

Version = String(Integer(VersionMS / 65536))+"."+String(Mod(VersionMS,65536))+"."+ &
          String(Integer(VersionLS / 65536)) + "."+String(Mod(VersionLS,65536))
とすると、プロジェクトオブジェクトで入れたメジャーVer、マイナーVer、ビルドVer、リビジョンVerをそれぞれ取得できます。
以上、参考まで。。

>まことさん
>コメントありがとうございます。

>当方のPBはClassicです。

>下記の方法でやってみましたが、
>表示されるのは「12.5」(PB)の製品バージョンでした。

>求めているのは、PBで作成したシステムのバージョン取得です。


>>
>>こんにちは。
>>
>>Classicであることを前提に話します。
>>ヘルプで「バージョン」で検索してみてください。
>>
>>下記の処理がみつかると思います。
>>
>>Integer li_majver, li_minver, li_fixver
>>ContextInformation ci
>>
>>this.GetContextService ("ContextInformation", ci)
>>GetMajorVersion(li_majver)
>>ci.GetMinorVersion(li_minver)
>>ci.GetFixesVersion(li_fixver)
>>
>>もし、.NETならば、MSDNでバージョン取得についての回答を
>>検索したほうがよろしいかと。
>>
>>まこと
>>
>>
>>>PB12.5でシステムを作成しています。
>>>
>>>
>>>プロジェクトファイルで右クリック、編集へ。
>>>バージョンタブ内の下部にある「インストーラで使用される実行ファイルのバージョン」
>>>の
>>>「ファイルバージョン」に設定した値を、
>>>メニュー用DWのOPEN時に取得し、表示したいです。
>>>
>>>
>>>
>>>作成された実行ファイル(EXE)のプロパティを見れば
>>>その値がわかるので、
>>>APIを使えばできるようなのですが。
>>>
>>>
>>>PB内にある関数で取得できないものか悩んでいます。
>>>アドバイスよろしくお願いします。
>>>
>>>

付加情報:

PowerBuilder Version 12.5

Client SoftWare

OS Windows7
DBMS Sybase SQL Anywhere Client
Browser (記載なし)

Server SoftWare

OS Windows Server 2008R2
DBMS Sybase SQL Server System 11
WebServer (記載なし)

PowerSpaceの運営は、パワーフューチャー株式会社が行っております。
Copyright © 2013 Power Future Co., Ltd.