发信人: r_hayes(Hayes)
整理人: qcrsoft(2002-05-13 01:06:52), 站内信件
|
3)DBF文件不是一个标准的数据库文件，只相当于标准数据库文件中的一个数据表，所以为了使用DBF文件，采用把所有的DBF文件放在一个目录下，这样把目录名看成标准数据中的数据库表，每一个DBF文件相当于标准数据库的数据表。下面函数中Directory是DBF所在的目录名，
Function CreateDbfRecordset( 目录名, DBF文件名或Select语句 )
Dim conn,Driver,SourceType,DBPath
’ 建立Connection 对象
Set conn = Server.CreateObject("ADODB.Connection")
Driver = "Driver={Microsoft Visual FoxPro Driver};"
SourceType = "SourceType=DBF;"
DBPath = "SourceDB=" & Server.MapPath( "目录名" )
’ 调用Open 方法打开数据库
conn.Open Driver & SourceType & DBPath
Set CreateDbfRecordset = Server.CreateObject("ADODB.Recordset")
’ 打开DBF文件，参数二为Connection对象
CreateDbfRecordset.Open DBF文件名或Select语句, conn, 2, 2
End Function
----
灌灌
灌灌
灌灌
灌灌 灌灌
灌灌 灌灌灌
灌灌灌灌灌灌灌 灌灌 灌灌灌
灌灌灌灌灌灌灌灌灌灌灌灌
灌灌灌灌灌灌
灌灌灌灌灌灌灌
灌灌 灌灌 灌灌
灌灌 灌灌 灌灌
灌灌 灌灌 灌灌
灌灌 灌灌 灌灌灌
灌灌 灌灌 灌灌灌灌
灌灌 灌灌 灌灌灌灌灌
灌灌 灌灌 灌灌灌灌灌
灌灌 灌灌 灌灌
灌灌灌灌
灌灌灌
灌 |
|