دوست من شما ميتونيد قطعه كد زير رو در يك فايل vbs (ويژوال بيسيك اسكريپت) ذخيره كنيد سپس اون رو توي پوشه SYSVOL\domain\scripts روي اكتيو دايكتوري كپي كنيد.
بعد در تب پروفايل هر يوزر در اكتيودايكتوري در فيلد Logon script نام فايل vbs اي كه توليد كرديد رو بنويسيد
از اين پس هر بار كه كاربر وارد يوزر خود در اكتيو دايكتوري بشه اين تنظيمات به صورت خودكار انجام خواهد شد.
Option Explicit
On Error Resume Next
Dim net,sh,key
Set net = CreateObject("WScript.Network")
net.AddWindowsPrinterConnection "\\servername\printersharename"
net.SetDefaultPrinter "\\servername\printersharename"
Net.MapNetworkDrive "z:", "\\servername\SYSVOL\User" +Net.UserName,"true"
البته قسمتهايي كه به رنگ قرمز هستند رو بايد مشخصات سرور و پرينتر خودتون رو قرار بديد.
موفق باشيد