PLEASE
SUZANNE.POTS@GLEED.LINCS.SCH.UK

There are many ways of doing this and the complexity of the solution will depend on your setup.

1) What is the logic behind the workstation and printer names?
2) Do different locations have different IP address ranges?
3) What operating systems are your clients using?
4) How many clients / printers are you talking about?

You might also want to try a search of the scripts and starters foums, which will give you more answers than you can shake a stick at.

I'm off to get some aspirin now.

if ingroup ("students") =1
gosub students
endif

if ingroup ("cohort99_00") =1
gosub 99
endif

if ingroup ("cohort97_98") =1
gosub 97
endif

if ingroup ("cohort98_99") =1
gosub 98
endif

if ingroup ("cohort00") =1
gosub intake_00
endif

if ingroup ("cohort01") =1
gosub intake_01
endif

if ingroup ("school staff") =1
gosub staff
endif

if ingroup ("domain admins") =1
gosub other
endif

if ingroup ("sims") =1
gosub sims
endif

if ingroup ("Food") =1
gosub food
endif

if ingroup ("PrimarySchool") =1
gosub primary
endif
exit

:intake_01
use u: /del
use u: "\\Utility-server\01"
return

:intake_00
use u: /del
use u: "\\Utility-server\00"
return

:99
use u: /del
use u: "\\Utility-server\99"
return

:98
use u: /del
use u: "\\Utility-server\98"
return

:97
use u: /del
use u: "\\Utility-server\97"
return

:sims
use s: "\\admin-server\applicat"
return

:students
use g: /del
use r: /del
use o: /del
use t: /del
use s: /del
use k: /del
use m: /del
use r: "\\Utility-server\roa$"
use o: "\\Utility-server\shared"
use s: "\\Utility-server\careerscape"
use k: "\\Utility-server\kudos"
use m: "\\Utility-server\omnigraph"
use i: "\\cdromserver\sschool"
use g: "\\Utility-server\itskills"
use l: "\\curriculum\rivers"
use lpt1: "\\curriculum\PagePro4100"
use lpt2: "\\curriculum\T8Colour"
use lpt3: "\\library1\hp deskjet 500"
return

:staff
use m: /del
use n: /del
use r: /del
use k: "\\Utility-server\kudos"
use l: "\\Utility-server\careerscape"
use o: /del
use r: "\\admin-server\reports"
use o: "\\Utility-server\shared"
use n: "\\admin-server\y92001"
use m: "\\admin-server\y72001"
use l: "\\curriculum\rivers"
return

:food
use p: /del
use p: "\\cdromserver\the can"
return

ther
;;run "\\Utility-server\shared\ranger\setup.exe"
use r: "\\admin-server\reports"
use z: "\\backup server\cdrom"
use i: "\\cdromserver\sschool"
use t: "\\cdromserver\quickcad"
use p: "\\cdromserver\office97"
return

rimary
use o: "\\Utility-server\shared"
return

If your workstation name comprises a letter identifying it as a workstaion, followed by a three letter site mnemonic followed by a room number followed by a wokstation number the job is almost done for you.

For example, NWGTC20103
Means:
NW NT Workstaion
GTC Gleed Technical College
201 Room 201
03 workstation number three

If you've used a similar scheme for your printers: PRGTC20101
PR Printer
GTC Gleed Technical College
201 Room 201
01 First printer

As you can surmise, all you need to do is substring out the location and room number from the workstation, prepend "PR" then append "01" and "02" to get the names of the printer queues.

please

if ingroup ("students") =1
gosub students
endif

if ingroup ("cohort99_00") =1
gosub 99
endif

if ingroup ("cohort97_98") =1
gosub 97
endif

if ingroup ("cohort98_99") =1
gosub 98
endif

if ingroup ("cohort00") =1
gosub intake_00
endif

if ingroup ("cohort01") =1
gosub intake_01
endif

if ingroup ("school staff") =1
gosub staff
endif

if ingroup ("domain admins") =1
gosub other
endif

if ingroup ("sims") =1
gosub sims
endif

if ingroup ("Food") =1
gosub food
endif

if ingroup ("PrimarySchool") =1
gosub primary
endif
exit

:intake_01
use u: /del
use u: "\\Utility-server\01"
return

:intake_00
use u: /del
use u: "\\Utility-server\00"
return

:99
use u: /del
use u: "\\Utility-server\99"
return

:98
use u: /del
use u: "\\Utility-server\98"
return

:97
use u: /del
use u: "\\Utility-server\97"
return

:sims
use s: "\\admin-server\applicat"
return

