SupportedPlatforms
SQLServer2000
Yes
ScriptCode
复制代码 代码如下:
strDBServerName="."
strDBToDelete="ScriptingGuysTestDB"
SetobjSQLServer=CreateObject("SQLDMO.SQLServer")
objSQLServer.LoginSecure=True
objSQLServer.ConnectstrDBServerName
objSQLServer.KillDatabasestrDBToDelete