当前位置:编程学习 > VB >>

vb调用DBF文件高手进!谢谢!

我有一个DBF文件,我想用vb做一个程序调用并修改它的内容谢谢!
追问:先说声谢谢

答案: 

以下代码打开 d:\dbf_path\dbf_file.dbf ,并将第一个记录的第一个字段的值改为"change_value"

vb.net 的代码:

imports system.data.odbc

 

dim strconn as string ="Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;" & _

                              "SourceDB=d:\dbf_path;Exclusive=No"

dim adp as odbcdataadapter

dim tbl as datatable = new datatable

dim conn as odbcconnection = new odbcconnection

conn.connectionstring = strconn

conn.open()

adp = new odbcdataadapter("select * from dbf_file", conn)

adp.fill(tbl)

 

tbl.rows(0).item(0) = "change value"

adp.update(tbl)

conn.close()

 

-------------------------------------

 

vb6 的方法类似,记不太清楚,需要引用 ms dao 2.5/3.51 compatibility library 或以上,并需要安装vfp 的驱动vfpodbc.msi

 

dim conn as adodb.connection

dim rs as adodb.recordset

dim strconn as string

strconn="Provider=MSDASQL.1;Persist Security Info=False;Data Source=dbf;Initial Catalog=D:\DBF_PATH"

conn.open strconn

rs.open "select * from dbf_file",conn,adopendynamic,adlockoptimistic

  '.... you code

rs.close

conn.close

set rs=nothing

set conn=nothing

那种软件需要很长时间才能做出来!你可以想想如果你在这里向别人要一个大型软件有没人会来帮你(比如你要别人编写一个360杀毒软件给你).

同意 问问团队いぁ ,不可能有人会帮你做这么大的一个工程,抱歉了.

上一个:VB中的Like运算符的问题2
下一个:vb 托盘的这个代码怎么写呢

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,