SamplescriptthatdeletesaSQLServerdatabase.

SupportedPlatforms

SQLServer2000

Yes

ScriptCode

复制代码 代码如下:

strDBServerName="."

strDBToDelete="ScriptingGuysTestDB"

SetobjSQLServer=CreateObject("SQLDMO.SQLServer")

objSQLServer.LoginSecure=True

objSQLServer.ConnectstrDBServerName

objSQLServer.KillDatabasestrDBToDelete