VBScript Constants can't contain operators.
http://msdn.microsoft.com/en-us/library/16twy8ed(VS.85).aspx "You also can't create a constant from any expression that involves an operator, that is, only simple constants are allowed." From: Joseph L. Casale [mailto:[EMAIL PROTECTED] Sent: Friday, September 12, 2008 11:53 AM To: NT System Admin Issues Subject: RE: Printer Login Script Help Guys, So why when my line: Const ENGINEERING_GROUP = "cn=engineering" looks like that, it doesnt work, but when iut looks liek this: ENGINEERING_GROUP = "cn=engineering" it works? Thanks! jlc ________________________________ From: Pete Howard [EMAIL PROTECTED] Sent: Thursday, September 11, 2008 8:19 PM To: NT System Admin Issues Subject: Re: Printer Login Script Help I hear ya.. been there ----- Original Message ---- From: Joseph L. Casale <[EMAIL PROTECTED]> To: NT System Admin Issues <ntsysadmin@lyris.sunbelt-software.com> Sent: Thursday, September 11, 2008 9:43:52 PM Subject: RE: Printer Login Script Help Looks a lot like my script! Didn't mean to be lazy, I just need a gift right now, lol... Thanks! jlc ________________________________ From: Pete Howard [EMAIL PROTECTED] Sent: Thursday, September 11, 2008 7:09 PM To: NT System Admin Issues Subject: Re: Printer Login Script Help Im not at work but we use something like this from microsoft: http://technet.microsoft.com/en-us/library/cc758918.aspx Const ENGINEERING_GROUP = "cn=engineering" Const FINANCE_GROUP = "cn=finance" Const HUMAN_RESOURCES_GROUP = "cn=human resources" Set wshNetwork = CreateObject("WScript.Network") wshNetwork.MapNetworkDrive "h:", "\\FileServer\Users\" & wshNetwork.UserName Set ADSysInfo = CreateObject("ADSystemInfo") Set CurrentUser = GetObject("LDAP://" & ADSysInfo.UserName) strGroups = LCase(Join(CurrentUser.MemberOf)) If InStr(strGroups, ENGINEERING_GROUP) Then wshNetwork.MapNetworkDrive "g:", "\\FileServer\Engineering\" wshNetwork.AddWindowsPrinterConnection "\\PrintServer\EngLaser" wshNetwork.AddWindowsPrinterConnection "\\PrintServer\Plotter" wshNetWork.SetDefaultPrinter "\\PrintServer\EngLaser" ElseIf InStr(strGroups, FINANCE_GROUP) Then wshNetwork.MapNetworkDrive "g:", "\\FileServer\Finance\" wshNetwork.AddWindowsPrinterConnection "\\PrintServer\FinLaser" wshNetWork.SetDefaultPrinter "\\PrintServer\FinLaser" ElseIf InStr(strGroups, HUMAN_RESOURCES_GROUP) Then wshNetwork.MapNetworkDrive "g:", "\\FileServer\Human Resources\" wshNetwork.AddWindowsPrinterConnection "\\PrintServer\HrLaser" wshNetWork.SetDefaultPrinter "\\PrintServer\HrLaser" End If ----- Original Message ---- From: Joseph L. Casale <[EMAIL PROTECTED]> To: NT System Admin Issues <ntsysadmin@lyris.sunbelt-software.com> Sent: Thursday, September 11, 2008 8:43:50 PM Subject: RE: Printer Login Script Help Not using R2 on the dc or print server. VBS is what my login script uses. I can do this via GPO natively (running Win2003 AD)? Thanks guys! jlc ________________________________ From: Pete Howard [EMAIL PROTECTED] Sent: Thursday, September 11, 2008 6:41 PM To: NT System Admin Issues Subject: Re: Printer Login Script Help You want cmd, vbs gpo or other ? ----- Original Message ---- From: "[EMAIL PROTECTED]" <[EMAIL PROTECTED]> To: NT System Admin Issues <ntsysadmin@lyris.sunbelt-software.com> Sent: Thursday, September 11, 2008 8:32:04 PM Subject: RE: Printer Login Script Help Are you running R2? It has the ability to push out printers via GPOs. Original Message: ----------------- From: Joseph L. Casale [EMAIL PROTECTED] Date: Thu, 11 Sep 2008 18:05:11 -0600 To: ntsysadmin@lyris.sunbelt-software.com Subject: Printer Login Script Help I need some help guys, While I am deploying everything, I am thinking that the *last* thing I had planned to fix was the way the previous guy setup printers. I have one print server with a handful of queues I need to add to every profile. I need to do this via group membership. Anyone have anything canned they can spare me? Its gonna be a late one :P Thanks! jlc ~ Finally, powerful endpoint security that ISN'T a resource hog! ~ ~ <http://www.sunbeltsoftware.com/Business/VIPRE-Enterprise/> ~ -------------------------------------------------------------------- mail2web.com <http://mail2web.com/> - Microsoft(r) Exchange solutions from a leading provider - http://link.mail2web.com/Business/Exchange ~ Finally, powerful endpoint security that ISN'T a resource hog! ~ ~ <http://www.sunbeltsoftware.com/Business/VIPRE-Enterprise/> ~ ~ Finally, powerful endpoint security that ISN'T a resource hog! ~ ~ <http://www.sunbeltsoftware.com/Business/VIPRE-Enterprise/> ~
