数据库创建，数据表创建？

Question

想动态的创建数据库，和table，该怎么做？
.sql 应该怎么写？有什么用？
不想让SQL Server 2000执行，想用自己的程序执行。我想做个小软件，程序一开始就在本机的SQL Server 2000上创建一个datatest数据库
然后再点创建表，就在datatest里创建已经定义好的表
应该怎么做，高手请教

Answer 1

public function  xx ()On Error GoTo DealError
    Dim objCon As Connection, strCn As String, strSQL As String
    Set objCon = New Connection
    '
    strCn = "Provider=SQLOLEDB.1;User ID=sa;Data Source=(local)"
    objCon.ConnectionString = strCn
    objCon.open
    '
    strSQL = "CREATE DATABASE 实例2库"
    objCon.Execute strSQL
    MsgBox "成功创建数据库"
    objCon.Close
    '
    strCn = "Provider=SQLOLEDB.1;User ID=sa;" & "Data Source=(local);Intial Catalog=实例2库"
    objCon.ConnectionString = strCn
    objCon.open
    '
    strSQL = "CREATE TABLE 测试表(" & _
            "用户名 valchar(13) not null primary key," & _
            "口令 char(6) not null)"
    objCon.Execute strSQL
    MsgBox "成功创建数据库表"
    
    strSQL = "INSERT 测试表(用户名,口令)" & _
        "VALUES('Administrator',123456)"
    objCon.Execute strSQL
    strSQL = "INSERT 测试表(用户名,口令)" & _
        "VALUES('Admin',13578)"
    objCon.Execute strSQL
    strSQL = "INSERT 测试表(用户名,口令)" & _
        "VALUES('叮当',123321)"
    objCon.Execute strSQL
    MsgBox "成功为表添加了三条记录"
    '
    objCon.Close
    Set objCon = Nothing
    '
    Command2.Enabled = True
   
DealError:
    '
    MsgBox "数据库创建过程出错" & Err.Description
 End Sub

Answer 2

兄弟多点看看数据定义那方面的sql

Answer 3

cuilei197979(风)按照你的方法，创建数据库可以了
为什么在创建表的时候总是放表放进master数据库里了？而不是实例2库  里？

Answer 4

用SQL DMO啊。
EASY，一下子就全搞定了。