[Solved]_stringregexp

[goldenix]

Lets say I have a random string $string = '＼（⑨）／にゃ～★'

I want to create a folder with string name, but Windows wont let me. there can be tons of Japanese symbols. So if the string contains non alphabet letter or allowed sign, then rename it with x. Simply puut I want to remove bad characters from the string.

How can I do this?

EDIT: I think this will work, but im not sure. Is there any way to return all chars as 1 string without looping through every single char?

$allowed_letters_and_symbols = 'QWERTYUIOPASDFGHJKLMNBVCXZqwertyuiopasdfghjklzxcvbnm 1234567890,.+-;"!{}·%~??#$@&*( >_< )'

    $string = '＼（⑨）／にゃ～★'
    
    If Not StringInStr($string,   $allowed_letters_and_symbols   ) Then
        $string = StringReplace($string,'x')
    EndIf
    
    ConsoleWrite($string & @CRLF)

Edited June 3, 2009 by goldenix

[Authenticity]

Global $sStr = 'gl0><b@l-+=||.t<x<*?"t'
Global $sPatt = '[\Q\/ :* ?"<>|\E]|([\w\s])'

$sStr = StringRegExpReplace($sStr, $sPatt, '\1')
ConsoleWrite($sStr & @LF)

[oMBRa]

try this:

StringRegExpReplace($String, '[^' & $allowed_letters_and_symbols & ']', 'x')

[goldenix]

try this:

StringRegExpReplace($String, '[^' & $allowed_letters_and_symbols & ']', 'x')

this seems to work, thanx.

$string = '＼★Taaahhtr789613/*+'

$allowed_letters_and_symbols = 'QWERTYUIOPASDFGHJKLMNBVCXZqwertyuiopasdfghjklzxcvbnm 1234567890,.+-;"!{}·%~??#$@&*( >_< )'

$string = StringRegExpReplace($String, '[^' & $allowed_letters_and_symbols & ']', 'x')

ConsoleWrite($string & @CRLF)

Exit

[MrCreatoR]

Look also at _FileGetValidName() UDF.