Vbsedit includes all these samples. Try it now!

' Display SQL Server Login Mode

' SQL Server 2000 : Yes

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

search for scripts

VbsEdit includes all these samples!

VbsEdit now supports .vbs, .js, .wsf and .hta scripts.
The evaluation version never expires.

Home   Scripts

Copyright © 2001-2019 adersοft