2017-12-22 18 views
-3

私はLotusのスクリプトで作業しています。私は現在のシステムのWindows OSが持っているWindow XP/7/Vista/8/10のようなメジャーバージョンを知る必要があります。例として、コマンドプロンプトを使用してmsinfo32を起動すると、私はOS名と一致するMicrosoft Windows 10 Home Single Languageを取得しています。これは、少なくとも「Microsoft Windows 10」です。おかげlotusscriptを使用して完全なWindowsバージョン情報(Windows XP/7)を取得する方法

+0

https://stackoverflow.com/help/how-to-ask – dda

+0

ようこそ> Stack Overflowへようこそここでアカウントを作成したときは、[ツアー]をして[ヘルプ]ページを読んで親しみを持たせることをお勧めしましたあなた自身がサイトを持っているので、次の質問を投稿する前にそれをしてください。あなた自身で解決策を見つけるための最小限の努力の一部は、尋ねる前にここに既存の投稿を検索することです。 eは、多くの異なるプログラミング言語で、Windows版の取得に関する多くの既存の記事です。いくつかのものがありますが(ロータススクリプトではありませんが)、正しい方向にスタートさせるべきです。 –

+0

あなたの助けに感謝します。実際には、投稿する前に適切な質問を行っていましたが、もちろん十分な時間を費やすことはできませんでしたが、ロータスノートの文脈で解決策を見つけることができませんでした。 – user1575786

答えて

0

あなたは式を経て 'OSバージョン' を取得することができます。Windows 7用
@Platform([Specific])
あなたが(配列)
[ 'のWindows/NT'、 '6.1'、 ''、 '' のようなものを買ってあげます]

か、これは 'Windowsの/ 32'、プレーンなOS名を返しますちょうど
@Platform
を行うことができます。 でも! osが64ビットであっても、32ビットのクライアント/サーバーを持っている場合は常に/ 32を返します。 64ビットのクライアント/サーバーをお持ちの場合、正しい値、つまり常に64ビットを返します。

P.S. lotusscriptバージョン::)
dim v as variant v = evaluate({ @Platform([Specific]) }) msgbox(v(0) & ", " & v(1))

p.p.s. here's windows versions list

0

申し訳ございません。 。

Dim Ret As Variant 
Ret = Evaluate({ @RegQueryValue("HKEY_LOCAL_MACHINE"; "SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion"; "ProductName") }) 

のMsgBoxのRet(0)は、Windows 10のホーム単一言語の "Windows 7、8と同様に

作品罰金「のようなディスプレイ"

:とにかく、私はこのようなWindowsレジストリにアクセスして、それを持っていました
関連する問題