请问怎么才能用VB真正删除一张.dbf表中的所有记录

Question

我是这么写的,但是执行完以后只是给所有记录打了一个删除标记. 没有真正删除记录,请高手指点.
Dim conn As New ADODB.Connection
Dim rs  As New ADODB.Recordset
Dim lngTemp As LongPrivate Sub Form_Load()
    conn.ConnectionString = "provider=msdasql;DRIVER=Microsoft Visual FoxPro Driver;UID=;Deleted=yes;Null=no;Collate=Machine;BackgroundFetch=no;Exclusive=No;SourceType=DBF;SourceDB=C:\Documents and Settings\Administrator\桌面\就业计划\DBF\XXQ;"
    
    conn.Open    If rs.State = adStateOpen Then rs.Close  
        rs.Open " select * from  jyjh", conn, 1, 3
'删除
    While rs.EOF = False
        rs.Delete
        rs.MoveNext
    Wend
    conn.Close
    Set conn = Nothing
End Sub

Answer 1

不说别的，楼主的方法有点问题你可以直接调用"delete from jyjh",为什么要一条一条的删除？

Answer 2

Fox中要用ZAP才能真正物理删除

Answer 3

delete  from  jyjh  会报错的.

Answer 4

在VB 中如何调用fox 中的PACK呢?

Answer 5

//在VB 中如何调用fox 中的PACK呢?
做不到,PACK是Foxpro的命令，VB不可能调用的

Answer 6

没办法，参考：
http://www.china-askpro.com/msg1/qa52.shtml