50分求一vb对vfp操作的例子

Question

包括，连接vfp，读取，删除，修改，增加vfp中的数据，
请高手发个能运行的例子到我信箱[email protected]
符合要求立马给分，拜托了

Answer 1

连接Public Cnndbf As New ADODB.Connectiondbf = "Data Source=Visual FoxPro Tables;Initial Catalog=" & App.Path & "\data.dbf;" & _
    "Persist Security Info=False"
Cnndbf.Open dbf
读取，删除，修改，增加vfp中的数据
和vb 对sql server 一样
字符型 插入 '" & string & "'
数值型 插入 " & int & "

Answer 2

我是个初学者刚好遇到与楼主一样的问题，如果解决的话，请楼主跟贴过来下，或者发邮件给我。[email protected]谢了，顶！

Answer 3

'处理VFP数据表的例子,假设有VFP数据库: c:\a.dbf
'不明白再问.Sub test()
    Dim iDb As New ADODB.Connection
    Dim iRe As New ADODB.Recordset    '打开数据库
    iDb.Open "Provider=MSDASQL.1;Persist Security Info=False;Extended Properties=""DSN=Visual FoxPro Database;UID=;SourceDB=c:\;SourceType=DBF;Exclusive=No;BackgroundFetch=Yes;Collate=Machine;Null=Yes;Deleted=Yes;"""    '打开处理的表
    iRe2.Open "select * from a1", iDb, adOpenKeyset, adLockOptimistic
    
    '读取记录    
    While Not iRe.EOF
        debug.print ire(0)
        iRe.MoveNext
    Wend
    
    '新增记录
    with iRe
        .addnew
        .fields("字段名")=值
        .update
    end with   '删除记录
   ire.filter="id=1"
   ire.delete
   
   '修改记录 
   ire.filter="id=2"
   ire.fileds("字段名")=新值
   ire.update    '关闭打开的表及数据
    iRe.Close
    iDb.Close   
End Sub

Answer 4

各位大虾，请问如何将listview的表格线和数据一起打印出来？？