可以使用登录脚本指派用户登录特定计算机时将执行的任务。该脚本可以执行操作系统命令、设置系统环境变量以及调用其他脚本或可执行程序。
下例中的登录脚本含有使用了“Active Directory 服务接口 (ADSI)”的 VBScript 命令,它可按照用户的组成员身份执行三个常见任务:
创建登录脚本示例
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
src="ms-its:c:\windows\help\UAshared.chm::/note.gif"> 注意
有关创建和使用登录脚本的详细信息,请参阅 href="http://go.microsoft.com/fwlink/?LinkId=298" target=_new>Microsoft 网站中的href="MS-ITS:Lsconcepts.chm::/sag_LStopnode.htm">登录脚本、Windows 脚本class=printOnly> (http://www.microsoft.com/) 以及 title=http://www.microsoft.com/
href="http://go.microsoft.com/fwlink/?LinkId=4546" target=_new>Microsoft Windows 资源工具包网站(http://www.microsoft.com/)。