AutoIt
MsgBox(0, "", _ClearString("a!b'c§d$e%f&g/h(i)j=k?l`m´n'o#p+q*r-s.t,u;v:w_x~y`[z}"))
Func _ClearString($strWert)
Local $strChars = "-.,:;#+ß'*?=)(/&%$§!~\}][{`´_" & '"'
For $i = 1 To StringLen($strChars)
$strWert = StringReplace($strWert, StringMid($strChars, $i, 1), "")
Next
Return $strWert
EndFunc ;==>_ClearString
Alles anzeigen
Selbsterklärend?
Gruß,
x0r