Use ASP to access various common type database (6)

Iii. List of procedures

' The following programs are written in VBScript

3 DBF file is not a standard database file, only corresponds to a data table in the standard database file, so in order to use DBF file, put all DBF files in a directory, so that the directory name as the standard Data database table, each DBF file corresponds to the standard database data table. In the following function directory is the directory name of DBF,

Function createdbfrecordset (directory name, DBF filename, or SELECT statement)

Dim Conn,driver,sourcetype,dbpath

' Create a Connection object
Set conn = Server.CreateObject ("ADODB. Connection ")
Driver = "Driver={microsoft Visual FoxPro Driver};"
SourceType = "SOURCETYPE=DBF;"
DBPath = "sourcedb=" & Server.MapPath ("Directory Name")

' Invoke the Open method to open the database
Conn. Open Driver & sourcetype & DBPath

Set Createdbfrecordset = Server.CreateObject ("ADODB. Recordset ")
' Open DBF file, parameter two is connection object
Createdbfrecordset.open DBF filename or SELECT statement, Conn, 2, 2

End Function