ADO中的update语句不生效？帮帮我！！！

Question

Dim mycon As ADODB.Connection
Set mycon = New ADODB.Connection
mycon.ConnectionString = connstring
mycon.Opensql="update use set password='aaa' where username='sss'"
mycon.Execute sql执行后，没有错误提示，但不起作用。password还是原来的值？怎么办？

Answer 1

aaa与sss是变量名还是实际值，如果是实际值应该写成sql="update use set password=aaa where username=sss"
，还有你的连接字符串是不是设置正确？

Answer 2

sql语句无问题，看看你的连接字符串吧！

Answer 3

connstring = "provider=Microsoft.Jet.OLEDB.4.0;Data source =" & App.Path & "/xs.mdb"
sql = "update use set password='" & Trim(Me.newpass) & "' where username=" & username & "'"username 是变量，newpass 是文本框

Answer 4

你的错误就在mycon.ConnectionString = connstring上。
你连接错了。
如果你不知道的话，就添加一个 adodc 控件。生成的字符串你拷贝下来。
看看你的 connstring 这个变量是否正确。
大概如下：
connstring = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\数据库\main.mdb;Persist Security Info=False"
mycon.ConnectionString = connstring
其中 （ F:\数据库\main.mdb ）为你数据库的绝对路径。

Answer 5

你的SQL字符串中Trim(Me.newpass)
好像应该写成me.newpass.text

Answer 6

还有where username=" 
应该写成
where username='"