Solution ID: 21089
Type: EXTERNAL

表題: テストスクリプトからの環境変数の取得方法

製品: Rational Robot
バージョン:
OS:
DEFECT #: N/A
PATCH #: N/A
参照事項:	

作成年月日: 13-09-2001
改訂年月日: 

質問:            
Rational Robot のテストスクリプト内で環境変数を取得するには、
どうすればよいでしょうか？

回答:
SQA Basic 言語のEnviron 関数を使用することによって、テストス
クリプトが実行されている環境で宣言されている環境変数の取得を
行うことが出来ます。

以下に、取得可能な環境変数の一覧がC:\environ.txt に出力され
るサンプルスクリプトを紹介します。

Sub main
   Dim str1(100)
   Dim msgtext
   Dim count, x
   Dim newline
   newline=Chr(10)
   x=1
   str1(x)= Environ(x)
   Do While Environ(x)<>""
      str1(x)= Environ(x)
      x=x+1
      str1(x)=Environ(x)
   Loop
   msgtext="The Environment Strings are:" & newline & newline
   count=x
   For x=1 to count
      msgtext=msgtext & str1(x) & newline
   Next x
   
   Open "c:\environ.txt" For Output As #1
   Print #1, msgText
   Close #1

End Sub


ご不明な点等ありましたら、ラショナルカスタマサービスへお問い合わせ下さい。