Dim coox As New ADODBConnection
cooxopen("Provider=MicrosoftJetOLEDB40;Data Source=" & AppPath & "\db1mdb" )
sql="create table [" & replace(txtTableNameText,"'","''") &"]"
sql=sql & "(字段名1 字段类型,字段名2 字段类型,……)"
connexecute sql
实例:
CREATE TABLE jobs
(
job_id smallint
IDENTITY(1,1)
PRIMARY KEY CLUSTERED,
job_desc varchar(50) NOT NULL
DEFAULT 'New Position - title not formalized yet',
min_lvl tinyint NOT NULL
CHECK (min_lvl >= 10),
max_lvl tinyint NOT NULL
CHECK (max_lvl <= 250)
)
更多内容:>
以上就是关于关于VB 里动态创建数据库中数据表的相关问题全部的内容,包括:关于VB 里动态创建数据库中数据表的相关问题、怎样用java代码动态生成数据库表、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)