现存问题
我们知道，在使用createdatabase语句创建一个数据库之前，必须存在一个有剩余空间的数据库设备，或者事先使用diskinit语句创建一个新设备。但是这些语句含有很多必需的参数，而且如果不使用sqlserver的管理工具，很多参数值往往难以确定。
以创建数据库设备的diskinit语句为例，这个语句的完整语法如下：
diskinitname=‘logical_name',physname=‘physical_name',vdevno=virtual_device_number,size=number_of_2k_blocks[,vstart=virtual_address]
其中name和size这两个参数都很容易得到，麻烦的是物理名physname和虚拟设备号vdevno这两个参数。前者要求是一个服务器上的物理文件全路径名；后者要求在1～255之间找一个没有被别的设备占用的号码。而在编写数据库管理程序时，用户的服务器上有哪些设备号已经被占用， sqlserver装在哪个驱动器上，都是无法预料的。
虽然，使用sqlserver的管理工具sqlenterprisemanager，可以非常方便地创建、删除数据库设备，或者扩大一个已经存在的数据库，也可以非常方便地创建、删除或者修改一个数据库,但是，这个工具仍然要求我们输入很多不太常用的参数，界面稍显复杂。
所以，理想的情况是：用户只需要按下一个命令按钮，应用程序需要的数据库及其设备都能立即自动地创建好。
解决方案
为了实现这样的目标，我们必须想办法解决sql语句中的参数设置问题。
1．创建设备的语句参数
创建设备的语句即前面提到的diskinit语句。
为了简化问题，我们可以指定与数据库名相同的设备文件名，并将设备文件保存在master设备所在的子目录中。数据库名是在设计应用程序时已经确定；而master设备所在的子目录，可以从系统表sysdevices中查询得到。这样，设备文件的物理名参数就确定下来了。
虚拟设备号的问题则比较复杂，因为sysdevices系统表中没有“虚拟设备号”这样一个字段，因此，必须另想办法。
对sqlserver的系统存储过程sp_helpdevice进行分析之后，我们发现，虚拟设备号是“隐藏”在sysdevices系统表的low 字段中的，借助另一个系统表spt_values，可以找到每个设备的虚拟设备号。这样，我们只需要在一个循环中找一下某个设备号是否存在于 sysdevices中，就可以
确定我们现在可用的虚拟设备号。
至于数据库设备的大小，我们不妨设得大一些，或者让用户指定一下也可以。
2．创建数据库的语句参数
创建数据库的语句如下：
createdatabasedatabase_name[on{default|database_device}[=size][,database_device[=size]]...]
[logondatabase_device[=size][,database_device[=size]]...][forload]
其中，大部分参数都是可选的，我们只需要指定一个设备名及数据库的大小即可，而数据库名、设备名、大小在创建设备的时候已经确定好了，所以，这个语句的参数不存在问题。
具体实现
使用普通的应用开发工具visualbasic，我们就可以实现一个定制的数据库管理程序。
为了实现与数据库服务器的连接，我们必须选择一种数据库访问接口。虽然从vb访问sqlserver
有很多接口可供选择，但微软最新的数据库访问接口 ado(activedataobjects)无疑是最有前途的，因为它为基于浏览器的数据库应用系统的实现提供了可能性。
以下是一些用于数据库及其设备管理的常用函数。
1．取当前的工作数据库 ----由于管理任务一般都必须在master库中完成，因此，在执行管理任务之前，最好保存当前工作库，以便完成任务之后再切换回去。
publicfunctionsqlgetcurrentdatabasename(cnasadodb.connection)asstringdimssqlasstringdimrsasnewadodb.recordset
onerrorgotoerrsqlgetcurrentdatabasenamessql=“selectcurrentdb=db_name()"rs.openssql,
cnsqlgetcurrentdatabasename=trim＄(rs!currentdb) rs.closeexitfunctionerrsqlgetcurrentdatabasename:sqlgetcurrentdatabasename
=“"endfunction
2．判断一个数据库设备是否存在
publicfunctionsqlexistdevicename(cnasadodb.connection,sdevnameasstring)asboolean
'--按照名称判断一个设备是否存在，如果存在，返回1，否则返回0
dimssqlasstringdimrsasnewadodb.recordsetdimbtmpasbooleanonerror
gotoerrsqlexistdevicenamessql=“
selectcntdev=count(＊)frommaster.dbo.sysdeviceswherename=‘“＆sdevname＆”'"rs.openssql,cnifrs!cntdev=0thenbtmp=falseelsebtmp=
truers.closesqlexistdevicename=btmpexitfunctionerrsqlexistdevicename:
sqlexistdevicename=falseendfunction
3．判断一个虚拟设备号是否被占用：sqlexistdevicenumber。
4．找一个最小的尚未被占用的虚拟设备号：sqlgetunuseddevicenumber。
5．取得sqlserver安装目录下的data子目录路径：sqlgetdatapath。
6．创建一个新设备：sqlcreatedevice。
7．创建一个新的数据库：sqlcreatedatabase65。
8．取数据库设备的详细信息：sqlgetdeviceinfo。
9．扩大数据库设备的尺寸：sqlexpanddevice。
数据库应用系统在运行一段之后，数据量的增大往往要求数据库增大，进而要求扩大设备尺寸。可惜diskresize语句要求的尺寸参数为扩大后的新尺寸，而非需要增加的尺寸。所以，必须事先查到设备的原有尺寸，才能使用diskresize语句。
10．判断一个数据库是否存在：sqlexistdatabase。
11．删除一个数据库：sqldropdatabase。
12．删除一个数据库设备：sqldropdevice。
13．取sqlserver的版本信息：sqlgetversionstring。
在即将发行的sqlserver7.0中，不再有数据库设备的概念，创建数据库也将变得更加简单。在创建特定的用户数据库时，为了区分不同的版本进行不同的操作，取得sqlserver的版本是非常重要的。
新闻热点
疑难解答