:students
use g: /del
use r: /del
use o: /del
use t: /del
use s: /del
use k: /del
use m: /del
use r: "\\Utility-server\roa$"
use o: "\\Utility-server\shared"
use s: "\\Utility-server\careerscape"
use k: "\\Utility-server\kudos"
use m: "\\Utility-server\omnigraph"
use i: "\\cdromserver\sschool"
use g: "\\Utility-server\itskills"
use l: "\\curriculum\rivers"
use lpt1: "\\curriculum\PagePro4100"
use lpt2: "\\curriculum\T8Colour"
use lpt3: "\\library1\hp deskjet 500"
return

:staff
use m: /del
use n: /del
use r: /del
use k: "\\Utility-server\kudos"
use l: "\\Utility-server\careerscape"
use o: /del
use r: "\\admin-server\reports"
use o: "\\Utility-server\shared"
use n: "\\admin-server\y92001"
use m: "\\admin-server\y72001"
use l: "\\curriculum\rivers"
return

:food
use p: /del
use p: "\\cdromserver\the can"
return

ther
;;run "\\Utility-server\shared\ranger\setup.exe"
use r: "\\admin-server\reports"
use z: "\\backup server\cdrom"
use i: "\\cdromserver\sschool"
use t: "\\cdromserver\quickcad"
use p: "\\cdromserver\office97"
return

rimary
use o: "\\Utility-server\shared"
return

What names do your workstations have?

Ok the pc's are named T81 to T820
and T91 to T920
we have rooms number T something so if we start with
T81
T82
T83
T84
T85
T86
T87
T88
T89
T810
ect
and the printers are
use lpt1: "\\curriculum\PagePro4100"
use lpt2: "\\curriculum\T8Colour"
if you can show me how to set up this room I might be able to duplicate around the rest of the rooms!!!!!!!!!
Thanks

code:

---

$sRoom=substr(@WKSTA,1,2)   ; Room Prefix Tx
$iPCNo=substr(@WKSTA,3,9)   ; Simple sequential PC number.
"This is PC number " $iPCNo " in room number " $sRoom ?
Select
Case $sRoom = "T8"
	Use lpt1: "\\curriculum\T8Colour"
Case $sRoom = "T9"
	Use lpt1: "\\curriculum\PagePro4100"
Case 1
	"No printer mapped - room not recognised" ?
EndSelect

---

The scriptlet substrings off the first two characters and uses that in the "Case" construct to decide what to map. I also substring off the number, but don't actually use it.

Just as an aside, using this naming scheme would T123 be workstation 23 in room 1, or workstation 3 in room 12? Or do you only have 9 rooms?

Just use the scriptlet I posted previously as a skeleton, and add all the "Case" sections you need.

sRoom=substr(@WKSTA,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21) ; Room Prefix T8$iPCNo=substr(@WKSTA,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21) ; Simple sequential PC number."This is PC number " $iPCNo " in room number " $sRoom ?SelectCase $sRoom = "T8" Use lpt1: "\\curriculum\T8Colour"Case $sRoom = "T9" Use lpt1: "\\curriculum\PagePro4100"Case 1 "No printer mapped - room not recognised" ?EndSelect

is this what you mean?
Can i add the other rooms in the same way?

I'm going out on a limb here, but I gues you don't have much experience of KiXtart, eh?

Ok. I'll break the script down and explain it bit-by-bit.

code:

---

$sRoom=substr(@WKSTA,1,2)   ; Room Prefix

---

code:

---

$iPCNo=substr(@WKSTA,3,9)   ; Simple sequential PC number.

---

code:

---

"This is PC number " $iPCNo " in room number " $sRoom ?

---

code:

---

Select

---

code:

---

Case $sRoom = "T8"

---

code:

---

	Use lpt1: "\\curriculum\T8Colour"

---

code:

---

Case $sRoom = "T9"
	Use lpt1: "\\curriculum\PagePro4100"

---

code:

---

Case 1
	"No printer mapped - room not recognised" ?

---

code:

---

EndSelect

---

To extend this for your other rooms you simply need to insert more "Case" and "Use" statements, so

code:

---

Case $sRoom = "S1"
   Use LPT1: \\server\first-printer-for-s1
   Use LPT2: \\server\second-printer-for-s1
Case $sRoom = "E4"
   Use LPT1: \\server\first-printer-for-E4
   Use LPT2: \\server\second-printer-for-E4
   Use LPT3: \\server\third-printer-for-E4

---

And so-on.

if ingroup ("cohort99_00") =1
gosub 99
endif

