求创建SQL(2000)数据库的VB代码

求创建SQL(2000)数据库的VB代码,第1张

创建SQL

Server

2000数据库

Dim

ADOcn

As

New

ADODBConnection

Dim

Sqls

As

String

'连接到master数据库,创建新数据库

ADOcnConnectionString

=

"driver={SQL

Server};server=;uid=sa;pwd=;database=master"

ADOcnOpen

'DISK

INIT

NAME='我的数据库',是数据库名称,显示在企业管理器中的名称

'PHYSNAME='d:\我的数据库_Datamdf',是数据库文件

'SIZE=5120,数据库初始大小

Sqls

=

"DISK

INIT

NAME='我的数据库',PHYSNAME='d:\我的数据库_Datamdf',SIZE=5120"

'在硬盘上建立数据库文件

ADOcnExecute

Sqls

Sqls

=

"CREATE

DATABASE

我的数据库

on

我的数据库=5120"

'创建数据库

ADOcnExecute

Sqls

ADOcnClose

创建数据库和表的 *** 作有两种方法:一、可视化 *** 作 1创建数据库 选中数据库右击,在出现的对话框中选择新建数据库,然后新出现的对话框中填写数据库的名称 2创建数据表 选中数据库下的表右击,在出现的对话框最上方有新建表选项,新出现的对话框中有列名、数据类型、允许Null值三列,这里可以添加表的的列,添加好列后保存Ctrl+S或者点击上方的保存,填写表名称确定就创建好了。二、使用SQL语句创建12345678910111213141516171819202122232425262728293031323334353637381创建数据库create database stuDB --stuDB是数据库的名称on primary -- 默认就属于primary文件组,可省略(/--数据文件的具体描述--/ name='stuDB_data', -- 主数据文件的逻辑名称 filename='D:\stuDB_datamdf', -- 主数据文件的物理路径和名称 size=5mb, --主数据文件的初始大小 maxsize=100mb, -- 主数据文件增长的最大值 filegrowth=15%--主数据文件的增长率)log on(/--日志文件的具体描述,各参数含义同上--/ name='stuDB_log', filename='D:\stuDB_logldf', size=2mb, filegrowth=1mb) -----2创建数据表use StuDB --使用某个数据库(在某个数据库下建表)go if exists(select from sysobjects where name='stuMarks')--查询数据库是否已存在此表drop table stuMarks--如果存在该表则删除,不存在不执行此句create table stuMarks --stuMarks是表的名称( ExamNo int identity(1,1) primary key,--列名 数据类型 约束 stuNo char(6) not null,--列名 数据类型 是否允许插入Null值 writtenExam int not null, LabExam int not null)go -- 其中,列属性"identity(起始值,递增量)" 表示"ExamNo"列为自动编号, 也称为标识列alter table 表名add constraint 约束名 约束类型 具体的约束说明alter table 表名drop constraint 约束名

1、使用create

database创建数据库test

create

database

test

on

primary

(

name

=

'test',

filename='c:\program

files\microsoft

sql

server\mssql\data\testmdf',

size=10240kb,

maxsize

=

unlimited,

filegrowth

=

10%)

log

on

(

name='test_log',

filename='c:\program

files\microsoft

sql

server\mssql\data\test_logldf',

size=1024kb,

maxsize

=

5120kb,

filegrowth

=

1024kb

)

go

2

使用alter

database语句修改数据库

例4-3 将两个数据文件和一个事务日志文件添加到test数据库中。

程序清单如下:

alter

database

test

add

file

(name

=

test1,

filename='c:\program

files\microsoft

sql

server\mssql\data\test1ndf',

size

=

5mb,

maxsize

=

100mb,

filegrowth

=

5mb),

(name

=

test2,

filename='c:\program

files\microsoft

sql

server\mssql\data\test2ndf',

size

=

3mb,

maxsize

=

10mb,

filegrowth

=

1mb)

go

alter

database

test

add

log

file

(

name

=

testlog1,

filename='c:\program

files\microsoft

sql

server\mssql\data\testlog1ldf',

size

=

5mb,

maxsize

=

100mb,

filegrowth

=

5mb)

go

3、重命名test为demo

sp_renamedb

'test','demo'

4、删除数据库

drop

database

demo

--建表

create table student(

ID int identity(1,1) primary key,    --主键,自动编号

xuehao char(10) not null,            --学号,不能为空

sname nvarchar(10) not null,         --姓名,不能为空

age int,                             --年龄

sex bit,                             --性别

indate datetime,                     --入学日期

)

--删除字段

alter table student drop column indate

--添加字段

alter table student add column classid char(10)

--修改字段

alter table student alter column sex nvarchar(10)

祝你成功!

以上就是关于求创建SQL(2000)数据库的VB代码全部的内容,包括:求创建SQL(2000)数据库的VB代码、如何在SQL Server2008中用代码建库建表、求使用sql语句创建和删除数据库的代码等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/sjk/10212448.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-06
下一篇2023-05-06

发表评论

登录后才能评论

评论列表(0条)

    保存