Replace certain characters from clipboard

[routama]

Hello,

1. In my script I use copy to clipboard -> Send("^c"). I use $name = ClipGet().

-> this string might contain one bad character or several (spaces, /, \, :, >, <, etc.)

2. and then I need to use this $name in a file name (e.g. Excel)

3. For one bad character there is no problem:

If StringIsAlNum($name) = 0 Then

If StringInStr($name, "/") = 0 Then

Sleep(100)

Else

Send("c:\temp\" & StringReplace($name, "/", "_"))

4. BUT when I have a clipboard copy with sevaral bad characters, I do not know how to proceed?

I could use some help.

I am a total amateur, so please be simple!

Thanks all!

[water]

To get a valid filename by replacing all invalid characters with an "_" I use the following code:

; Replace invalid characters from filename with underscore
$sOL_FName = StringRegExpReplace($sOL_FName, '[ /:*?"<>|]', '_')

To completely remove all invalid characters replace "_" with "". Edited May 26, 2012 by water

[hannes08]

You can use StringReplace() to replace a single character.

Edit:

Well, too late

Edited May 25, 2012 by hannes08

[routama]

Thank you so far!

This is an example script I have:

-> it open notepad, and copies the text (file name) from there. It contains sevaral bad characters. Then it opens Excel, and tries to save it to c:\temp\ as "copied file name".

What is wrong with this?

MouseClick("Left", 937, 440, 2)

Sleep(1000)

Send("^a")

Sleep(1000)

Send("^c")

Sleep(1000)

$name = ClipGet()

MouseClick("Left", 937, 530, 2)

Sleep(2000)

Send("^s")

Sleep(1000)

If StringIsAlNum($name) = 0 Then

$sOL_FName = StringRegExpReplace($sOL_FName, '[ \/:*?"<>|]', '_MOD_')

Else

Send("c:\temp\" & $name)

EndIf

Sleep(3000)

Send ("{ENTER}")

Sleep(3000)

[water]

I wouldn't automate Excel using Send commands. Use the Excel UDF that comes with AutoIt and pass the filename to function _ExcelBookSaveAs.

[routama]

I need to do it like described originally.

This previous instruction sounds perfect, but I do not know how to use it.

; Replace invalid characters from filename with underscore

$sOL_FName = StringRegExpReplace($sOL_FName, '[ /:*?"<>|]', '_')