至顶网›软件频道 ›在VB中更改SQL Server数据库结构

在VB中更改SQL Server数据库结构

扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条

为了方便用户，笔者开发了这个数据库配置工具。完成在SQL Server数据库中建立设备，建立数据库，建立表格......

作者：陈锦平来源：VB编程乐园 2007年10月23日

二、建立表格

　　建立表格比较简单，这里用到了自动计数字段和缺省值字段类型，语法如下：

CREATE TABLE table_name
(field_name data_type [NOT NULL|NULL],…)

　　说明：table_name为新建的表名，field_name为字段名，data_type为数据类型。

（注意下面的fileid int IDENTITY字段自动计数，datetime NOT NULL DEFAULT(GETDATE())字段每当入库时有个缺省值，由数据库生成当时的时间）。

sql = "CREATE TABLE " & TableName & "
(fileid int IDENTITY, filetime datetime NOT
NULL DEFAULT(GETDATE()),fileimage image NULL )"
conn.Execute sql 建立表格

　　三、建立用户组用户

　　建立用户组和用户不能直接通过SQL语句完成，需要执行SQL Server的存储过程sp_addlogin,sp_addgroup, sp_adduser。我们假设新建登录账号是username1,用户名是username1,组名是group1，则步骤如下：

　　1）建立用户的登录账号

　　语法：sp_addlogin login_name,password[,defdb]

　　其中，login_name是用户的登录名，password是用户的口令，defdb上登录的缺省数据库名称。建立数据库DatabaseName的登录账号：

sql = "EXECUTE sp_addlogin " & username1 & ","
& password1 & "," & DatabaseName & ""
Set rs = conn.Execute(sql)

　　2）增加用户组

　　语法：sp_addgroup group_name
　　其中，group_name 是新建组名sql = "EXECUTE sp_addgroup " & group1 & "" Set rs = conn.Execute(sql)

VIP专区

VIP用户

普通用户

邮件订阅

如果您非常迫切的想了解IT领域最新产品与技术信息，那么订阅至顶网技术邮件将是您的最佳途径之一。

重磅专题

往期文章

在VB中更改SQL Server数据库结构

业界热点: