Erro Conexão Adodb em versão Inferior ao Win7

[Odir Monteiro Arceno 0]

Pessoal,

 

Estou queimando pestana com esta conexão, no Win7 Roda redondinho porem no WinXP dá a seguinte mensagem:"Nenhum valor foi fornecido para um ou mais parâmetros necessários." já tentei colocar as dlls na instalação do projeto e nada.

 

Abaixo o codigo:

 

        Dim path As String

       path = Application.StartupPath
       Dim conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=#####; Data Source=" & path & "\toppontorep.mdb")
       Dim cmd As New OleDbCommand("INSERT INTO [funcionarios.CODFUNC, funcionarios.NOME, funcionarios.CARTEIRA, funcionarios.MATRICULA, funcionarios.DTADMISSAO, funcionarios.dtdemissao, funcionarios.codcargo, funcionarios.CODDEPTO, funcionarios.IDEXPORTACAO, funcionarios.PIS] SELECT CODFUNC, NOME, CARTEIRA, MATRICULA, DTADMISSAO, dtdemissao, codcargo, CODDEPTO, IDEXPORTACAO, PIS  FROM [Text;Database=" & path & "].[importa.csv]", conn)

       conn.Open()

       cmd.ExecuteNonQuery()

       conn.Close()
       MsgBox("Importação Realizada com sucesso!", MsgBoxStyle.OkOnly, "Importação de Arquivos")

 

Um abraço a todos!

[quintelab 91]

O erro é de conexão ou no momento de executar o insert?

Coloque seu insert em uma variável string e pegue o valor dele e teste direto no banco.

 

Abraços...

[Odir Monteiro Arceno 0]

Tentei colocar em uma variável, mas não deu certo. direto no db tambem não rola a query, pois ela captura informações direto do TXT. Eu compilo o programa no Seven e rola em qualquer maquina com esse SO, mas quando tento rolar no XP nada feito, fica informando que "nenhum valor foi fornecido para um ou mais parametros necessarios". Creio que vou acabar endo que ler o txt, jogar em uma matriz e laçar no mdb, mas pensava em usar esta funcionalidade do adodb que é bem mais pratica.

[tiagokv 0]

Você tá compilando com o Win7 SP1? Tem uma incompatibilidade da ADODB do win7 sp1 com o XP, da uma olhada nisso...

[Odir Monteiro Arceno 0]

è sim o SP1, tem como burlar isso?