Can variables be used in conjunction with macros?

[CGRemakes 0]

I was wondering if it's possible to use variables to access the macros found on this list:

http://www.autoitscript.com/autoit3/docs/macros.htm

For example (I know it doesn't work like this):

$variableName = "@AppDataDir"
MsgBox(0, "Macro", $variableName)

And have it display the info as if you entered just @AppDataDir? I've tried it using Eval(), and it doesn't seem to work either. The reason is, the macro I'm trying to access is not going to be known beforehand. I'm going to be importing info from a text file, so that way people can declare variables in the text file, and I can substitute the real value at execution time. Yes, I could go in and convert all possible macros to variables (meaning something like assigning $appDataDir = @AppDataDir), but that's a fair amount of work. Is there an easier way?

[water 2,409]

I think you mix up two things:

• Macros are a special kind of variables which are set by AutoIt at run time
• Values which are to be set by the user (usually values that "configure" your application) are stored in ini files ore the registry

Do you have an example what you try to achieve? Edited November 12, 2010 by water

[bogQ 91]

MsgBox(0,"",Execute("@AppDataDir"))

[water 2,409]

But Execute("@AppDataDir") = @AppDataDir

I think first the OP has do describe what he wants to achieve.

[bogQ 91]

well he did explained

He will allow user to put name in text format like ini file and he will try to call that macro from autoit, but he don't want to use -if-then-else, so that he dont need to add all of expressions

[CGRemakes 0]

MsgBox(0,"",Execute("@AppDataDir"))

That works wonderfully! That will be much easier than manually creating variables for each macro.

[CGRemakes 0]

Ok, I'm running into a small problem, and I'm not sure why. The following is the script I'm using:

$var = IniReadSection("C:\Temp\backup_list.ini", @OSVersion)

If @error Then 
    MsgBox(4096, "", "Error occurred, probably no INI file.")
    
Else
    For $i = 1 To $var[0][0]

        $s = StringRegExp($var[$i][1], "%(.+)%", 1)
        $v = Execute("@" & $s[0])

        ConsoleWrite(StringRegExpReplace($var[$i][1], "%.+%", $v) & @CR)
    Next
EndIf

Here is the contents of the .ini file I'm importing (I'm on XP, so it jumps to the WIN_XP section):

[WIN_XP]

file=%ProgramFilesDir%\IBM\Lotus\Notes\Data\workspace\.metadata\.plugins\com.ibm.collaboration.realtime.community.sametime/community-config.xml
file=%ProgramFilesDir%\IBM\Lotus\Notes\Data\mail\*.nsf
file=%ProgramFilesDir%\IBM\Lotus\Notes\Data\*.id
file=%ProgramFilesDir%\IBM\Lotus\Notes\Data\bookmarks.nsf
file=%ProgramFilesDir%\IBM\Lotus\Notes\notes.ini

[WIN_7]

file=C:\Users\user\Documents
file=C:\Users\user\Pictures

For some reason, it's stripping out the "\" after C:. Here's the output I'm getting:

C:Program Files\IBM\Lotus\Notes\Data\workspace\.metadata\.plugins\com.ibm.collaboration.realtime.community.sametime/community-config.xml
C:Program Files\IBM\Lotus\Notes\Data\mail\*.nsf
C:Program Files\IBM\Lotus\Notes\Data\*.id
C:Program Files\IBM\Lotus\Notes\Data\bookmarks.nsf
C:Program Files\IBM\Lotus\Notes\notes.ini

EDIT: Nevermind, I'm sure it's because it's interpretting that as an escape character. I just need to escape the slash.

Edited November 12, 2010 by CGRemakes

[bogQ 91]

#include <String.au3>
#include <Array.au3>

$var = IniReadSection("backup_list.ini", @OSVersion)

If @error Then 
    MsgBox(4096, "", "Error occurred, probably no INI file.")
    
Else
    For $i = 1 To $var[0][0]
        $s = _StringBetween($var[$i][1], '%', '%')
        $c = StringSplit($var[$i][1],"%")
        ConsoleWrite(Execute("@" & $s[0])&$c[3]&@CR)
    Next
EndIf

Does this help?

[CGRemakes 0]

#include <String.au3>
#include <Array.au3>

$var = IniReadSection("backup_list.ini", @OSVersion)

If @error Then 
    MsgBox(4096, "", "Error occurred, probably no INI file.")
    
Else
    For $i = 1 To $var[0][0]
        $s = _StringBetween($var[$i][1], '%', '%')
        $c = StringSplit($var[$i][1],"%")
        ConsoleWrite(Execute("@" & $s[0])&$c[3]&@CR)
    Next
EndIf

Does this help?

Which would be more efficient? I know regexp functions are often very slow, so your's may be faster. I got it to work by just escaping any "\" using StringReplace on $v.

$var = IniReadSection("C:\Temp\backup_list.ini", @OSVersion)

If @error Then 
    MsgBox(4096, "", "Error occurred, probably no INI file.")
    
Else
    For $i = 1 To $var[0][0]

        $s = StringRegExp($var[$i][1], "%(.+)%", 1)
        $v = StringReplace(Execute("@" & $s[0]), "\", "\\")

        ConsoleWrite(StringRegExpReplace($var[$i][1], "%.+%", $v) & @CR)
    Next
EndIf

I'm not totally sure why it's required. Does Autoit support pattern matching on the replace string?

[bogQ 91]

Dont know whats faster but you can test it with TimerDiff,

btw you can use

For $i = 1 To $var[0][0]
        $c = StringSplit($var[$i][1],"%")
        ConsoleWrite(Execute("@" & $c[2])&$c[3]&@CR)
    Next

_StringBetween was there only for you to have more possibilities

[CGRemakes 0]

Thank you all for the speedy help. Here is what I came up with:

$var = IniReadSection("C:\Temp\backup_list.ini", @OSVersion)

If @error Then 
    MsgBox(4096, "", "Error occurred, probably no INI file.")
    
Else
    For $i = 1 To $var[0][0]

        $s = StringRegExp($var[$i][1], "%(\w+)%", 3)
        
        For $x = 0 To UBound($s) - 1
            
            $v = Execute("@" & $s[$x])

            $var[$i][1] = StringReplace($var[$i][1], "%" & $s[$x] & "%", $v)
        Next
        
        ConsoleWrite($var[$i][1] & @CR)
    Next
EndIf

I did it that way to allow multiple variables per line at any position. It seems to work very well, and eliminates the second regexp replace that was causing problems and adding pointless overhead.