复制代码 代码如下:
strDBServerName = "."
strDBName =&nbs编程客栈p;"ScriptingGuysTestDhttp://www.cppcns.comB"
Set objsQLServer = CreateObject("SQLDMO.SQLServer")
objSQLServer.LoginSecure = True
objSQLServer.Connect strDBServerName
Set objDB = objSQLServer.Databases(strDBName)
Set colUsers = objDB.Users
For Each objUser In&nbhttp://www.cppcns.comsp;colUsers
&www.cppcns.comnbsp;WScript.Echo "User: " & objUser.Name
WScript.Echo "Login: " & objUser.Login&nb编程客栈sp;
Next
本文标题: Sample script that displays all of the users in a given SQL Server DB
本文地址: http://www.cppcns.com/wangluo/javascript/37800.html
© 著作权归作者所有
举报
发表评论
0/200