Les means to do something along these lines
Code:
Select
Case @UserId = "fred"
USE O: "\\fileserver\OPERATIONS"
AddPrinterConnection("\\fileserverfileserver\dc286")
SetDefaultPrinter("\\fileserver\dc286")
Case @UserId = "north_ops"
USE O: "\\fileserver\OPERATIONS"
AddPrinterConnection("\\fileserverfileserver\dc286")
SetDefaultPrinter("\\fileserver\dc286")
Case @UserId = "terry"
USE K: "\\fileserver\NORTH"
USE L: "\\fileserver\DELIVERY"
USE O: "\\fileserver\OPERATIONS"
AddPrinterConnection("\\fileserver\dc286")
SetDefaultPrinter("\\fileserver\dc286")
Case @UserId = "yuri"
USE K: "\\fileserver\northSGDATA"
USE L: "\\fileserver\DELIVERY"
USE O: "\\fileserver\OPERATIONS"
AddPrinterConnection("\\fileserverfileserver\dc286")
SetDefaultPrinter("\\fileserver\dc286")
Case @UserId = "wiriam"
USE K: "\\fileserver\NORTH"
USE L: "\\fileserver\DELIVERY"
USE O: "\\fileserver\OPERATIONS"
AddPrinterConnection("\\fileserver\dcc400_black")
SetDefaultPrinter("\\fileserver\dcc400_black")
AddPrinterConnection("\\fileserverfileserver\dc286")
Case @UserId = "ted"
USE Y: "\\fileserver\HELPDESK"
USE T: "\\fileserver\NORTH"
USE O: "\\fileserver\OPERATIONS"
AddPrinterConnection("\\fileserver\dcc400_color")
SetDefaultPrinter("\\fileserver\dcc400_color")
Case @UserId = "michael"
USE M: "\\fileserver\ADMIN"
USE L: "\\fileserver\DELIVERY"
USE K: "\\fileserver\NORTH"
USE O: "\\fileserver\OPERATIONS"
USE S: "\\fileserver\SALES"
USE Y: "\\fileserver\HELPDESK"
AddPrinterConnection("\\fileserver\dcc400_color")
SetDefaultPrinter("\\fileserver\dcc400_color")
Case @UserId = "maggir"
USE M: "\\fileserver\ADMIN"
USE L: "\\fileserver\DELIVERY"
USE K: "\\fileserver\NORTH"
USE O: "\\fileserver\OPERATIONS"
USE S: "\\fileserver\SALES"
AddPrinterConnection("\\fileserver\dc286")
SetDefaultPrinter("\\fileserver\dc286")
AddPrinterConnection("\\fileserver\dcc400_color")
Case @UserId = "martin"
USE K: "\\fileserver\NORTH"
USE L: "\\fileserver\DELIVERY"
USE O: "\\fileserver\OPERATIONS"
AddPrinterConnection("\\fileserver\dcc400_black")
SetDefaultPrinter("\\fileserver\dcc400_black")
AddPrinterConnection("\\fileserver\dc286")
Case @UserId = "alyson"
USE K: "\\fileserver\NORTH"
AddPrinterConnection("\\fileserver\dcc400_color")
SetDefaultPrinter("\\fileserver\dcc400_color")
EndSelect
_________________________
Today is the tomorrow you worried about yesterday.