Page 1 of 1 1
Topic Options
#77437 - 2001-04-03 09:09 AM Kix script exits unexpectacly
Anonymous
Unregistered


Hi all,

Environment: WinNT40 SP6a Dutch, Win98 client. Installed Kix2001 in the netlogon share and installed KXRPC delivered with the package..

Logon batch file:
__________________________________________________________________________________________
@Echo Off
CLS
%0\..\Kix32.exe %0\..\Logon.kix
Exit
__________________________________________________________________________________________


Logon Kix script:
__________________________________________________________________________________________
CLS
;
; Filename: logon.kix
; Dit bestand is het login script voor alle gebruikers
; op het Domein. Voor Win95 en WinNT
;
;
; Versie Datum: 02-04-2000
;
; Wijzigings Datum: 05-03-2000
; Wijzigings reden: Toevoegen van kleur, stroomlijnen en weghalen van
; overbodige variabelen,fout afhandeling bij connecten
; van HomeShare.
;
; Wijzigings Datum: 02-04-2000
; Wijzigings reden: extra functies van Kixtart 2001 Beta 1 verstie toevoegen.
;
;
SETTITLE("Kixtart 2001 V4.0 Beta 1 LogonScript")
;
;------ Extract Servernaam, mening get rid of the \\ ------
;
$Server = SUBSTR(@LSERVER,LEN(@LSERVER)-6,7)
;
;------ Detection of daytime ------
;
IF @TIME >= 18:00:00
$GROET = "Goedenavond"
GOTO ENDTIME
ENDIF
;
IF @TIME >= 12:00:00
$GROET = "Goedenmiddag"
GOTO ENDTIME
ENDIF
;
IF @TIME <= 12:00:00
$GROET = "Goedenmorgen"
GOTO ENDTIME
ENDIF
;
:ENDTIME
;
;------ End detection of daytime ------
;
CLS
SETTIME @LSERVER
?
? "De ingestelde tijd op "
COLOR Y+/N
$Server
COLOR W/N
" is "
@TIME
;
SLEEP 2
;
CLS
? "--------------------------------------------------------------"
?
? " Momentje geduld A.U.B."
? " U wordt nu op het Domein "
COLOR Y+/N
@DOMAIN
COLOR W/N
" aangekoppeld."
?
? " Uw Persoonlijke en Gemeenschappelijke"
? " directory's worden aangekoppeld."
?
? " -------------------------------------------------------------"
;
SLEEP 3
;
CLS
? "--------------------------------------------------------------"
?
? " " + $GROET + " "
COLOR C/N
@FULLNAME
COLOR W/N
"."
? " U bent aangemeld op "
COLOR Y+/N
$Server
COLOR W/N
" op het "
COLOR Y+/N
@DOMAIN
COLOR W/N
" Domein."
? " Uw gebruikersnaam is "
COLOR G/N
@USERID
COLOR W/N
"."
? " Indien bovenstaande gebruikersnaam niet klopt"
? " gelieve U kontakt op te nemen met de Helpdesk"
?
? "--------------------------------------------------------------"
;
SLEEP 3
;
; ------ Remove persistent connections ------
;
IF EXIST (@LDrive + "\Kixtart32\RemoveDisks.kix")
CALL @LDrive + "\Kixtart32\RemoveDisks.kix"
ELSE
Gosub MissingScript
ENDIF
;
; ------ End remove persistent connections ------
;
; ------ Connecting HomeShare with error handling ------
;
CLS
IF @HOMESHR = ""
CLS
? "--------------------------------------------------------------"
COLOR B+/N
?
? " U heeft géén Persoonlijke directory."
? " Als dit niet correct is neem dan contact op"
? " met de Systeem Beheerder."
?
COLOR W/N
? "--------------------------------------------------------------"
SLEEP 4
CLS
GOTO CONTINUE
ELSE
GOTO HOME
ENDIF
;
:HOME
CLS
USE P: @HOMESHR
IF @ERROR = 0
?
? " Uw persoonlijke directory wordt nu aangekoppeld ....."
GOTO CONTINUE
ELSE
? "--------------------------------------------------------------"
COLOR R+/N
?
? " Er is iets fout gegaan met het aankoppelen van"
? " Uw Persoonlijke directory."
? " Neem contact op met de Systeem Beheerder."
?
COLOR W/N
? "--------------------------------------------------------------"
SLEEP 4
CLS
GOTO CONTINUE
ENDIF
;
; ------ End connecting HomeShare with error handling ------
;
:CONTINUE
;
IF INGROUP("Domeingebruikers")
? " Uw gezamelijke directory wordt nu aangekoppeld ....."
USE G: "@LSERVER\Algemeen"
ENDIF
;
IF INGROUP("Domeinbeheerders")
? " De MP3 directory wordt nu aangekoppeld ....."
USE M: "@LSERVER\MP3"
ENDIF
?
USE LIST
SLEEP 4
CLS
? "------------------------------------------------------------"
?
? " Beste "
COLOR C/N
@FULLNAME
COLOR W/N
"."
IF @HOMESHR = ""
GOTO GMessage
ELSE
? " Onder Driveletter P: vindt U Uw persoonlijke en"
? " ALLEEN voor U toegankelijke netwerkdirectory."
ENDIF
;
:GMessage
? " Onder Driveletter G: vindt U de Data directories"
? " van Uw afdeling."
?
? "------------------------------------------------------------"
;
SLEEP 4
;
; ----- Empty %Temp% Directory ------
;
If Exist (@LDrive + "\Kixtart32\EmptyDir.kix")
$DirToEmpty = "%Temp%"
Call @LDrive + "\Kixtart32\EmptyDir.kix"
$DirToEmpty = ""
Else
Gosub MissingScript
Endif
;
; ------- End empty %Temp% Directory ------
;
; ------- Update Procedure ------
;
IF EXIST (@LDrive + "\Kixtart32\Update.kix")
CALL @LDrive + "\Kixtart32\Update.kix"
ELSE
Gosub MissingScript
ENDIF
;
Goto End
; ---------- End Update Procedure ----------
;
; ---------- Missing Script Message ----------
;
:MissingScript
;
Cls
$String1 = "Er is een fout opgetreden. Een onderdeel van"
$String2 = Chr(10) + "het Logon Script kon niet worden gevonden."
$String3 = Chr(10) + Chr(10) + " Bel de Helpdesk !!!!"
$Selection = MessageBox($String1 + $String2 + $String3, "Kixtart missing script",48)
If $Selection = 1
; OK selected, continuing....
Endif
Return
;
; ---------- End Missing Script Message ----------
;
; ---------- End Logon Script ----------
;
:End
EXIT
__________________________________________________________________________________________

