怎样用ado访问一个.dbf表？

[binling]

1）数据源怎么建？仅是个dbf文件，我建的时候好像要求是什么vfp数据库（.dbc),
2）连接字符串怎么写？

[pyouxin]

Dim conn,Driver,SourceType,DBPath,rs
Set conn = Server.CreateObject("ADODB.Connection")
Driver = "Driver={Microsoft Visual FoxPro Driver};"
SourceType = "SourceType=DBF;"
DBPath = "SourceDB=c:\temp" '(.DBF)存放的目录
conn.Open Driver&SourceType&DBPath
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "select * from mydbf",conn,2,2
快给分

[binling]

别急，问题解决了少不了你的！！

[binling]

出错了，怎么回事呢
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'

[Microsoft][ODBC Visual FoxPro Driver]File g:\inetpub\superp\main\tiaoma.dbf is not a database.

/main/barcode.asp，行12

[binling]

我是用asp访问的。。。

[pyouxin]

其实不管DBF、DBC也好道理一样
DBF以现在的概念来讲不是标准的数据库只能算是数据表，DBC算是数据库访问代码分别很小；
[DBF]
SourceType = "SourceType=DBF;" '数据类型
DBPath = "SourceDB=c:\mydir" '存放目录
[DBC]
SourceType = "SourceType=DBC;" '数据类型
DBPath = "SourceDB=c:\mydir\mydbc.dbc" '数据库名

但有点遗憾只能访问本地目录的数据，即装IIS的电脑.

[binling]

谢谢你的解答，我还有一个问题
就是连接dbf文件时，好像必须要隔一段时间才能再次连接，如果马上刷新页面，则会出错，你遇到过吗

[pyouxin]

你有无看清楚出错信息:
File g:\inetpub\superp\main\tiaoma.dbf is not a database.
不是没有这个文件，就是这个文件不是database.
细心看出错信息.
以上代码我已成功使用多时，无问题.

[online]

www.ourfly.com文档中心

[binling]

pyouxin() 谢谢你的代码，我想你的代码是没问题的
问题在这个dbf文件。我用vfp建的时候选择的不是database而是table就成了
.dbf文件。如果我选择database,则是.dbc文件。

但用户给的就是dbf文件，是不是dbf不行啊