Hallo
Problemstellung - ich habe 300 Scanner als Beispiel die als Namen SCAN001 - SCAN002 usw... heißen
Jedem Namen ist ein Ort zugeordnet wie im Beispiel 041 ist Kempten - 027 ist Badsalzuflen usw...
ich würde nun ungern für jeden der 300 Scanner eine eigene if Schleife anlegen.
Gibt es Vorschläge hier etwas zu verbessern ?
Das ist er Code bisher - er funktioniert auch soweit.
CodeTags gesetzt ~VaporiZed
*Topic verschoben (Admin)*
Problemstellung - ich habe 300 Scanner als Beispiel die als Namen SCAN001 - SCAN002 usw... heißen
Jedem Namen ist ein Ort zugeordnet wie im Beispiel 041 ist Kempten - 027 ist Badsalzuflen usw...
ich würde nun ungern für jeden der 300 Scanner eine eigene if Schleife anlegen.
Gibt es Vorschläge hier etwas zu verbessern ?
Das ist er Code bisher - er funktioniert auch soweit.
Visual Basic-Quellcode
- Set RegX = NEW RegExp
- RegX.Global = True
- Dim MyString, MySuffix, MySupport, RegX, ReplaceString, ReplacedText
- MyString = WScript.Arguments.Item(0)
- MySuffix = "@davd3041.dach041.d.com"
- MySupport = "support@d.com"
- RegX.Pattern = "SCAN..............."
- '----------------------------------------------------------------------
- If InStr(1,MyString, "SCAN041") Then
- ReplaceString = "kempten"
- ReplacedText = RegX.Replace(MyString, ReplaceString)
- WScript.Echo ReplacedText+MySuffix
- '----------------------------------------------------------------------
- ElseIf InStr(1,MyString, "SCAN027") Then
- ReplaceString = "badsalzuflen"
- ReplacedText = RegX.Replace(MyString, ReplaceString)
- WScript.Echo ReplacedText+MySuffix
- '----------------------------------------------------------------------
- Else WScript.Echo MySupport
- End If
CodeTags gesetzt ~VaporiZed
*Topic verschoben (Admin)*
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „Marcus Gräfe“ ()