Script is exiting at @FULLNAME. When changing Kix32 to Kix32c in Logon.bat everything works oké.

------------------
Jos.

--------- Happyness is a working Kix script. -------

[This message has been edited by Jos (edited 03 April 2001).]

Top
#77438 - 2001-04-05 08:02 PM Re: Kix script exits unexpectacly
MCA Offline
KiX Supporter
*****

Registered: 2000-04-28
Posts: 5152
Loc: Netherlands, EU
Dear,

We are looking at your code. We didn't really find a error, but
you were using an enormous amount of sleep commands and
a lot of GOTO statements.
To prevent unexpected information by undefined @fullname we intro-
duced the variable $fullname.

We have rewritten your code for ideas.

code:

CLS
;
; Filename: logon.kix
; Dit bestand is het login script voor alle gebruikers
; op het Domein. Voor Win95 en WinNT
;
;
; Versie Datum: 02-04-2000
;
; Wijzigings Datum: 05-03-2000
; Wijzigings reden: Toevoegen van kleur, stroomlijnen en weghalen van
; overbodige variabelen,fout afhandeling bij connecten
; van HomeShare.
;
; Wijzigings Datum: 02-04-2000
; Wijzigings reden: extra functies van Kixtart 2001 Beta 1 verstie toevoegen.
;
;
SetTitle("Kixtart 2001 "+@kix+" - LogonScript")
;
;------ Extract Servernaam, mening get rid of the \\ ------
;
$server = Substr(@lserver,Len(@lserver)-6,7)
;
;------ Detection of daytime ------
;
IF @time >= 18:00:00
$groet = "Goedenavond"
ELSE
IF @time >= 12:00:00
$groet = "Goedenmiddag"
ELSE ; - IF @time <= 12:00:00 -
$groet = "Goedenmorgen"
ENDIF
ENDIF
$user=@userid
IF (len(@fullname) = 0)
$fullname = $user
ELSE
$fullname = @fullname
ENDIF
;
;------ End detection of daytime ------
;
CLS
SETTIME @lserver
?
? "De ingestelde tijd op " COLOR y+/n $server COLOR w/n " is " @time
SLEEP 2
;
CLS
? "--------------------------------------------------------------"
?
? " Momentje geduld A.U.B."
? " U wordt nu op het Domein " COLOR y+/n @domain COLOR w/n " aangekoppeld."
?
? " Uw Persoonlijke en Gemeenschappelijke"
? " directory's worden aangekoppeld."
?
? " -------------------------------------------------------------"
SLEEP 2
;
CLS
? "--------------------------------------------------------------"
?
? " " + $groet + " " COLOR c/n $fullname COLOR w/n "."
? " U bent aangemeld op "
COLOR y+/n $server COLOR w/n " op het "
COLOR y+/n @domain COLOR w/n " Domein."
? " Uw gebruikersnaam is "
COLOR g/n @userid COLOR w/n "."
? " Indien bovenstaande gebruikersnaam niet klopt"
? " gelieve U kontakt op te nemen met de Helpdesk"
?
? "--------------------------------------------------------------"
SLEEP 3
;
; ------ Remove persistent connections ------
;
IF Exist (@ldrive + "\Kixtart32\RemoveDisks.kix")
CALL @ldrive + "\Kixtart32\RemoveDisks.kix"
ELSE
GOSUB missingscript
ENDIF
;
; ------ End remove persistent connections ------
; ------ Connecting HomeShare with error handling ------
;
CLS
IF @homeshr = ""
? "--------------------------------------------------------------"
COLOR b+/n
?
? " U heeft géén Persoonlijke directory."
? " Als dit niet correct is neem dan contact op"
? " met de Systeem Beheerder."
?
COLOR w/n
? "--------------------------------------------------------------"
SLEEP 3
ELSE
? " Uw persoonlijke directory wordt nu aangekoppeld ....."
USE p: @homeshr
IF @error <> 0
? "--------------------------------------------------------------"
COLOR r+/n
?
? " Er is iets fout gegaan met het aankoppelen van"
? " Uw Persoonlijke directory."
? " Systeemmelding is: "+@error+" ("+@serror+")"
? " Neem contact op met de Systeem Beheerder."
?
COLOR w/n
? "--------------------------------------------------------------"
SLEEP 3
ENDIF
ENDIF
;
; ------ End connecting HomeShare with error handling ------
;
CLS
IF (Ingroup("Domeingebruikers") <> 0)
? " Uw gezamelijke directory wordt nu aangekoppeld ....."
USE g: "@LSERVER\Algemeen"
ENDIF
IF (Ingroup("Domeinbeheerders") <> 0)
? " De MP3 directory wordt nu aangekoppeld ....."
USE m: "@LSERVER\MP3"
ENDIF
?
USE list
SLEEP 3
;
CLS
? "------------------------------------------------------------"
?
? " Beste " COLOR c/n $fullname COLOR w/n "."
IF @homeshr <> ""
? " Onder Driveletter P: vindt U Uw persoonlijke en"
? " ALLEEN voor U toegankelijke netwerkdirectory."
ENDIF
? " Onder Driveletter G: vindt U de Data directories"
? " van Uw afdeling."
?
? "------------------------------------------------------------"
SLEEP 3
;
; ----- Empty %Temp% Directory ------
;
IF Exist (@ldrive + "\Kixtart32\EmptyDir.kix")
$dirtoempty = "%Temp%"
CALL @ldrive + "\Kixtart32\EmptyDir.kix"
$dirtoempty = ""
ELSE
GOSUB missingscript
ENDIF
;
; ------- End empty %Temp% Directory ------
; ------- Update Procedure ------
;
IF Exist (@ldrive + "\Kixtart32\Update.kix")
CALL @ldrive + "\Kixtart32\Update.kix"
ELSE
GOSUB missingscript
ENDIF
GOTO end
EXIT
;
; ---------- End Update Procedure ----------
; ---------- Missing Script Message ----------
;
:missingscript
;
CLS
$string = "Er is een fout opgetreden. Een onderdeel van"
$string = $string + Chr(10) + "het Logon Script kon niet worden gevonden."
$string = $string + Chr(10) + Chr(10) + " Bel de Helpdesk !!!!"
$selection = MessageBox($string, "Kixtart missing script", 48)
RETURN
;
; ---------- End Missing Script Message ----------
; ---------- End Logon Script ----------
;
:end
EXIT

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

