I am giveing my first shot at useing UDFs, and am haveing a problem. I am trying to replace all occurances of ( in a sendkeys with {(}. This script is not working though. Can someone give me some pointers as to where my problem is?
I tried it with the UDF below my code first. It did not work that way. Next I tried it as shown. It did nto work this way either. After that I was stumped 
Code:
Function Replace($SourceString, $SearchString, $ReplaceString, Optional $First, Optional $CaseSensitive)
Dim $String1
Dim $String2
Dim $Finished $Finished = 0
$Counter = 0
$String1 = $SourceString
If $CaseSensitive
$PreviousState = SetOption("CaseSensitivity", "On")
EndIf
While Not $Finished
$String2 = $String1
$Location = InStr($String1, $SearchString)
If $Location > 0
$String1 = Substr($String1, 1, $Location - 1) + $ReplaceString + Substr($String1, $Location + Len($SearchString), Len($SourceString) - $Location + Len($SearchString) + 1)
Else
$Finished = 1
EndIf
If $First
$Finished = 1
EndIf
If $String1 = $String2
$Finished = 1
EndIf
Loop
$Replace = $String1
$Nul = SetOption("CaseSensitivity", $PreviousState)
EndFunction
Sleep(2)
$string = "test()this()"
$string = Replace($string,"(","{(}")
$string = Replace($string,")","{)}")
SendKeys($String)
). I think I was getting an infinate loop due to my problem.
