注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
却可以删除为什么
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
却可以删除为什么
下面的表的字段名[user]和系统的关键字重复了。
Trim(ss)和ss
你看看select from mlj1 where zdh='" & ss & "'"能不能返回记录,如果不能肯定不成功