Algumas técnicas interessantes de importação e exportação de dados usando apenas comandos SQL

================================================================================================ MS ACCESS + DAO ================================================================================================ // Importando uma tabela DBF para o banco de dados Access SELECT Codop as Codigo, Descop as Descricao, Unid1 as Unidade  INTO Operacoes FROM [dBase III;DATABASE=C:\\caf].[oper.dbf]'; // Exportando uma tabela para DBF usando o DAO SELECT * INTO NOVATABELA IN 'c:\\temp' 'dBase III;' FROM empresas // Exportando uma tabela para DBF usando o DAO Select * INTO [dBase III;database=C:\\TEMP\\].NOVATABELA  FROM Empresas ================================================================================================ SQL SERVER ================================================================================================ // Acessando Tabelas MSAccess no SQL Server SELECT *  FROM OPENROWSET('Microsoft.Jet.OLEDB.4.0','d:\\asp\\cadastro.mdb';'admin';'password',EMPRESAS) // Inserindo os dados de uma tabela do access no SQL Server SELECT * INTO NOVATABELA FROM OPENROWSET('Microsoft.Jet.OLEDB.4.0','d:\\asp\\cadastro.mdb';'admin';'',EMPRESAS) // Acessando DBF no SQL Server ODBC select *  from OPENROWSET('MSDASQL','Driver={Microsoft dBASE Driver (*.dbf)}; DefaultDir=d:\\asp\\; SourceType=DBF','select * from empresas') // Inserindo os dados de uma tabela do DBF no SQL Server SELECT * INTO NOVATABELA FROM OPENROWSET('MSDASQL','Driver={Microsoft dBASE Driver (*.dbf)}; DefaultDir=d:\\asp\\; SourceType=DBF','select * from empresas') // Acessando DBF no SQL Server (outro driver) select *  from OPENROWSET('MSDASQL','Driver={Microsoft dBASE Driver (*.dbf)}; DefaultDir=d:\\asp\\; SourceType=DBF','select * from empresas') // Inserindo os dados de uma tabela do DBF no SQL Server (outro driver) SELECT * INTO NOVATABELA FROM OPENROWSET('MSDASQL','Driver={Microsoft dBASE Driver (*.dbf)}; DefaultDir=d:\\asp\\; SourceType=DBF','select * from empresas') ================================================================================================ ASP ================================================================================================ Exportando uma tabela Access para DBF 1a forma   Set cnn=Server.CreateObject("ADODB.Connection")   strSQL = "Select * INTO [dBase III;database=C:\\temp\\].aden FROM Empresas"   Cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\\ASP\\cadastro.mdb;"   cnn.Execute strSQL, intRecsAffected, adCmdText   cnn.Close   Set cnn = Nothing 2a forma   Set cnn=Server.CreateObject("ADODB.Connection")   strSQL = "SELECT * INTO NOVATABELA IN 'c:\\temp' 'dBase III;' FROM empresas"   Cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\\ASP\\cadastro.mdb;"   cnn.Execute strSQL, intRecsAffected, adCmdText   cnn.Close   Set cnn = Nothing Importando uma tabela DBF para um arquivo Access   Set cnn=Server.CreateObject("ADODB.Connection")   strSQL = "SELECT * INTO NovaTabela FROM [dBase III;DATABASE=C:\\TEMP].[EMPRESAS.DBF]';"   Cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\\ASP\\cadastro.mdb;"   cnn.Execute strSQL, intRecsAffected, adCmdText   cnn.Close   Set cnn = Nothing

Quebra-Linha

Colaborador..: Adenilton Rodrigues
Categoria(s).: Delphi; Banco de Dados; Access; ASP;
Data.........: 09/09/2002 12:59:12
Visualizado..: 15134 vezes
Fonte........: AdeN Knowledge DB