| Aaron Perrault |
| (Fresh Scripter) |
| 2005-11-22 08:26 PM |
Help with Logon Script
|
Hi everyone,
OK, I am having some problems with my login script. javascript:void(0)
I am in the process of re-writing a batch file that my predecessor made, that I frankly just dont like. I have used the If InGroup call before, but now I am getting an error. It says:
ERROR: Unknown Command [GRP]!
Script: corp.evault.com\netlogon\kixtart.kix
Line: 42
and then the script quits. What am i missing here.
thanks much
aaron
Here is my script:
;*************************************************************************
; Script Name: Logon.bat
; Author: Aaron Perrault
; Date: 11/16/2005
; Description: Logon Script for EVault Corp.
;*************************************************************************
small
Color b+/n
BOX (0,0,24,90,GRID) ; 'background grid'
Color b/n
BOX (8,21,18,71,Å) ; 'shadow' of the box
Color g+/n
Box (7,20,17,70,FULL)
Color w+/n
AT ( 9,25) "Userid : " ; display some text strings
AT (10,25) "Full name : "
AT (11,25) "Privilege : "
AT (12,25) "Workstation : "
AT (13,25) "Domain : "
AT (14,25) "Logon Server : "
AT (15,25) "Operating System : "
Color y+/n
AT ( 9,45) @userid ; ...and some macro's
AT (10,45) @fullname
AT (11,45) @priv
AT (12,45) @wksta
AT (13,45) @domain
AT (14,45) @lserver
AT (15,45) @ProductType
;Drive Mapping Section:
Use J: "\\ev-fps\public"
If (InGroup ("GRP-Accounting-Main") or InGroup ("Grp-Finance") or InGroup ("Domain Admins"))
Use g: "\\ev-fps\accounting$
EndIf
If (InGroup ("GRP-Alliance") or InGroup ("alliance") or InGroup ("Domain Admins"));________________THIS IS LINE 42.
Use H: "\\ef-fps\alliance$
EndIf
If (InGroup ("GRP-Business Development") or InGroup ("Domain Admins"))
Use K: "\\ev-fps\busdev$"
EndIf
If (InGroup ("GRP-Contract") or InGroup ("GRP-Contracts-Read Only") or InGroup ("Domain Admins"))
Use L: "\\ev-fps\contracts$"
EndIf
If (InGroup ("GRP-Marketing") or InGroup ("GRP-Marketing Bus Dev") or InGroup ("Marketing") or InGroup ("Domain Admins"))
Use M: "\\ev-fps\marketing$"
EndIf
If (InGroup ("GRP-ExecAdmin") or InGroup ("GRP-General Exec Administration") or InGroup ("Domain Admins"))
Use N: "\\ev-fps\ExecAdmin$"
EndIf
If (InGroup ("GRP-Operations") or InGroup ("Domain Admins"))
Use O: "\\ev-fps\Operations$"
EndIf
If (InGroup ("GRP-License") or InGroup ("GRP-General Exec Administration") or InGroup ("Domain Admins"))
Use W: "\\ev-fanda\license$"
EndIf
If (InGroup ("GRP-Human Resources") or InGroup ("GRP-Human Resources-Read Only") or InGroup ("Domain Admins"))
Use Q: "\\ev-fps\hr$"
EndIf
If (InGroup ("GRP-Europe") or InGroup ("Domain Admins"))
Use R: "\\ev-fps\europe$"
EndIf
If (InGroup ("GRP-PreSales") or InGroup ("GRP-Direct Sales") or InGroup ("GRP-Sales") or InGroup ("GRP-Teleprospecting") or InGroup ("GRP-Teleprospecting Restricted") or InGroup ("sbe.sales") or InGroup ("sbe-support") or InGroup ("Domain Admins"))
Use s: "\\ev-fps\Sales$"
EndIf
If (InGroup ("GRP-Product Development") or InGroup ("Domain Admins"))
Use T: "\\ev-fps\ProdDev$"
EndIf
If (InGroup ("GRP-Emeryville Engineering") or InGroup ("Domain Admins"))
Use U: "\\ev-fps\EE$"
EndIf
If (InGroup ("GRP-Commissions") or InGroup ("Domain Admins"))
Use V: "\\ev-fps\commissions$"
EndIf
If (InGroup ("GRP-Evault Admin" or InGroup ("Domain Admins))
Use Y: "\\ev-fps\EvVault$"
EndIf
If (InGroup ("GRP-Evault-Solutions") or InGroup ("Domain Admins"))
Use W: "\\ev-fps\solutions$"
EndIf
Color w/n
AT (16,25) "Press anykey to continue."
If Exist( @ldrive+"\jbond.spk")
Play file @ldrive+"\jbond.spk"
Else
Get $x
EndIf
Exit
| Radimus |
| (KiX Supporter) |
| 2005-11-22 08:37 PM |
|
Re: Help with Logon Script
|
OR
if ingroup("GRP-Accounting-Main,"Grp-Finance","Domain Admins") = 1
AND
if ingroup("GRP-Accounting-Main,"Grp-Finance","Domain Admins",1) = 1
http://www.scriptlogic.com/Kixtart/htmlhelp/Functions/ingroup.htm
| Howard Bullock |
| (KiX Supporter) |
| 2005-11-22 08:42 PM |
|
Re: Help with Logon Script
|
Missing quote:
Use g: "\\ev-fps\accounting$
| Howard Bullock |
| (KiX Supporter) |
| 2005-11-22 08:43 PM |
|
|
|
Re: Help with Logon Script
|
Another missing quote:
Use H: "\\ef-fps\alliance$
| Mart |
| (KiX Supporter) |
| 2005-11-22 08:43 PM |
|
|
Re: Help with Logon Script
|
Missing some code tags also
Lonkero
|
| (KiX Master Guru) |
| 2005-11-22 08:45 PM |
|
Re: Help with Logon Script
|
yup, missing quote on line 39.
| Mart |
| (KiX Supporter) |
| 2005-11-22 08:52 PM |
|
|
|
Re: Help with Logon Script
|
Cleaned it up a bit.
Added some quotes, removed some brackets and added some tab's to keep it readable.
Also broke the long line.
Code:
;*************************************************************************
; Script Name: Logon.bat
; Author: Aaron Perrault
; Date: 11/16/2005
; Description: Logon Script for EVault Corp.
;*************************************************************************
;
Small
Color b+/n
Box (0,0,24,90,GRID) ; 'background grid'
Color b/n
Box (8,21,18,71,Å) ; 'shadow' of the box
Color g+/n
Box (7,20,17,70,FULL)
;
Color w+/n
AT ( 9,25) "Userid : " ; display some text strings
AT (10,25) "Full name : "
AT (11,25) "Privilege : "
AT (12,25) "Workstation : "
AT (13,25) "Domain : "
AT (14,25) "Logon Server : "
AT (15,25) "Operating System : "
;
Color y+/n
AT ( 9,45) @userid ; ...and some macro's
AT (10,45) @fullname
AT (11,45) @priv
AT (12,45) @wksta
AT (13,45) @domain
AT (14,45) @lserver
AT (15,45) @ProductType
;
;Drive Mapping Section:
;
Use J: "\\ev-fps\public"
;
If (InGroup ("GRP-Accounting-Main") OR InGroup ("Grp-Finance") OR InGroup ("Domain Admins")
Use g: "\\ev-fps\accounting$"
EndIf
;
If (InGroup ("GRP-Alliance") OR InGroup ("alliance") OR InGroup ("Domain Admins")
Use H: "\\ef-fps\alliance$"
EndIf
;
If (InGroup ("GRP-Business Development") OR InGroup ("Domain Admins")
Use K: "\\ev-fps\busdev$"
EndIf
;
If (InGroup ("GRP-Contract") OR InGroup ("GRP-Contracts-Read Only") OR InGroup ("Domain Admins")
Use L: "\\ev-fps\contracts$"
EndIf
;
If (InGroup ("GRP-Marketing") OR InGroup ("GRP-Marketing Bus Dev") OR InGroup ("Marketing") OR InGroup ("Domain Admins")
Use M: "\\ev-fps\marketing$"
EndIf
;
If (InGroup ("GRP-ExecAdmin") OR InGroup ("GRP-General Exec Administration") OR InGroup ("Domain Admins")
Use N: "\\ev-fps\ExecAdmin$"
EndIf
;
If (InGroup ("GRP-Operations") OR InGroup ("Domain Admins")
Use O: "\\ev-fps\Operations$"
EndIf
;
If (InGroup ("GRP-License") OR InGroup ("GRP-General Exec Administration") OR InGroup ("Domain Admins")
Use W: "\\ev-fanda\license$"
EndIf
;
If (InGroup ("GRP-Human Resources") OR InGroup ("GRP-Human Resources-Read Only") OR InGroup ("Domain Admins")
Use Q: "\\ev-fps\hr$"
EndIf
;
If (InGroup ("GRP-Europe") OR InGroup ("Domain Admins")
Use R: "\\ev-fps\europe$"
EndIf
;
If (InGroup ("GRP-PreSales") OR InGroup ("GRP-Direct Sales") OR InGroup ("GRP-Sales") OR InGroup ("GRP-Teleprospecting") OR
InGroup ("GRP-Teleprospecting Restricted") OR InGroup ("sbe.sales") OR InGroup ("sbe-support") OR InGroup ("Domain Admins")
Use s: "\\ev-fps\Sales$"
EndIf
;
If (InGroup ("GRP-Product Development") OR InGroup ("Domain Admins")
Use T: "\\ev-fps\ProdDev$"
EndIf
;
If (InGroup ("GRP-Emeryville Engineering") OR InGroup ("Domain Admins")
Use U: "\\ev-fps\EE$"
EndIf
;
If (InGroup ("GRP-Commissions") OR InGroup ("Domain Admins")
Use V: "\\ev-fps\commissions$"
EndIf
;
If (InGroup ("GRP-Evault Admin") OR InGroup ("Domain Admins")
Use Y: "\\ev-fps\EvVault$"
EndIf
;
If (InGroup ("GRP-Evault-Solutions") OR InGroup ("Domain Admins")
Use W: "\\ev-fps\solutions$"
EndIf
;
Color w/n
AT (16,25) "Press anykey to continue."
If Exist( @ldrive+"\jbond.spk")
Play file @ldrive+"\jbond.spk"
Else
Get $x
EndIf
| Aaron Perrault |
| (Fresh Scripter) |
| 2005-11-22 09:19 PM |
|
Re: Help with Logon Script
|
YOU GUYS ROCK!!!!!!!!! I never imagined that I would get this amount of help. Now I get to write the rest of the script.
I will start a new thread if I run into more problems.
Thanks again everyone.
app
|
Lonkero
|
| (KiX Master Guru) |
| 2005-11-22 11:25 PM |
|
Re: Help with Logon Script
|
mart, you missed quotes for 3 strings...
| Aaron Perrault |
| (Fresh Scripter) |
| 2005-11-23 12:26 AM |
|
Re: Help with Logon Script
|
hey there might have been a few missing, but after all the help I got, I think I can find those.
Thanks for the help. (Starting a new thread shortly!!!)
thanks
app
|
Lonkero
|
| (KiX Master Guru) |
| 2005-11-23 01:25 AM |
|
Re: Help with Logon Script
|
well, no matter what, it's the easiest way to make scripts working oddly.
leaving quotes out that is.
Code:
Box (7,20,17,70,FULL)
actually is / should be:
Code:
Box (7,20,17,70,"FULL")
| Mart |
| (KiX Supporter) |
| 2005-11-23 11:52 AM |
|
|
|
Re: Help with Logon Script
|
I'll blame it on the editor I use
| Aaron Perrault |
| (Fresh Scripter) |
| 2005-11-23 05:04 PM |
Re: Help with Logon Script
|
Hey Mart,
Just out of curiousity, which editor do you use. I go between PrimalScript and KixTarter. Maybe we should start a poll to see what people use.
Thanks for the help though,
aaron
| Mart |
| (KiX Supporter) |
| 2005-11-23 08:39 PM |
|
|
|
Re: Help with Logon Script
|
I use the good old KixScript editor 1.5a from iTripoli.
This editor has been E.O.L. for some time. They have gone over to Adminscrip editor (aka ASE).
http://www.adminscripteditor.com/main.asp
| Phoenix1987 |
| (Fresh Scripter) |
| 2007-01-08 04:31 PM |
|
Re: Help with Logon Script
|
How do i make a "Press any key to continue" ??
I want people to ectualy read the text :P
and how can i make my box bigger ??
Code:
Box(0,0,50,80,FULL)
i have this code.
| eriqjaffe |
| (Hey THIS is FUN) |
| 2007-01-08 05:09 PM |
|
|
Re: Help with Logon Script
|
Originally Posted By: Phoenix1987
How do i make a "Press any key to continue" ??
Code:
? "Press any key to continue..." Get $
|
Glenn Barnas
|
| (KiX Supporter) |
| 2007-01-08 09:12 PM |
|
|
Re: Help with Logon Script
|
Don't forget to put a "?" after the Get statement, or your next output will begin after the "Press any key.." text!
Glenn
Code:
'Press any key to continue: ' Get $junk ? 'continuing... blah-blah' ?
| Les |
| (KiX Master) |
| 2007-01-08 09:42 PM |
|
Re: Help with Logon Script
|
or do:
"Press any key to continue..." ?
|
Glenn Barnas
|
| (KiX Supporter) |
| 2007-01-09 10:36 PM |
|
|
|
Re: Help with Logon Script
|
Yes, that works, but the cursor generally waits at the end of the prompt in most apps I've seen, and not on the next line.
Glenn
| Les |
| (KiX Master) |
| 2007-01-09 10:50 PM |
|
Re: Help with Logon Script
|
Oh well... my users don't see a KiX console and IMHO that ugly DOS box looks unprofessional. I believe a logon script should neither be seen nor heard.
I only ever output to the console when doing little snippets for my own use. For anything really interactive I use KiXforms.
| eriqjaffe |
| (Hey THIS is FUN) |
| 2007-01-09 11:51 PM |
|
|
|
Re: Help with Logon Script
|
Well, if you want it to look all professional and stuff...
Code:
$rc = MessageBox("Press Enter To Continue","Login Script",4160)