<%
************Mit ADODB.Connect-Objekt erstellen****************************
Dim oConn
DimsDatabaseName
sDatabaseName = "CodeCreateDB"
Setze oConn = Server.CreateObject("ADODB.Connection")
oConn.Open „Provider=SQLOLEDB;Datenquelle=(lokal);Benutzer-ID=sa;Passwort=;“
oConn.Execute „CREATE DATABASE“ & sDatabaseName
%>
Methode 2:
<%@ Language=VBScript %>
<%
********************* Verwenden der SQLDMO-Objektobjektbibliothek *********************
oSQLServer dimmen
Verdunkeln Sie oDatabase
oDBFileData dimmen
oLogFile dimmen
DimsDatabaseName
DimsDatapath-
Datenbankname
sDatabaseName = "CodeCreateDBTest"
Pfad zum Speichern der Datendatei
sDatapath = „D:“
erstellt ein SQL Server-Objekt und verknüpft es, (local) ist der Servername
Setze oSQLServer = Server.CreateObject("SQLDMO.SQLServer")
oSQLServer.LoginSecure = True verwendet integrierte Sicherheit
oSQLServer.Connect „(lokal)“
oSQLServer.Connect „(local)“, „sa“, „“
Erstellen Sie ein Datenbankobjekt
mit Standardauthentifizierung und Standardsicherheit
Setze oDatabase = Server.CreateObject("SQLDMO.Database")
oDatabase.Name = sDatabaseName
erstellt ein Datenbankdateiobjekt
Setze oDBFileData = Server.CreateObject("SQLDMO.DBFile")
Mit oDBFileData
.Name = sDatabaseName & "_data"
.PhysicalName = sDatapath & "" & sDatabaseName & "_data.mdf"
.PrimaryFile = True
.FileGrowthType = SQLDMOGrowth_MB
.FileGrowth = 1
„Ende mit
“ erstellt ein Protokolldateiobjekt
Setze oLogFile = Server.CreateObject("SQLDMO.LogFile")
Mit oLogFile
.Name = sDatabaseName & "_log"
.PhysicalName = sDatapath & "" & sDatabaseName & "_log.ldf"
„End With“
fügt das DB-Dateiobjekt und das Protokolldateiobjekt zum DataBase-Datenbankobjekt hinzu
oDatabase.FileGroups("PRIMARY").DBFiles.Add oDBFileData
oDatabase.TransactionLog.LogFiles.Add oLogFile
fügt die Datenbank zum SQL-Server hinzu (Datenbank erstellen)
oSQLServer.Databases.Add oDatabaseClose
-Verbindung
oSQLServer.Close gibt
das Objekt
frei
Setzen Sie oLogFile = Nothing
Setzen Sie oDBFileData = Nothing
Legen Sie oDatabase = Nothing fest
Legen Sie oSQLServer = Nothing fest
%>