注ss为combo1的选项
dim  cnn As ADODB.Connection
dim  rs As ADODB.Recordset
Set cnn = New ADODB.Connection
cnn.Open "provider=sqloledb;dirver={sql server};server=10.63.12.5;database=czp", "sa", "1111"
cnn.Execute "delete from mlj1 where zdh='" & ss & "'"
以上方法无法删除记录

dim  cnn As ADODB.Connection
dim  rs As ADODB.Recordset
Set cnn = New ADODB.Connection
cnn.Open "provider=sqloledb;dirver={sql server};server=10.63.12.5;database=czp", "sa", "1111"
rs.Open "delete  from pass  where [user] =' " & Trim(ss) & " ' ", cnn, adOpenStatic, adLockOptimistic
却可以删除为什么

解决方案 »

  1.   

    是不是上面的表建外键了,因为外键的约束删除不了。而下面的表没有外键,就可啊。你看看先。
    下面的表的字段名[user]和系统的关键字重复了。
      

  2.   

    还有一个地方不同
    Trim(ss)和ss
      

  3.   

    嗯?字段不同
    你看看select from mlj1 where zdh='" & ss & "'"能不能返回记录,如果不能肯定不成功
      

  4.   

    试试加上cnn.CursorLocation =adUseClient
      

  5.   

    经实验yunfeng007老兄答案正确,请问yunfeng007老兄为什么sqlserver2000的数据库在服务器上而游标要用客户端有游标(我的sqlserver2000健在本机(win2k服务器版)上)回答完马上给分结贴