if ingroup ("cohort97_98") =1
gosub 97
endif

if ingroup ("cohort98_99") =1
gosub 98
endif

if ingroup ("cohort00") =1
gosub intake_00
endif

if ingroup ("cohort01") =1
gosub intake_01
endif

if ingroup ("school staff") =1
gosub staff
endif

if ingroup ("domain admins") =1
gosub other
endif

if ingroup ("sims") =1
gosub sims
endif

if ingroup ("Food") =1
gosub food
endif

if ingroup ("PrimarySchool") =1
gosub primary
endif
exit

:intake_01
use u: /del
use u: "\\Utility-server\01"
return

:intake_00
use u: /del
use u: "\\Utility-server\00"
return

:99
use u: /del
use u: "\\Utility-server\99"
return

:98
use u: /del
use u: "\\Utility-server\98"
return

:97
use u: /del
use u: "\\Utility-server\97"
return

:sims
use s: "\\admin-server\applicat"
return

:students
use g: /del
use r: /del
use o: /del
use t: /del
use s: /del
use k: /del
use m: /del
use r: "\\Utility-server\roa$"
use o: "\\Utility-server\shared"
use s: "\\Utility-server\careerscape"
use k: "\\Utility-server\kudos"
use m: "\\Utility-server\omnigraph"
use i: "\\cdromserver\sschool"
use g: "\\Utility-server\itskills"
use l: "\\curriculum\rivers"

$sRoom=substr(@WKSTA,1,2) ; Room Prefix Tx
$iPCNo=substr(@WKSTA,3,9) ; Simple sequential PC number.
"This is PC number " $iPCNo " in room number " $sRoom ?
Select
Case $sRoom = "T8"
Use lpt1: "\\curriculum\T8Colour"
Use lpt2: "\\curriculum\Pagepro4100"
Case $sRoom = "T9"
Use lpt1: "\\curriculum\T9colour"
Use lpt2: "\\curriculum\T9black"
Case $sRoom = "T7"
Use lpt1: "\\curriculum\T7Colour"
Use lpt2: "\\curriculum\T7black"

Case 1 "No printer mapped - room not recognised"
?EndSelect
return

:staff
use m: /del
use n: /del
use r: /del
use k: "\\Utility-server\kudos"
use l: "\\Utility-server\careerscape"
use o: /del
use r: "\\admin-server\reports"
use o: "\\Utility-server\shared"
use n: "\\admin-server\y92001"
use m: "\\admin-server\y72001"
use l: "\\curriculum\rivers"
return

:food
use p: /del
use p: "\\cdromserver\the can"
return

ther
;;run "\\Utility-server\shared\ranger\setup.exe"
use r: "\\admin-server\reports"
use z: "\\backup server\cdrom"
use i: "\\cdromserver\sschool"
use t: "\\cdromserver\quickcad"
use p: "\\cdromserver\office97"
return

rimary
use o: "\\Utility-server\shared"
return

..............................
TIA
I have made a new log on if you were wondering the one I used yesterday was the old network managers Brian, My name is suzanne.

Good grief girl, it is still too cold and dark to be up and about at 06:00.

The scriplet is fine where you've inserted it, but because it is in the subroutine called for "students" it will only apply to these logins.

If you'd rather control the printer mapping of everyone regardless of which groups they belong to simply stick the scriplet at the beginning of your script.

For instance you are not mapping printers for the members of the staff group - that may be your intention which is fine.

I also notice that there are some oddities in the script which may have been cause by cutting and pasting. You are missing the ":O" from the ":Other" label and ":P" from the ":Primary" label at the bottom of your script. Also, ensure that there is a space between "?" and "EndSelect", or place them on seperate lines.

As an aside, if all your rooms' printers were named "{RoomName}Colour" and "{RoomName}"Black the script would have been really simple:

code:

---

$sRoom=substr(@WKSTA,1,2)   ; Room Prefix Tx
Use lpt1: "\\curriculum\" + $iRoomNo + "Colour" ; Map rooms colour printer to LPT1
Use lpt2: "\\curriculum\" + $iRoomNo + "Black" ; Map rooms b&w printer to LPT2

---

[ 07 February 2002: Message edited by: Richard Howarth ]

There is no need to rename the workstations now as only the first two characters are uses.

When you have breathing space it may well help you to review the names used for the workstations and printer shares and get them in a common format.

If I just add T8 code for now will the rest of the printers in the school come up with no printers mapped?or will they continue un affected sending to their normal location?

The rest of the school will continue to get their existing mappings which have presumably been added to each machine at some time in the past.