Dear,

Another way of checking your script can be done by our tool kixstrip,
which you can find on our site.
Currently there are three versions
  • kixstrip363.exe (= kixtart 3.63)
  • kixstrip400.exe (= kixtart 4.00, 4.01, 4.02)
  • kixstrip410.exe (= kixtart 4.10 beta 1)
The output of our call kixstrip410 input.kix output.kix /block_check /show_structurewas:
code:
 ;Casio Logon script for Printers and Shared Network drives

? 'Kixtart Login Script'
? 'Username : ' + @userid
? 'Computer : ' + @wksta

SETTIME "\\essbase_1"

IF @userid = 'wrights'
USE t: "\\fileserver\net_share"
USE i: "\\qs4433778\qdls" /user:gscott /password:gscott
USE s: "\\essbase_1\loaddata"
AddPrinterConnection ("\\hrtc\claser1")
AddPrinterConnection ("\\hrtc\claser2")
AddPrinterConnection ("\\hrtc\teklaser")
SetDefaultPrinter ("\\hrtc\claser1")
ENDIF

IF @userid = 'lloydc'
USE t: "\\fileserver\net_share"
AddPrinterConnection ("\\hrtc\ecrclaser")
AddPrinterConnection ("\\hrtc\ecrlex")
SetDefaultPrinter ("\\hrtc\ecrlex")
ENDIF

IF @userid = 'fletchers'
USE t: "\\fileserver\net_share"
AddPrinterConnection ("\\hrtc\mtdlaser2")
AddPrinterConnection ("\\hrtc\teklaser")
SetDefaultPrinter ("\\hrtc\mtdlaser2")
ENDIF

IF @userid = 'gursoy'
USE t: "\\fileserver\net_share"
USE i: "\\qs4433778\qdls" /user:ipek /password:mehmet
USE l: "\\mailfax\viking"
USE s: "\\essbase_1\loaddata"
USE u: "\\moes\mobilelinkweb"
USE v: "\\eplanserver\eplan"
AddPrinterConnection ("\\hrtc\claser3")
SetDefaultPrinter ("\\hrtc\claser3")
ENDIF

IF @userid = 'jaymie"
USE t: "\\fileserver\net_share"
USE i: "\\qs4433778\qdls" /user:casio /password:casio
USE s: "\\essbase_1\loaddata"
AddPrinterConnection ("\\hrtc\claser1")
AddPrinterConnection ("\\hrtc\claser2")
AddPrinterConnection ("\\hrtc\teklaser")
SetDefaultPrinter ("\\hrtc\claser1")
ENDIF

IF @userid = 'becklesw'
USE t: "\\fileserver\net_share"
USE i: "\\qs4433778\qdls" /user:gscott /password:gscott
USE s: "\\essbase_1\loaddata"
USE v: "\\eplanserver\eplan"
AddPrinterConnection ("\\hrtc\claser1")
AddPrinterConnection ("\\hrtc\claser2")
AddPrinterConnection ("\\hrtc\teklaser")
SetDefaultPrinter ("\\hrtc\claser1")
ENDIF

;($begin)
;
; fri 19-apr-2002 04:03:25 (kix 4.10 vs 3.04e)
;
;Summary KIXSTRIP: block structures
; - do:until [0:0]
; - for|each:in|to:step|next [0|0:0|0:0|0]
; - function:endfunction [0:0]
; - if:else:endif [6:0:6]
; - select:case:endselect [0:0:0]
; - while:loop [0:0]
;Warning KIXSTRIP: 1 line is incompleted.
; rerun program with option "/block_check /show_errors".
;Warning KIXSTRIP: some lines contains errors or possible errors.
; 1 line incomplete "single quotation".
; 1 line incompleted.
;Informative KIXSTRIP: 6 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
;Informative KIXSTRIP: 18 USE
;
;($end)
;($begin)
;
;Warning KIXSTRIP: 44 line incomplete "single quotation".
;Warning KIXSTRIP: 44 line incompleted.
;
;($end)

greetings.
_________________________
email scripting@wanadoo.nl homepage scripting@wanadoo.nl | Links | Summary of Site Site KiXforms FAQ kixtart.org library collection mirror MCA | FAQ & UDF help file UDF kixtart.org library collection mirror MCA | mirror USA | mirror europe UDF scriptlogic library collection UDFs | mirror MCA