删除access数据解决方法

删除access数据
access 数据库BSS中的字节“序号”为文本
数据内容: 第1行 wwwww
  第2行 00000
  第3行 111
  第4行  
  第5行 321  
 
下列两个方法都是删除非正常数值数据，方法判断val（序号）=0，但都出错
方法一：  
  Dim conn As ADODB.Connection
  Dim rs As ADODB.Recordset

Set conn = New ADODB.Connection
  Set rs = New ADODB.Recordset
  conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\111\bss.mdb; Persist Security Info=False"
  conn.Open
  rs.Open "select * from aaa where val(序号)=0", conn, adOpenKeyset, adLockOptimistic
  rs.Delete
  rs.Update
  MsgBox "删除成功！"
   
  rs.Close
  conn.Close

方法二：
 Dim adocn As New ADODB.Connection

adocn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\111\bss.mdb; Persist Security Info=False"
adocn.Open

adocn.Execute "delete from aaa where val(序号)=0 "
 adocn.Close
 Set adocn = Nothing


[解决办法]
http://download.csdn.net/detail/veron_04/1498324
http://download.csdn.net/detail/veron_04/1644211
[解决办法]
试试下面：
"delete aaa.* from aaa where not isnumeric([序号])"

[解决办法]
"select * from aaa where val(序号)=0"

对于vb这只是个字符串, 对于SQL, 它不认识val

方法1和2没啥分别
[解决办法]

SQL code

delete from aaa where not isnumeric(序号)或delete from aaa where isnumeric(序号)=false