Jump to content
Fórum Script Brasil
  • 0

Microsoft Ole Db Service Components Erro '80040e21'


smez
 Share

Question

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

Link to comment
Share on other sites

4 answers to this question

Recommended Posts

  • 0
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"

Link to comment
Share on other sites

  • 0
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.

Link to comment
Share on other sites

  • 0
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

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share



  • Forum Statistics

    • Total Topics
      150.1k
    • Total Posts
      647.1k
×
×
  • Create New...