Temos pavadinimas: WordPress, Shopify ir PHPFusion programuotojų bendruomenė :: Dbase funkcijos keitimas

Parašė Peacemaker· 2009 Rugs. 26 19:09:31
#2

Gal tiks?

<SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT>
  'Sets the content type
  Response.ContentType = "application/vnd.ms-excel"
  '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 "Orders", "DSN=ADOSamples"

  'Write DBF file to the client
  Response.BinaryWrite DBF.GetFile(ADORS)
 
  'Close recordset
  ADORS.Close
</SCRIPT>