Microsoft Ole Db Service Components Erro '80040e21'

[smez]

Microsoft OLE DB Service Components erro '80040e21'

Operação OLE DB de várias etapas gerou erros. Verifique cada valor de status OLE DB. Nada foi executado.

/atendimento/admin/abrebanco.asp, linha 26

Depois que eu instalei o windows vista, começou a dar esse erro

como eu posso resolver isso

[Guest Luciano Martins]

Amigos, o erro "Ole Db" ocorre devido a forma como o DB é aberto;

A solução que encontrei foi de utilizar ODBC para abrir o banco.

0bs: O banco que estou utilizando é o mysql

Veja o exemplo abaixo:

Set dbQwin = Server.CreateObject("ADODB.Connection")

'CONEXÕES COM DNS - **** Causa o erro de Ole Db ****

'dbQwin.ConnectionString = "dsn=DBanco;uid=login_usuario;pwd=sua_senha;" 'CONEXÃO

'dbQwin.Open

'CONEXÕES COM ODBC MySQL

dbQwin.Open "driver=MySQL ODBC 3.51 Driver;server=127.0.0.1;uid=login_usuario;pwd=sua_senha;database=nome_do_banco"

[webdeveloper]

Nesse site tem mais algumas conexões com o MySql http://www.connectionstrings.com/?carrier=mysql.

[Guest Aguinaldo]

a microsoft introduz um erro ao instalar o office de forma a que tenhamos que buscar a correção oferecida por ela no modico valor de 527 reais a ser pago com cartão de debito do bradesco, do itau ou do real.

então, se voce estiver usando um sistema original, com um ofice original, é só ir no google, colocar o codigo do erro - 80040e21 e ir para a pagina do msdn que depois de dizer que voce esta fazendo besteira, arremata pedindo para voce instalar um controle de conteudo em activex e para baixar um mdac atualizado pelo qual voce pagara a modica quantia de 527 reais.

vê. é facil resolver este erro.

é só não usar produtos microsoft originais de forma alguma.

assim voce não vende um programa que a microsoft introduzirá um defeito para faturar um graninha a mais.

[Guest Fabiano Ribeiro]

No Visual Basic 6

Esse erro -2147217887(80040e21) se da quando você vai inserir dados em campos....E algum campo não esta de acordo com o formato...

Tipo:

Dim Número as String

Número = 78 'Vai dar erro

Número ="78" 'Não irá dar erro

Percebe que "78" com aspas não dá erro....

Sugiro colocar essa função

Número = CString(78)

A função Cstring converte o 78(número) em "78"(string)

Lembre-se sempre de verificar esse detalhe...

Tem gente que viaja em falar que tem que pagar pra Microsoft e tal...

Aqui no Brasil....infelizmente não tem lei seca pra pirataria.....e pra político safado!!!!

Odeio Política.... :angry:

Boa sorte caro colega