我这句update怎么错了呢?
Dim u As String
u = Text1.Text
Dim s As String
s = Text2.Text
Dim conn As ADODB.Connection
Dim rs As New ADODB.Recordset
Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "/member.mdb"
rs.Open "Update member SET user_name=" & u & ",start_time=" & s & " WHERE id = '" & Text4.Text & "'", conn, adOpenDynamic, adLockOptimistic
至少一个参数没有被制定值,但是u,s都定义了。
问题点数:20、回复次数:4Top
1 楼unkowme(小不懂)回复于 2005-02-26 18:21:57 得分 8
user_name,start_time是字符型的吧,改成:
rs.Open "Update member SET user_name='" & u & "',start_time='" & s & "' WHERE id = '" & Text4.Text & "'", conn, adOpenDynamic, adLockOptimisticTop
2 楼w3k(网络3K)回复于 2005-02-26 18:26:57 得分 8
rs.Open "Update member SET user_name=" & u & ",start_time=" & s & " WHERE id = '" & Text4.Text & "'", conn, adOpenDynamic, adLockOptimistic
____________________________________________________________________________________
user_name,start_time 字符型前面应该加单引号'
_________________________________
rs.Open "Update member SET user_name='" & u & "',start_time='" & s & "' WHERE id = '" & Text4.Text & "'", conn, adOpenDynamic, adLockOptimisticTop
3 楼bailang20(白浪)回复于 2005-02-26 18:33:55 得分 2
rs.Open "Update member SET user_name='" & u & "',start_time='" & s & "' WHERE id = '" & Text4.Text & "'", conn, adOpenDynamic, adLockOptimistic
哈這問題我以前也碰到過.Top
4 楼liuguozhong(bushliu)回复于 2005-02-26 18:56:34 得分 2
字符型前面应该加单引号'Top




