Dim cmd As new SQLCommand
cmd.Conne cti
Dim bm As String = "Test"
cmd.CommandText = "Sel ect 1 from sys.databases where name = '" & bm & "'"
Dim val As Integer = cmd.Execut eScalar()
If val = 0 Then
cmd.CommandText = " crea te database CommonPermission"
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 = 'C:\DATA\" & bm & "_log.ldf'," ' -- 日志文件的物理名称
cmd.CommandText &= " size = 2mb, " ' --日志文件的初始大小
cmd.CommandText &= " maxsize = 20mb, " ' --日志文件增长的最大值
cmd.CommandText &= " filegrowth = 1mb )" ' --日志文件的增长率
cmd.ExecuteNo nQuery
MessageBox.Show("数据新增完成!")
End If
.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2021.9.2.1
错误所在事件:
详细错误信息:
CREATE DATABASE 失败.无法创建列出的某些文件名.请查看相关错误.
对文件 "C:\DATA\Test_log.ldf" 的目录查找失败,出现操作系统错误 2(系统找不到指定的文件.).
加好友 
发短信
Post By：2021/11/4 17:36:00 [只看该作者]
