代码太长，分段出现错误，请大侠指点

jiangdong110

1. SQL = "update contract set ID='" & Me.TextBox1 & "',Risk='" & Me.ComboBox1 & "',Company='" & Me.TextBox3 & "'" _
   
2. & "Con_Amount='" & Me.TextBox5 & "',Con_Amount(USD)='" & Me.TextBox6 & "',Eff_Date='" & Me.DTPicker1 & "',Exp_Date='" & Me.DTPicker2 & "'" _
   
3. & "Proper_App='" & Me.CheckBox1 & "',Sig_Block='" & Me.CheckBox2 & "',Hold_Harmless='" & Me.CheckBox3 & "',Notice_Term='" & Me.ComboBox2 & "'" _
   
4. & "Insurance_Req ='" & Me.CheckBox4 & "',DevForm_Su='" & Me.CheckBox5 & "',DevFrom_App='" & Me.CheckBox6 & "',Oth_Remark = '" & Me.TextBox7 & "' where Con_Name='" & Me.TextBox2 & "'"
   
5. RST.Open SQL, cnn, adOpenKeyset, adLockOptimistic

复制代码

Renco

RST.Open SQL, cnn, adOpenKeyset, adLockOptimistic
的这一句前面上一行加一句
debug.print  SQL

然后看【立即窗口】，显示出来的这个SQL语句，自已查找吧

jiangdong110

Renco 发表于 2014-7-10 22:37
RST.Open SQL, cnn, adOpenKeyset, adLockOptimistic
的这一句前面上一行加一句
debug.print  SQL

我知道在哪里错了，就是分段的地方也必须有一个逗号隔开的，但是我不知道怎么弄！

老水牛

jiangdong110 发表于 2014-7-11 08:50
我知道在哪里错了，就是分段的地方也必须有一个逗号隔开的，但是我不知道怎么弄！

不是分段的地方要用逗号分隔，是你每个字段之间要用逗号隔开。

例如第一行:

1. 01.SQL = "update contract set ID='" & Me.TextBox1 & "',Risk='" & Me.ComboBox1 & "',Company='" & Me.TextBox3 & "'," _

复制代码

jiangdong110

老水牛 发表于 2014-7-11 09:55
不是分段的地方要用逗号分隔，是你每个字段之间要用逗号隔开。

例如第一行:

我知道，要加逗号，但是里面有textbox的话好像不是跟正常一样分段的，正常的分段我会的！

老水牛

jiangdong110 发表于 2014-7-11 10:18
我知道，要加逗号，但是里面有textbox的话好像不是跟正常一样分段的，正常的分段我会的！

那就很抱歉了，对这个我到没研究。

一般我写程序的习惯，都是定义多个变量，把文本框的值赋值给变量，在SQL里只要引用变量即可。

jiangdong110

老水牛 发表于 2014-7-11 13:21
那就很抱歉了，对这个我到没研究。

一般我写程序的习惯，都是定义多个变量，把文本框的值赋值给变量， ...

文本框太多了，要十几个变量！