update 错在哪了？－－新手

Question

你应该把整个update写到""里，构成sql语句，然后赋值给ado控件的属性

Answer 1

Update base _
& " Set jineng = Me.Text6.Text,.........Text3.Text," _
 & " kao_jibe=me.Text4.Text,.......classname=me.Text9.Text"
-------------
同意楼上的，不然系统将会把Update base当做函数名，" Set jineng = Me.Text6.Text,.........Text3.Text," _
 & " kao_jibe=me.Text4.Text,.......classname=me.Text9.Text"
当做参数

Answer 2

cn.excute "update kkk set 字段=....."

Answer 3

好象问过了吔 ^_^Dim strSql As String
strSql = _
  "UPDATE xsdahhb" & _
  "SET" & vbCrLf & _
  "  NAME    ='" + Trim(Text1.Text) + "'," & vbCrLf & _
  "  XINGBIE ='" + Trim(Text2.Text) + "'," & vbCrLf & _
  "  AGE     ='" + Trim(Text3.Text) + "'," & vbCrLf & _
  "  BRIDAY  ='" + Trim(Text4.Text) + "'," & vbCrLf & _
  "  ADDR    ='" + Trim(Text5.Text) + "'," & vbCrLf & _
  "  TEL     ='" + Trim(Text6.Text) + "'," & vbCrLf & _
  "  SUB     ='" + Trim(Text7.Text) + "',"
  "  CLASS   ='" + Trim(Text8.Text) + "'," & vbCrLf & _
  "  ZHIWU   ='" + Trim(Text9.Text) + "' " & vbCrLf & _
  "WHERE NAME='" + Trim(Text0.Text) & "'"
cn.Excute strSql

Answer 4

dim sql as string
 sql="Update base _
   & " Set jineng = Me.Text6.Text,.........Text3.Text," _
   & " kao_jibe=me.Text4.Text,.......classname=me.Text9.Text"
gcn.execute(sql)
为什么提示我　至少一个参数没有赋值。

Answer 5

这是因为数据库表至少有一个不允许为NULL的字段没有赋值
所以你要在UPDATE语句中为它提供值