利用ASP存取各种常用类型数据库(6)

三、程序清单

以下程序用vbscript编写

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