VBA Access: Exportando registros para PARADOX

Exportando registros a partir de uma query do MS Office Access para o banco de dados Paradox. Como posso fazê-lo? Utilizo query com dados a partir do MS Office Excel (*.xls), mas hoje quero enviar dados de planilhas que conectei ao MS Access para uso com MS Excel
Let ReportName = "qrySample" Let ReportFilter = "RecordID = 1" Let ExcelPath = "/Bernardes/" & Session.SessionID & ".xls" Set MSAccess = Server.CreateObject("Access.Application") MSAccess.OpenCurrentDatabase Application("DB") MSAccess.DoCmd.SetWarnings False MSAccess.DoCmd.OpenReport ReportName, 2, , ReportFilter MSAccess.DoCmd.OutputTo 3, ReportName, "MicrosoftExcel(*.xls)", Server.MapPath(ExcelPath), False MSAccess.DoCmd.Close 3, ReportName, 2 MSAccess.DoCmd.SetWarnings True MSAccess.CloseCurrentDatabase MSAccess.Quit 2 Set MSAccess = Nothing
André Luiz Bernardes

Nenhum comentário:

Postar um comentário

diHITT - Notícias