谁能看一下这个sql 语句什么地方错了，在线等￥￥￥￥￥￥￥￥

[geshiziji]

DbName = "SETS.mdb"
ConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\" & DbName
Cat.Create ConnString

G_sql = "create table ks(bmh char(13) not null,kmd char(6) default null,kc char(3) not null,jb tinyint(1) unsigned not null default '3',xm char(24) binary not null default '',sfzh char(18) not null default '',xb tinyint(1) unsigned NOT NULL default '0'," & _
"whch tinyint(1) unsigned NOT NULL default '4',mz tinyint(2) unsigned NOT NULL default '1', zy tinyint(2) unsigned NOT NULL default '30', ksmd tinyint(1) unsigned default '0',ds char(2) NOT NULL default '',qx char(4) NOT NULL default '',primarykey(bmh))"
Cn.Open ConnString
Rs.Open G_sql, Cn, adOpenKeyset, adLockReadOnly, adCmdText
提示 “create table” 错误

[cosio]

access与sql server的SQL语法是不一样的
kmd char(6) default null,SQL认这个语法有问题！

[xiaoxiaoP]

access与sql server的数据类型不一样，你连接的是access，没有char、tinyint（sql server支持）等数据类型，access有text,long,short等

[junki]

在ADOX方式下创建Access数据库：

Dim cat As New ADOX.Catalog
Dim tbl As ADOX.Table

ConnSysDBStr="PROVIDER=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:System database=SYSTEM.MDW;Data Source=" & SysDBPath & SysDBName
cat.Create ConnSysDBStr

Set tbl = New ADOX.Table
tbl.Name = "PROFILE"
With tbl.Columns
.Append "PROFID", ADOX.adSmallInt
.Append "DESCRIPTION", ADOX.adVarWChar, 50
End With
cat.Tables.Append tbl

Set cat = Nothing
Set tbl = Nothing

[victorycyz]

access与sql server的SQL语法是不一样的，不要混用。

[jam021]

关注,帮你顶!

[常遇道]

语法错误

[fly_higher]

同意楼上~