Display SQL Server Login Mode.
Supported Platforms
SQL Server 2000
Yes
script Code
SQLDMOSecurity_Integrated = 1
SQLDMOSecurity_Mixed = 2
SQLDMOSecurity_Normal = 0
SQLDMOSecurity_Unknown = 9
strDBServerName = "."
Set objSQLServer = CreateObject("SQLDMO.SQLServer")
Select Case objSQLServer.ServerLoginMode(strDBServerName)
Case SQLDMOSecurity_Integrated
Wscript.Echo "Login Mode: Allow Windows Authentication only."
Case SQLDMOSecurity_Mixed
Wscript.Echo "Login Mode: Allow Windows Authentication or SQL Server Authentication."
Case SQLDMOSecurity_Normal
Wscript.Echo "Login Mode: Allow SQL Server Authentication only."
Case SQLDMOSecurity_Unknown
Wscript.Echo "Login Mode: Security type unknown."
End Select
