如何发布我的数据库？

[forestnudt]

我采用VB＋SQL Server2000开发了一个信息管理软件，但不知如何发布我在SQL Server中建立的数据库？多谢各位！

[yoki]

将你的数据库导出为脚本(*.sql)，然后在安装程序的时候运行这个脚本文件

[yoki]

以下是运行脚本文件的方法：

用vb的话你可以这样
Private Sub CreateDataBase(cnDataBase as connect,sqlFile As String)
Dim strSql As String, strTmp As String

Open sqlFile For Input As #1
strSql = ""
Do While Not EOF(1)
Line Input #1, strTmp
If UCase(strTmp) = "GO" Then
cn.Execute strSql
strSql = ""
Else
strSql = strSql & strTmp & vbCrLf
End If
Loop
If strSql <> "" Then cnDataBase.Execute strSql
Close #1
End Sub

其他的你可以定义一个到服务器的ado连接
然后可以这样：
比如：vb中
dim cn as New ADODB.Connection
dim sql as string

cn.open ".......到服务器的连接"
sql="master.dbo.xp_cmdshell ' osql -U username -P password -i c:\myquery.sql'"
cn.execute sql

[hzybc]

可以用程序建立数据库和表

create datebase "数据库"

create table 表名（列名 列属性，。。。）