MOTOBIT.COM - ASP upload, IIS utility GetFile Method of DBF class

Method | Member of  RSConvert.DBF | Changes | Purchase | Download


Retrieves the recordset as a binary DBF data.


vGetFile = DBF.GetFile (RS as Variant, [TableName as String], [FieldsFormat as Array])

Where Type Optional Default Description
 RS  Variant     ADO or DAO recordset to save 
 TableName  String  yes    File name (table name) for temporary table. 
 FieldsFormat  Array  yes    Format of field as array (see remarks on RSConvert.DBF.SaveRS


Binary safe array


Send database table as DBF

  'Sets the content type
  Response.ContentType = "application/x-msdownload"
  'Specify filename for download
  Response.AddHeader "Content-Disposition", "attachment;filename=Orders.DBF"
  'Create Recordset and DBF objects
  Set ADORS = CreateObject("ADODB.Recordset")
  Set DBF = CreateObject("RSConvert.DBF")
  'Open table
  ADORS.Open "Customers", "DSN=ADOSamples"
  'Write DBF file to the client
  Response.BinaryWrite DBF.GetFile(ADORS)
  'Close recordset

Define exact DBF output format

Sub SimpleDBFTest()
  '1. Create simple recordset.

  Const adDate = 7
  Const adSingle = 4
  Dim RS: Set RS = CreateObject("ADODB.Recordset")
  RS.Fields.Append "Date", adDate
  RS.Fields.Append "Single", adSingle
  AddDate RS, #1/1/1900#, 568.256
  AddDate RS, #1/1/1950#, 235.28
  AddDate RS, #1/1/1990#, 18.34
  AddDate RS, #1/1/1999#, 1234.58
  AddDate RS, #1/1/2000#, 1.25
  AddDate RS, #1/1/2020#, 4568.598
  AddDate RS, #1/1/2200#, 458774.23

  Dim dbf 'As RSConvert.dbf
  '2. Create DBF object
  Set dbf = CreateObject("RSConvert.DBF")
  '3. get DBF as binary contents.
  Dim BinaryContents
  BinaryContents = dbf.GetFile(RS, , Array("DateField", "D", Empty, Empty, "NumField", "N", 4, 1))
  '4. Send the file to the client.
  Response.BinaryWrite BinaryContents


End Sub

Sub AddDate(ByRef RS, ByVal D, N)
  RS("Date") = D
  RS("Single") = N
End Sub

Other links for GetFile

Methods of DBF class

GetFile, SaveRS

Properties of DBF class

Compress, CurrencyDecimal, CurrencyWidth, DoubleDecimal, DoubleWidth, IntegerWidth, LongVarCharWidth, RowCount, SingleDecimal, SingleWidth, TempDirectory


Object for converting DAO or ADO recordset to the DBF file. It enables direct output of DBF files from the ASP page.


      Recordset converter is a library for converting DAO or ADO recordsets to MDB or DBF files. It enables direct binary output of MDB or DBF files from ASP pages with one row of code. The object also supports on-the-fly compression by zip/arj.

© 1996 - 2009 Antonin Foller, Motobit Software | About, Contacts | e-mail: