-
************สร้างโดยใช้วัตถุ ADODB.Connect************************
ดิม โอคอนน์
DimsDatabaseName
sDatabaseName = "CodeCreateDB"
ตั้งค่า oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=SQLOLEDB;Data Source=(local);User ID=sa;Password=;"
oConn.Execute "สร้างฐานข้อมูล" & sDatabaseName
-
วิธีที่ 2:
<%@ ภาษา=VBScript %>
-
********************* การใช้ไลบรารีวัตถุวัตถุ SQLDMO **********************
ติ่ม oSQLServer
Dim oฐานข้อมูล
หรี่ oDBFileData
Dim oLogFile
DimsDatabaseName
ชื่อฐานข้อมูล
DimsDatapath
sDatabaseName = "CodeCreateDBTest"
เส้นทางการบันทึกไฟล์ข้อมูล
sDatapath = "D:"
สร้างวัตถุ Sql Server และเชื่อมโยง (ท้องถิ่น) คือชื่อเซิร์ฟเวอร์
ตั้งค่า oSQLServer = Server.CreateObject("SQLDMO.SQLServer")
oSQLServer.LoginSecure = True ใช้การรักษาความปลอดภัยแบบรวม
oSQLServer.Connect "(ท้องถิ่น)"
oSQLServer.Connect "(local)", "sa", ""
สร้างวัตถุฐานข้อมูล
โดยใช้การรักษาความปลอดภัยมาตรฐานการรับรองความถูกต้องมาตรฐาน
ตั้งค่า oDatabase = Server.CreateObject("SQLDMO.Database")
oDatabase.Name = sDatabaseName
สร้างวัตถุไฟล์ db
ตั้งค่า oDBFileData = Server.CreateObject("SQLDMO.DBFile")
ด้วย oDBFileData
.Name = sDatabaseName & "_data"
.PhysicalName = sDatapath & "" & sDatabaseName & "_data.mdf"
.PrimaryFile = จริง
.FileGrowthType = SQLDMOGrowth_MB
.ขนาดไฟล์ = 1
สิ้นสุดด้วย
การสร้างวัตถุไฟล์บันทึก
ตั้งค่า oLogFile = Server.CreateObject("SQLDMO.LogFile")
ด้วย oLogFile
.Name = sDatabaseName & "_log"
.PhysicalName = sDatapath & "" & sDatabaseName & "_log.ldf"
สิ้นสุดด้วย
การเพิ่มวัตถุไฟล์ DB และวัตถุไฟล์บันทึกให้กับวัตถุฐานข้อมูล DataBase
oDatabase.FileGroups("หลัก").DBFiles.เพิ่ม oDBFileData
oDatabase.TransactionLog.LogFiles.Add oLogFile
เพิ่มฐานข้อมูลไปยังเซิร์ฟเวอร์ Sql (สร้างฐานข้อมูล)
oSQLServer.Databases.Add oDatabaseปิด
การเชื่อมต่อ
oSQLServer.Closeปล่อย
ออบเจ็กต์
ตั้งค่า oLogFile = ไม่มีเลย
ตั้งค่า oDBFileData = ไม่มีเลย
ตั้งค่า oDatabase = ไม่มีเลย
ตั้งค่า oSQLServer = ไม่มีเลย
-