0

抽象化 (パラメータ化) のレベルが十分に高い QTP でテスト スイートのテンプレートを作成しました。

ここで、既存のパターンから新しいテスト スイートを生成する必要があるため、さまざまなファイル内の特定のエントリを別のエントリに置き換えます。

たとえば、スクリプト スイート パターンに意図的に入れた単語の 1 つは [Template] です。そのため、テンプレートを別の名前でコピー アンド ペーストし、[Template] のすべてのエントリを新しい文字列に変更する必要があります。

私のVBScriptスキルは最適ではないので、どんなコードでも大歓迎です;）

前もって感謝します！

4

1 に答える 1

1

次のデモ スクリプトを使用します。

Option Explicit

Dim gMap : Set gMap = Createobject("Scripting.Dictionary")

Function replGMap(sM, nPos, sSrc)
  replGMap = gMap(sM)
End Function

Dim reMap : Set reMap = New RegExp
reMap.Global = True
reMap.Pattern = "\[\w+\]"

gMap("[A]") = "abra"
gMap("[B]") = "cadabra"

WScript.Echo reMap.Replace("1[A]2[A]3[B]4[A]5", GetRef("replGMap"))

出力：

abra2abra3cadabra4abra5

VBScript ドキュメントで検索するキーワードのリストとして。.Replace での関数の使用については、こちらを参照してください。

FileSystemObject は、ファイルを読み書きする手段 (Open/CreateTextFile、ReadAll、Write) を提供します。

于 2013-02-14T17:19:57.980 に答える