1、点击新建查询按钮,打开代码编写面板。创建数据库以及对数据库的 *** 作都可以通过在这里编写代码执行。
2、创建一个数据库一般须创建一个数据文件和一个日志文件,用鼠标 *** 作创建时我们也已经看见。下面介绍,创建数据库命令格式create database 数据库名。数据文件的后缀为mdf,日志文件的后缀为ldf。如图:
3、创建数据库源代码:
create database test
on
primary(name=test,
filename='E:\test\testmdf',
size=4mb,
maxsize=10mb,
filegrowth=2mb
)
log on
(name=testlog,
filename='E:\test\testlogldf',
size=1mb,
maxsize=5mb,
filegrowth=1mb
)
启动VB60,新建一个工程,在菜单-工程-引用里选"Microsoft ActiveX Data Objects 20 Library",代码里需要有
dim conn As New ADODBConnection
定义ADO数据库对象
connConnectionString = "driver={SQL Server};" & _
"server=" & ServerName & ";uid=" & UserName & ";
pwd=" & Password & ";database=" & DatabaseName & ""
连接数据串
connopen 连接数据库
注:ServerName为服务器名;UserName为用户名;Password为用户口令; DatabaseName要登录的数据库名,可以为空。
核心代码如下:
一、建立数据库
原理:建立数据库先要初始化一个数据库设备,然后在此设备上建立数据库。所有的设备名在系统表"sysdevices"里有记录,所有的数据库名在系统表"sysdatabases"里有记录。在建立之前,最好先查询这两个系统表,看名称是否已经存在。在建立设备之前,还需要的一个物理名和空闲的设备标识号。
初始化设备语法:
DISK INIT NAME="device_name",PHYNAME=
"physical_name",VDEVNO=device_number,
SIZE=numberofblock
说明:这里,NAME是数据库设备名(一个有效的标识符),PHYNAME(数据库设备的物理名)是原始的磁盘分区UNIX或外设(vms)名,或者是 *** 作系统的文件名。VDEVNO时数据库的设备标识号,合法值为1-255,SIZE的单位是2KB的块,例如1MB(1024KB)时SIZE值为512。
建立数据库语法:CREATE DATABASE database_name [ON database_device]
说明:database_name是要建的数据库名,database_device是设备名
要新建立一个数据库,就需要设备名,数据库名,物理名和设备号。具体步骤如下:
我们假设用户要新建立设备dbName,在设备dbName上建立数据库dbName。
1)得到设备名 bName是用户给出的设备名;先查询系统表sysdevices,看用户给出的设备名dbName是否已经存在,如果此设备名存在,就需要更换一个设备名,因为设备名是唯一的。
sql = "select from sysdevices
where name=" & dbName & ""
Set rs = connExecute(sql)
If Not rsEOF Then
MsgBox "设备名"" & dbName & ""
已存在!", 16, "请重新输入名称"
Exit Sub
End If
2)得到数据库名。dbName是用户给出的数据库名;查询系统表sysdatabases,看用户给出的数据库名dbName是否已经存在,如果此数据库存在,就需要更换一个数据库名,像设备名一样,数据库名也是唯一的
sql = "select from sysdatabases
where name=" & dbName & ""
Set rs = connExecute(sql) 下面代码略
3)得到PHYNAME物理名。查询服务器上数据库文件的物理位置serverpath,典型的,我们可以从系统表sysdevices中查询master(这是SQL Server的主库名)数据库的位置,例如G:\MSSQL\DATA\MASTERDAT,则我们的数据库可以建在"G:\MSSQL\DATA\"目录下。
sql = "select name,phyname from sysdevices "
low/16777216为设备号
Set rs = connExecute(sql)
然后遍历记录对象rs,当name="master"时,取出phyname,
从而可以得到物理位置serverpath =G:\MSSQL\DATA\。
4)得到一个空闲的设备号vdevno。设备号合法值1~255,遍历这些号,查找出未被使用的空闲设备号,下面程序得到已有的设备号
sql = "select distinct low/16777216
from sysdevices order by low/16777216"
low/16777216为设备号
5)建立数据库。所需的信息都准备完毕,可以建立数据库了(注:下面的"" & Chr(34) & ""就是一个"""双引号,这样处理后,才能满足语法要求;数据库为20M,则dbSize=51220)
sql = "DISK INIT NAME=" & Chr(34) & ""
& dbName & "" & Chr(34) & ",PHYSNAME="
& Chr(34) & "" & serverpath & "" & dbName
& "dat" & Chr(34) & ",VDEVNO=" & vdevno
& ",SIZE=" & dbSize & ""
Set rs = connExecute(sql) 初始化设备
sql = "CREATE DATABASE " & dbName & "
on " & dbName & "=" & dbSize & ""
注:
第一个dbName是数据库名,
第二个dbName是设备名
Set rs = connExecute(sql)
在设备dbName上建立数据库dbName
MsgBox "数据库"" & dbName & ""建在服务器上
"" & serverpath & "" & dbName & "dat",
建立成功!", 64, "成功"
drop database databasenamecreate database databasename
on
primary //是主文件
(
name='employee1', //逻辑名称
filename='E:', //存放位置
size= 10M, //初始大小
filegrowth =10%, //增长率
maxsize = 1G, //最大值
),
(
name='employee1',
filename='E:',
size= 3M,
filegrowth =20%,maxsize = 1G,
),(
name='employee1',
filename='E:',
size= 3M,
filegrowth =2m,
maxsize = 1G,
)
不懂可以和我说。。
以上就是关于怎样使用SQL SERVER新建立一个数据库全部的内容,包括:怎样使用SQL SERVER新建立一个数据库、vb 用sql 语句创建数据库。、如何用代码创建SQL数据库文件(最好有解释)等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)