求高手解答~附源码~解决方法
求高手解答~附源码~
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
代码如上图，这是注册代码~其中（ " & Trim(Text5.Text) & "）那里ACCESS表里为数值型，其他都为文本型。
现在错误主要显示在写进语句那，提示insert into语法错误~现在主要情况就是写不进去数据。
求高手解答~
------解决方案--------------------
debug.print sql1
------解决方案--------------------
你不是说Insert Into有问题吗？
那你就找Insert Into的语法规则啊。
------解决方案--------------------
加上这句试试，在打开连接之前
Cn.CursorLocation = adUseClient
cn.open "你的连接语句...................."
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
代码如上图，这是注册代码~其中（ " & Trim(Text5.Text) & "）那里ACCESS表里为数值型，其他都为文本型。
现在错误主要显示在写进语句那，提示insert into语法错误~现在主要情况就是写不进去数据。
求高手解答~
------解决方案--------------------
debug.print sql1
------解决方案--------------------
你不是说Insert Into有问题吗？
那你就找Insert Into的语法规则啊。
------解决方案--------------------
加上这句试试，在打开连接之前
Cn.CursorLocation = adUseClient
cn.open "你的连接语句...................."