I am in the process of automating the format of my scripts.
GETVAR is available from - http://internet.cybermesa.com/~bstewart/
Code:
IF EXIST "%TEMP%\%USERNAME%.BAT" DEL "%TEMP%\%USERNAME%.BAT"
GETVAR.EXE -v FN -f %TEMP%\%USERNAME%.BAT "Enter the Kixscript minus the extension:"
::@echo on
CALL "%TEMP%\%USERNAME%.BAT"
set zInput=%FN%
kixstrip420.exe \\DC\NETLOGON\NEWSCRIPT\%zInput%.kix %zInput%.out /BC /Headers /Print /SE /SS /TAB=3 /Translate
MOVE C:\!kix\%zInput%.out \\DC\NETLOGON\NEWSCRIPT\%zInput%.kix
COPY \\DC\NETLOGON\NEWSCRIPT\%zInput%.kix \\<SECOND DOMAIN>\NETLOGON\NEWSCRIPT
::kixstrip420.exe %zInput%.kix %zInput%.out /BC /Headers /Print /SE /SS /TAB=3 /Translate
::kixstrip420.exe %zInput%.kix %zInput%.out /Debug
Echo we are done!!
pause
IF EXIST "%TEMP%\%USERNAME%.BAT" DEL "%TEMP%\%USERNAME%.BAT"
The problem is that this works great with the following exception in the resulting script:
Code:
;($begin)
;
; wed 02-mar-2005 08:19:20 (kix 4.20 vs 4.00e)
;
;Informative KIXSTRIP: no errors found (input=179 output=158 skip=21).
;
;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 [12:6:12]
; - select:case:endselect [0:0:0]
; - while:loop [0:0]
;Informative KIXSTRIP: 12 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: 1 BREAK
;Informative KIXSTRIP: 13 CALL
;
;($end)
Is there any way to turn this off optionally?
Thanks,
Kent
