Dear,
We run our program kixstrip which you can find on our site and
which shows indeed you are missing two ENDIF statements:
The result of our call: kistrip input.kix output.kix /block_check /show_errors
shows
Code:
$username=Dir ($nodepath)
WHILE $username <> "" AND @error = 0
?$username
IF NOT InStr ($username,".")
decrypt()
SELECT
CASE
$cbousersort.text = "Name"
$fullname=ReadProfileString ($nodepath+$username,"Primary","Fullname")
IF InStr($fullname,$txtfind.text)
$item=$listusers.items.add
$item.subitems(0).text = ($transuserid)
$item.subitems(1).text = ($fullname)
CASE
$cbousersort.text = "User ID#"
IF InStr($transuserid,$txtfind.text)
?"Find User ID ="$Find
$item=$listusers.items.add
$item.subitems(0).text = ($transuserid)
$item.subitems(1).text = ReadProfileString ($nodepath+$username,"Primary","Fullname")
ENDSELECT
ENDIF
$username = Dir("")
LOOP
;($begin)
;
; kixstrip 4.03e - kixtart 4.22
;
; wed 15-dec-2004 12:58:15
;
;Informative KIXSTRIP: input=23 output=23 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:0:1]
; - select:case:endselect [1:2:1]
; - while:loop [1:1]
;Warning KIXSTRIP: some lines contains errors or possible errors.
;Informative KIXSTRIP: 5 block_structures found.
;Informative KIXSTRIP: no UDF's found.
;Informative KIXSTRIP: no 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
;
;($end)
;($begin)
;
;
;($end)
greetings.