我的程序是这样的:
Dim conn As New ADODB.Connection '定义连接数据库用到变量
Dim Connstr As String
Dim rs As New ADODB.Recordset
Dim m As Integer
Dim n As Integer
Dim strsql As String
Connstr = "PROVIDER = Microsoft.Jet.OLEDB.4.0;Data Source= " + App.Path + "\db.mdb;" conn.Open Connstr
rs.CursorLocation = adUseClientn = 5
m = 3
strsql = "insert into line (index, col, row) values('Text1.Text', 'n', 'm')"
conn.Execute strsql运行到conn.Execute strsql时出错,显示insert into 错误
请问正确的应该是怎样的啊?
Dim conn As New ADODB.Connection '定义连接数据库用到变量
Dim Connstr As String
Dim rs As New ADODB.Recordset
Dim m As Integer
Dim n As Integer
Dim strsql As String
Connstr = "PROVIDER = Microsoft.Jet.OLEDB.4.0;Data Source= " + App.Path + "\db.mdb;" conn.Open Connstr
rs.CursorLocation = adUseClientn = 5
m = 3
strsql = "insert into line (index, col, row) values('Text1.Text', 'n', 'm')"
conn.Execute strsql运行到conn.Execute strsql时出错,显示insert into 错误
请问正确的应该是怎样的啊?
'n', 'm'这样的会显示错误(数据类型不匹配)
strsql = "insert into line (index, col, row) values('1', '1', '1')"变量必须用
strsql = "insert into line(index, col, row) values('" & Text1.Text & "" & "', " & n & "," & m & ")"否则提示类型不匹配
正解
strsql = "insert into line(index, col, row) values('" & Text1.Text & "','" & n & "','" & m & "')"
strsql = "insert into line(index, col, row) values('" & Text1.Text & "'," & n & "," & m & ")"