Command Line Parameters - übergabe von Variablen

;===============================================================================
; Function Name: _ParseParameterLine($CMDString)
; Description:: Parses a CMD-String to Parameters with Values
;
; Parameter(s): $CMDString -> String to parse
; Requirement(s): ?
;
; Return Value(s): Error: o and @error = StringRegExp-Error
; Success: 2 Dimensional Array:
; $array[$i][0] : Parameter includind value
; $array[$i][1] : Parameter
; $array[$i][2] : Value with quotation marks (only if value has quotaion marks)
; $array[$i][3] : Value without quotation marks
;
; Author(s): Prog@ndy
; Modified by Patric Pendelin
;
; Basis: http://regexlib.com/REDetails.aspx?regexp_id=1220
;===============================================================================
Func _ParseParameterLine($CMDString)
Local $y, $j, $i, $entry
Local $x = StringRegExp($CMDString, '(?:\s*)(?<=[-|/])(?<name>\w*)(?:(?:[:|=](?:("(?<value1>.*?)(?<!\\)")|(?<value>[\w\d|\.\-]*)))|\w*?)', 4)
If @error Then Return SetError(@error, 0, 0)
Local $ResultArray[UBound($x)][4]
For $i = 0 To UBound($x) - 1
$entry = $x[$i]
For $y = 0 To UBound($entry) - 1
$j = $y
If $y > 3 Then $j = 3
$ResultArray[$i][$j] = $entry[$y]
Next
Next
Return $ResultArray
EndFunc ;==>_ParseParameterLine

For $i = 0 To UBound($av_Parameter) - 1
Select
Case $av_Parameter[$i][1] = "name"
"mach etwas!"
Case $av_Parameter[$i][1] = "source"
"mach etwas!"
usw.
EndSelect
Next