My argument func isn't working anymore?

[daslick]

This is set up at the beginning of my program to find arguments....

dim $args = "", $howrun = ""
;Command line useage!
if $CmdLine[0] > 0 Then
            for $i = 1 to $CmdLine[0]
                Global $args = $args & " " & $CmdLine[$i]
            Next
    Select
        Case $args = "password"
            MsgBox(0,"","a")
        Case $args = "admin"
            ProcessClose("explorer.exe")
            Run("explorer.exe")
        Case $args = ""
        Case Else
            
    if $args = "password" then MsgBox(0,"A","FSA")
    if $args <> "password" then MsgBox(0,"ASDDAADADAADADAD",$args)
            $args = FileGetLongName($args, 1)
            _ra($args)
            Exit
    EndSelect
EndIf

Every time I run it with the arguments 'password' it doesn't msgbox(0,"","a") like it should, but it does MsgBox(0,"ASDDAADADAADADAD",$args) and tells me that $args = "password"... I don't get it. so $args = password but it doesn't?

Could some1 help me with this sloppy and, apparently, broken function?

[BALA]

How can $arg <> "password" , wouldn't that mean $arg less than or greater than "password"?

Perhaps your'e looking for

If NOT $arg = "password" then ;whatever

(Sorry if I have that wrong)

Edited January 15, 2007 by BALA

[daslick]

that should do the same thing...

regardless, "case $args = "password" is not working even though $args = "password"

Can some1 please helP? I've rewritten this like 5 times

[xcal]

How can $arg <> "password" , wouldn't that mean $arg less than or greater than "password"?

You might want to look up operators in the help file.

[BALA]

You might want to look up operators in the help file.

Yeah, my previous BASIC experience messed me up.

Edited January 15, 2007 by BALA

[Jos]

don't you want something like this ?

Your for-next loop really build the content of $CommandLineRaw

Dim $args = "", $howrun = ""
;Command line useage!
For $i = 1 To $CmdLine[0]
    $args = $CmdLine[$i]
    Select
        Case $args = "password"
            MsgBox(0, "", "a")
        Case $args = "admin"
            ProcessClose("explorer.exe")
            Run("explorer.exe")
        Case $args = ""
        Case Else
            If $args = "password" Then MsgBox(0, "A", "FSA")
            If $args <> "password" Then MsgBox(0, "ASDDAADADAADADAD", $args)
            $args = FileGetLongName($args, 1)
            _ra ($args)
            Exit
    EndSelect
Next

[Jos]

Yeah, my previous BASIC experience messed me up.

nah ... basic always had the NotEqual <> for as long as I can remember ... and I am pretty sure I am older

[BALA]

nah ... basic always had the NotEqual <> for as long as I can remember ... and I am pretty sure I am older

In DarkBASIC and NT Batch Scripting for example it means less than or greater than, but since those are the only other BASIC-ish languages I know, I guess you're probably right. Well now I know, thanks.

[daslick]

Thanks a lot Jbd... I don't quite understand what I did wrong... I do like how u got the arguments though.