dengni | |
|
sql = "CREATE TABLE aofax_send_task (taskid AUTOINCREMENT (1,1) NOT NULL, title nvarchar(200) NOT NULL DEFAULT 0, " & _
"ic nvarchar(200) NOT NULL DEFAULT 0,ldc integer NOT NULL DEFAULT 0, " & _
"fax nvarchar(64) NOT NULL DEFAULT 0, " & _
"account nvarchar(20) NOT NULL DEFAULT 0, " & _
"sender1 nvarchar(100) NOT NULL DEFAULT 0, " & _
"sender2 nvarchar(30) NOT NULL DEFAULT 0, " & _
"receiver1 nvarchar(100) NOT NULL DEFAULT 0, " & _
"receiver2 nvarchar(30) NOT NULL DEFAULT 0, " & _
"sendfile nvarchar(250) NOT NULL DEFAULT 0, " & _
"sendflag integer NOT NULL DEFAULT 0, " & _
"line integer NOT NULL DEFAULT 0, " & _
"status integer NOT NULL DEFAULT 0, " & _
"extinfo nvarchar(200) NOT NULL DEFAULT 0, " & _
"retcode integer NOT NULL DEFAULT 0, " & _
"sendtime integer NOT NULL DEFAULT 0, " & _
"faxfile nvarchar(250) NOT NULL DEFAULT 0, " & _
"reserve1 integer NOT NULL DEFAULT 0, " & _
"reserve2 integer NOT NULL DEFAULT 0, " & _
"ext1 integer NOT NULL DEFAULT 0, " & _
"ext2 integer NOT NULL DEFAULT 0, " & _
"[memo] nvarchar(250) NOT NULL DEFAULT 0, " & _
"primary key(taskid));"
Conn.Execute (sql)
sql = "CREATE TABLE aofax_recv_task (taskid AUTOINCREMENT (1,1) NOT NULL, title nvarchar(200) NOT NULL DEFAULT 0," & _
"ic nvarchar(200) NOT NULL DEFAULT 0,ldc integer NOT NULL DEFAULT 0, " & _
"fax nvarchar(64) NOT NULL DEFAULT 0, " & _
"sender1 nvarchar(100) NOT NULL DEFAULT 0, " & _
"sender2 nvarchar(30) NOT NULL DEFAULT 0, " & _
"receiver1 nvarchar(100) NOT NULL DEFAULT 0, " & _
"receiver2 nvarchar(30) NOT NULL DEFAULT 0, " & _
"faxfile nvarchar(250) NOT NULL DEFAULT 0, " & _
"page integer NOT NULL DEFAULT 0, " & _
"recvtime integer NOT NULL DEFAULT 0, " & _
"recvflag integer NOT NULL DEFAULT 0, " & _
"deviceid varchar(16) NOT NULL DEFAULT 0, " & _
"extinfo varchar(200) NOT NULL DEFAULT 0, " & _
"ext1 integer NOT NULL DEFAULT 0, " & _
"ext2 integer NOT NULL DEFAULT 0, " & _
"[memo] nvarchar(250) NOT NULL DEFAULT 0, " & _
"primary key(taskid));"
Conn.Execute (sql)
上面的代码可以实现自动建立ACCESS数据表，有一个问题 memo是Access的保留字段。执行完后，要把2个表的memo1字段 改为memo。[ 此留言被 dengni 修改过 ]
|
(无需注册即可发表)
留言本方式查看
