为什么执行数据库会出错?
我在连接access数据库,定义了sqlext函数连接,但我引用sqlext函数就会出错,提示说语法错误(操作符丢失)在表达式中
帮我看看sqlext函数错在哪里?怎么改?麻烦各位了.
Public Sub sqlext(ByVal strsqlstmt As String) '执行数据库操作
Dim cmd As New ADODB.Command
connect
Set cmd.ActiveConnection = cnn
cmd.CommandText = strsqlstmt
cmd.Execute
Set cmd = Nothing
disconnect
End Sub
[解决办法]
strsql2 = "insert into 船舶申请表(表名,日期,船名,总吨,船舶类型,基本费用,货物名称,货物数量,航线名称)"
strsql2 = strsql2 & "values('" & Text1.Text & "',"
strsql2 = strsql2 & date1.Value & ",'" 从这里看,你少一个了以个‘’号
修改strsql2 = strsql2 & "values('" & Text1.Text & "',‘"