Top
#77439 - 2001-04-06 09:06 AM Re: Kix script exits unexpectacly
Anonymous
Unregistered


Oké MCA,

Gonna try this out this weekend.

------------------
Jos.

--------- Happyness is a working Kix script. ------- :D

Top
#77440 - 2001-04-09 08:51 AM Re: Kix script exits unexpectacly
Anonymous
Unregistered


Hi MCA,

Tested your version of the script this weekend. The result was the same as my script. Logon script exits at @FULLNAME. With 3.62 everything works oké.

------------------
Jos.

--------- Happyness is a working Kix script. ------- :D

Top
#77441 - 2001-04-14 06:56 PM Re: Kix script exits unexpectacly
pvds Offline
Hey THIS is FUN
*****

Registered: 2001-04-14
Posts: 201
I have had the same problem and it is in the script.bat file remove the exit command and everything is working well if your kixscript is good

GR Peter

Top
#77442 - 2001-04-14 08:51 PM Re: Kix script exits unexpectacly
Anonymous
Unregistered


code:

IF (Ingroup("Domeinbeheerders") <> 0)
? " De MP3 directory wordt nu aangekoppeld ....."
USE m: "@LSERVER\MP3"
ENDIF

Great!

------------------
Sander Winkel
http://www.sanderwinkel.com

