Dim cns As String = “Provider=SQLOLEDB.1;Password=123;Persist Security Info=True;User ID=admin;Initial Catalog=???;Data Source=192.168.8.1”
自己的数据表没有连接数据前,未知数据库中有什么表,如何写代码
Connections.Add("SqlTest",cns)
Dim cmd As new SQLC ommand
cmd.Connec ti
cmd.CommandText = " create
database " & bm
cmd.CommandText &= " on
primary " ' --表示属于 primary 文件组
cmd.CommandText &= " ( name =
'" & bm & "', " ' -- 主数据文件的逻辑名称
cmd.CommandText &= " filename
= 'd:\DATA\" & bm & ".mdf'," ' -- 主数据文件的物理名称
cmd.CommandText &= " size =
5mb, " ' --主数据文件的初始大小
cmd.CommandText &= " maxsize =
100mb, " ' -- 主数据文件增长的最大值
cmd.CommandText &= "
filegrowth = 15% ) " ' --主数据文件的增长率
cmd.CommandText &= " log on (
"
cmd.CommandText &= " name =
'" & bm & "_log', " ' -- 日志文件的逻辑名称
cmd.CommandText &= " filename
= 'D:\DATA\" & bm & "_log.ldf'," ' -- 日志文件的物理名称
cmd.CommandText &= " size = 2mb,
" ' --日志文件的初始大小
cmd.CommandText &= " maxsize =
20mb, " ' --日志文件增长的最大值
cmd.CommandText &= "
filegrowth = 1mb )" ' --日志文件的增长率
cmd.ExecuteNonQuery
[此贴子已经被作者于2022/3/17 15:40:55编辑过]