如何用word vb宏来生成sql

345 查看

昨天BOSS下了个命令让我用word宏的方式来快速生成sql,这样在我们建表的时候就不用在一条一条元数据的输入。从而提高效率节约成本:

接到命令后就开始着手来做,一边上网搜相关的现成的材料,一边看vb宏的视频教程。终于让我写出了这个程序,虽说有点儿小吧,可是感觉挺好的。

这里的vb宏要针对固定的数据库数据字典表格进行的。
由于代码太长就不拿出来了,这里是word中的表格式和vb运行后的结果如下:

文件名称

T_Test

中文描述

用户信息表

字段名

中文说明

数据类型

长度

缺省

允许

空值

主键

1

userid

主键ID

Integer

10

 

 

2

username

用户名

Varchar

50

Chen

 

 

3

password

密码

Varchar

30

我的

 

 

4

telephone

用户电话

Varchar

20

112323

 

 

5

Address

用户地址

Varchar

50

sss

 

6

Discription

用户介绍

Varchar

200

sssss

 

8

jjjjjj

试试看

varchar

122

333

 

 

7

hhhh

试试看撒

Varchar

23

111

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 


复制代码 代码如下:

CREATE TABLE T_Test (
 userid integer NOT NULL ,
 username varchar (50) Default 'Chen' NOT NULL ,
 password varchar (30) Default '我的' NOT NULL ,
 telephone varchar (20) Default '112323' NOT NULL ,
 Address varchar (50) Default 'sss'   ,
 Discription varchar (200) Default 'sssss'   ,
 jjjjjj varchar (122) Default '333' NOT NULL ,
 hhhh varchar (23) Default '111' NOT NULL
);
ALTER TABLE T_Test add
 CONSTRAINT PK_T_Test PRIMARY KEY(userid);
comment on table T_Test is '用户信息表';
comment on column T_Test.userid is '主键ID' ;
comment on column T_Test.username is '用户名' ;
comment on column T_Test.password is '密码' ;
comment on column T_Test.telephone is '用户电话' ;
comment on column T_Test.Address is '用户地址' ;
comment on column T_Test.Discription is '用户介绍' ;
comment on column T_Test.jjjjjj is '试试看' ;
comment on column T_Test.hhhh is '试试看撒' ;

在pl/sql中跑了一遍也挺好的,直接就可以执行。