[This message has been edited by awinkel (edited 14 April 2001).]

Top
#77443 - 2001-04-20 05:46 PM Re: Kix script exits unexpectacly
Anonymous
Unregistered


pvds,

Removing the exit command in the batch file didn't help. Still the same problem.


------------------
Jos.

--------- Happyness is a working Kix script. ------- :D

Top
#77444 - 2001-04-20 06:45 PM Re: Kix script exits unexpectacly
Anonymous
Unregistered


Have you tried this script on a Windows NT/2000 client? I have, and didn't encounter any problem.

Kind regards,

Ruud

Top
#77445 - 2001-04-23 10:26 AM Re: Kix script exits unexpectacly
Anonymous
Unregistered


Ruud,

I have only Win98 clients at home. I'll try to test it at my work this week where I have Win95 clients.

------------------
Jos.

--------- Happyness is a working Kix script. ------- :D

Top
#77446 - 2001-04-23 02:29 PM Re: Kix script exits unexpectacly
Anonymous
Unregistered


Oké, tested the script, mentioned in the 1st post, at work.

Environment NT4.0 Server SP5 Eng. Win95b client. What happened? Dosbox appears ( batch) and disapears. Dosbox (kix) appears and almost immidiatly an errorbox appears with the following error.

KIX32 heeft een fout met betrekking tot een ongeldige pagina veroorzaakt in module KIX32.EXE op0157:0041efa0
Registers:
EAX=005700a8 CS=0157 EIP=0041efa0 EFLGS=00010206
EBX=0066fe28 SS=015f ESP=00570080 EBP=0066fe38
ECX=c0000006 DS=015f ESI=00000000 FS=242f
EDX=bff766cl ES=015f EDI=004224e0 GS=0000
Bytes in CS:EIP:

Stackdump:
0041a150 c0000006 005700a8 0041f6f7 005700b0 00000000 0057 b0
00570180 81618d38 0066fe28 00570180 0057019c 005700d4 bff766b5
00570180 0066fe28

When Windows completed starting connecting the netlogon share to Z: start the logon script by hand it runs fine. Change de kix32 to kix32c and reboot the machine the logon works oké.

------------------
Jos.

--------- Happyness is a working Kix script. -------

[This message has been edited by Jos (edited 23 April 2001).]

Top
Page 1 of 1 1


Moderator:  ShaneEP, Arend_, Jochen, Radimus, Glenn Barnas, Allen, Ruud van Velsen, Mart 
Hop to:
Shout Box

Who's Online
1 registered (Allen) and 509 anonymous users online.
Newest Members
min_seow, Audio, Hoschi, Comet, rrosell
17881 Registered Users

Generated in 0.052 seconds in which 0.023 seconds were spent on a total of 12 queries. Zlib compression enabled.