急救呀!大家快来瞧下呀

Question

我有一个文件'123.TXT'内容如下
CREATE DATABASE CTS_123
ON
PRIMARY ( NAME = St1,
      FILENAME = 'c:\program files\microsoft sql server\mssql\data\CTS_123_1.mdf',
      SIZE = 10MB,
      MAXSIZE = 200,
      FILEGROWTH = 2),
( NAME = St2,
   FILENAME = 'c:\program files\microsoft sql server\mssql\data\CTS_123_2.ndf',
   SIZE = 10MB,
   MAXSIZE = 200,
   FILEGROWTH = 2),
( NAME = St3,
   FILENAME = 'c:\program files\microsoft sql server\mssql\data\CTS_123_3.ndf',
   SIZE = 10MB,
   MAXSIZE = 200,
   FILEGROWTH = 2)
LOG ON 
( NAME = StLog1,
   FILENAME = 'c:\program files\microsoft sql server\mssql\data\CTS_123_4.ldf',
   SIZE = 1MB,
   MAXSIZE = 20,
   FILEGROWTH = 1),
( NAME = StLog2,
   FILENAME = 'c:\program files\microsoft sql server\mssql\data\CTS_123_5.ldf',
   SIZE = 1MB,
   MAXSIZE = 20,
   FILEGROWTH = 1)
GO
我在命令壮态下执行下列语句
OSQL -USA -P -123
执行后为什么没有建起库CTS_123呀
小弟在此谢谢各位啦

Answer 1

两种方法:
(1)
直接使用ado连接然后使用sql命令来建立数据库啊(2)利用sqldmo
'引用microsoft SQLDMO对象'定义数据库服务器
Dim Osql As New SQLDMO.SQLServer'定义一个数据库对象
Dim Odb As New SQLDMO.Database'定义数据库文件
Dim ODbFl As New SQLDMO.DBFile'定义日志文件
Dim ODbLg As New SQLDMO.LogFileOdb.Name = "测试数据库"'连接数据库服务器
Osql.Connect "ukyo", "sa", ""'数据库文件存放位置
ODbFl.Name = "c:\ukyo\测试数据库.mdf"
ODbFl.PhysicalName = "c:\ukyo\测试数据库.mdf"'日志文件存放位置
ODbLg.Name = "c:\ukyo\测试数据库.ldf"
ODbLg.PhysicalName = "c:\ukyo\测试数据库.ldf"Odb.FileGroups("primary").DBFiles.Add ODbFl
Odb.TransactionLog.LogFiles.Add ODbLg
'增加数据库罗
Osql.Databases.Add Odb'释放对象
Set ODbLg = Nothing
Set ODbFl = Nothing
Set Odb = Nothing
Osql.Close
Set Osql = Nothing