Example

$SERVER=LOCALSERVER

IF INGROUP ("101") GOTO "101"
IF INGROUP ("202") GOTO "202"

:101
USE E: "\\SERVER\ESHARE"
USE F: "\\SERVER\FSHARE"
GOTO "GENERAL"

:202
USE E: "\\SERVER\ESHARE"
USE F: "\\SERVER\FSHARE"

;CHANGE UNINSTALL PATH FOR MCAFEE
$mcafee = Readvalue
"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{87AEFD84-BC0D-11D4-B885-00508B022A51}","InstallSource")
If $mcafee="\\\\SERVER1\\mcafee\\Win32\\"
Else
SHELL "$SERVER\REPOSITORY\MCAFEE\BATCH.BAT" $SERVER"

ENDIF

GOTO "GENERAL"

:GENERAL

Here is the explanation and question.
When running this I want the users from different loactions to only run their part of the script, but if a user from "101" logs on, it runs the script and fails. It says tha it can´t find :LABEL, it means that it can´t jump to :GENERAL, which it doesn´t do.
I´ve found out that it fails because there is a (") too much in the line
SHELL "$SERVER\REPOSITORY\MCAFEE\BATCH.BAT" $SERVER"

This is true there shouldn´t have been one after BATCH.BAT. So the functioning line looks like this
SHELL "$SERVER\REPOSITORY\MCAFEE\BATCH.BAT $SERVER"

But why do the 101 users encounter this error since they never run the 202 section, where the line is???

Does kix read code that it is supposed to ignore???

I´ve tried for fun to introduce an error that fails.

GOTO "HI"
shell "c:\winnt\test.bat" localserver"
:HI

It never gets to :HI but fails and says that it can´t find :LABEL!!!!

Regards
Michael Hovej
Systemsconsultant

First, KiXtart needs to read through the entire script to parse it - until it does it won't know where to find the label that you want to jump to

Note, it is not executing the script at this stage, just reading it in and parsing it into a form that it can run it in later.

The second thing is the extra quote (") character. The problem with this tricky devil is that KiXtart does not treat an end of line as anything special. For instance:

code:

---

$sString="This is a multi-line
string that has carriage returns
embedded in it"

---

code:

---

Function udfDemoFunction(
      $iParameter1,
      $iParameter2,
      Optional $sParameter3)
...

---

What happens in your case is that after the extra " character eveything you think is enclosed in quotes isn't, and everything that you think isn't, is. Got that?

Ok, in the following simple example the text in italics is considered to be within quotes. The text in bold is considered to be script code.

Break on CLS
"Display Some Text"" ?
$sVariable="Assign Text"
if @USERID="rhowarth"
"Hi Rich" ?
EndIf

As you can see, KiXtart will try to execute "Assign Text", "rhowarth" and "Hi Rich" as script commands and will error.

[ 05 March 2002: Message edited by: Richard Howarth ]

Welcome to the board. I'll help if I can... you appear to be missing two Endif's. I would suggest that rather than avoid getting too bogged down in GOTO's you do something like this at the beginning of the script:

code:

---

$Server = LOCALSERVER
If Ingroup("101")
   Use e: "\\server\eshare"
   Use f: "\\server\fshare"
Endif
If Ingroup("202")
   Use e: "\\server\eshare"
   Use f: "\\server\fshare"
Endif
;Change McAfee uninstall path
...
;Rest of script continues, no real need for a label
...  

---

To answer your question, the 101 group users will run everything between the IF condition checking their membership of this group and the Endif statement just before your :GENERAL label.

The example I've given you shows how to structure the code so that the bits you want to run are caught inside your IF statement, which has to be closed properly with an ENDIF.

HTH

• missing ENDIFs
• missing "right parenthesis" in ReadValue
• incomplete "double quotation"
  

code:

---

 $server=LOCALSERVER

 IF INGROUP ("101") 
       GOTO "101"
       IF INGROUP ("202") 
             GOTO "202"

:101
             USE E: "\\SERVER\ESHARE"
             USE F: "\\SERVER\FSHARE"
             GOTO "GENERAL"

:202
             USE E: "\\SERVER\ESHARE"
             USE F: "\\SERVER\FSHARE"

             ;CHANGE UNINSTALL PATH FOR MCAFEE
             $mcafee = Readvalue
             "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{87AEFD84-BC0D-11D4-B885-00508B022A51}","InstallSource")
; -------> Warning KIXSTRIP: 17 line incomplete "right parenthesis".
; -------> Warning KIXSTRIP: 17 line incompleted.
             IF $mcafee="\\\\SERVER1\\mcafee\\Win32\\"
             ELSE
                   SHELL "$SERVER\REPOSITORY\MCAFEE\BATCH.BAT" $server"
; -------> Warning KIXSTRIP: 20 line incomplete "double quotation".
; -------> Warning KIXSTRIP: 20 line incompleted.

             ENDIF

             GOTO "GENERAL"


:general


;($begin)
;
;                       mon 11-mar-2002 04:11:52       (kix 4.00 vs 3.01e)
;
;Informative KIXSTRIP:      input=28 output=28 skip=0
;
;Warning     KIXSTRIP:    2 errors in block structure(s). missing statement(s).
;                           - do:until                 [0:0]
;                           - for|each:in|to:step|next [0|0:0|0:0|0]
;                           - function:endfunction     [0:0]
;                   -ERROR- - if:else:endif            [3:1:1]
;                           - select:case:endselect    [0:0:0]
;                           - while:loop               [0:0]
;Warning     KIXSTRIP:    2 lines are incompleted.
;Warning     KIXSTRIP: some lines contains errors or possible errors.
;                         1 line incomplete "double quotation".
;                         1 line incomplete "right parenthesis".
;                         2 line incompleted.
;Informative KIXSTRIP:    3 block_structures found.
;Informative KIXSTRIP:   no UDF's found.
;Informative KIXSTRIP:    3 labels found.
;Summary     KIXSTRIP:      BREAK CALL DEBUG DISPLAY ENDFUNCTION EXECUTE EXIT FUNCTION GET GETS GOSUB GOTO OLExxx PLAY QUIT RETURN RUN SHELL SLEEP THEN USE
;Informative KIXSTRIP:    4 GOTO
;Informative KIXSTRIP:    1 SHELL
;Informative KIXSTRIP:    4 USE
;
;($end)
;($begin)
;
;Warning KIXSTRIP: 20 line incomplete "double quotation".
;Warning KIXSTRIP: 17 line incomplete "right parenthesis".
;Warning KIXSTRIP: 17, 20 line incompleted.
;
;($end)

---

code:

---

 GOTO end_of_script
 ;
 ; - your script-
 ;
:end_of_script
 ? "Informative KIX: end of script reached"

---

for verifying also possible problems with your script.
greetings.

btw: symbol on our homepage has been linked to related http://kixtart.org topic.