|
|
Postada em 13/08/2010 09:36 hs
Para o "TREZE" E O "ANDRE FELIPE". Fiz um teste na qual Felipe revela onde esta dando.O erro
esta acontecendo não é no "REGISTRO=" & TXTNUMEROREGISTRO.TEXT".
E sim na abertura.Não sei dizer porque esta acontecendo.Fiz do
mesmo jeito que o Felipe fez e esta dando erro.Porém tive uma idéia. Abri um novo projeto,fiz a referência da "DAO" e peguei o mesmo
código e colquei.O que aconteceu?Sem nenhum erro.Porque?Não sei.
Pode não não acreditar "Treze" mas foi o que aconteceu aki comigo. Então "Felipe",faça este teste ai.Crie um no projeto faz a referência
e coloque o mesmo codigo e depois nos diga o que aconteceu. Se continuar dando "Zebra" somente caras mais experientes como o "Treze"
e outros para solucionar este problemas. Valeu |
|
|
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
Postada em 13/08/2010 10:31 hs
colega aqui não acontece erro nenhum, o procedimento que o felipe havia passado estava correto, mas as vezes inelismente nem nós teremos respostas para certos problemas, o que vc deve analizar é o seguinte: se no seu código anterior vc fazia referênca a outros objetos, os quais poderiam causar o erro, e até mesmo se vc possui o SP6 do visual basic, o qual muitos erros do sp5 ou sp4 já foi corrigido, e muitos outras situações, outra coisa comece a utilizar ADO abandone o DAO.
|
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 13/08/2010 10:37 hs
andré agora acabei de verificar a sua resposta no outro tópico, o problema na mudança do windows 7 para Xp e 98 é que o framework do 7 é diferente dos demais.ainda mais co uma ferramenta já abandonada pela microsoft que é o DAO
|
|
|
|
|
|
Postada em 14/08/2010 18:45 hs
Bem "Fausto" depois de muita dor de cabeça, trocando ideia com umas pessoas aqui e outras ali, consultado forums da microsoft e mais alguns livros.(foi suado em), consegui resolver o meu problema, primeiro descobri que eu estava misturando DAO com ADO,depois consegui resolver, ai é que tá o pior (vieram outros erros, e mais dores de cabeça), entao descobri que ao declarar minhas variaveis de conexao com o meu banco de dados eu fazia desta forma:
dim bancodedados as adodb.conection
dim banco as recordset
sendo que deveria fazer assim
dim cnn as adodb.conection
dim rs as adodb.recordset
so ai ja da pra ter uma ideia da tamanha dificuldade em corrigir.
em relaçao as plataformas(xp,98,7),so nao consegui rodar no windows seven pois nao tenho nenhuma maquina em casa com este sistema, mais no 98 e XP deu boa.
entao meus amigos ai vai toda a rotina para vcs darem uma olhada como ficou.
Public cnn As ADODB.Connection
Public rs As ADODB.Recordset
Private Sub cmdvalidaregistro_Click()
If rs.State = 1 Then rs.Close
rs.Open "select nome from funcionario where registro='" & txtnumeroregistro.Text & "'", cnn, adOpenStatic
If rs.RecordCount = 0 Then
MsgBox "funcionario nao encontrado"
txtnome.Text = ""
Else
txtnome.Text = rs("nome")
End If
End Sub
Private Sub Form_load()
Set cnn = New ADODB.Connection
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
cnn.Open "provider=microsoft.jet.oledb.3.51;data source=" & App.Path & "/funcionario.mdb;"
End Sub
Private Sub Form_Unload(Cancel As Integer)
rs.Close
Set rs = Nothing
cnn.Close
Set cnn = Nothing
End Sub
Private Sub txtnumeroregistro_KeyPress(KeyAscii As Integer)
If InStr(1, "1234567890," & Chr(8), Chr(KeyAscii)) = 0 Then KeyAscii = 0
End Sub
beleza pessoal  ta funcionando direitinho nas minhas maquinas,
obrigado pela ajuda de todos.
|
|
|
|
|
|
Postada em 14/08/2010 21:20 hs
Andre,estava dando para perceber que estava usando "DAO".O Ado
é bem melhor que o "DAO".Apesar de ser mais rápido em pequenas
aplicações.Se tu tiveste falado que estava usando "ADO" seu
problema ja estava resolvido há muito tempo.Mas é bom,são com os
erros que aprendemos.Cara ca pra nos;abandone "Access".Access é
só para testes.Bancos bons,"ORACLE 10G,MYSQL,SEQLEXPRESS 2005 E 2008,
FIREBIRD E OUTROS".
No mais.
Valeu |
|
|
|
|
|
Postada em 16/08/2010 22:00 hs
fausto acontece que estou aprendendo programaçao principalmente vb6.0 que foi a plataforma que eu mais me identifiquei, mas concerteza tenho um grande interesse em apreder, "oracle 10g, mysql, sql, firebird e etc.
mas acontece que ainda nao faço a minima ideia como trabalhar com essas ferramentas, ja ate dei uma olhada meio por cima mais nada muito complexo ate por que estou usando um micro muito franco, minha intenção é até passar para uma plataforma .net.
e vc sabe aprender sozinho é muito dificil de compreender programação que nao é nada facil, principalmente para nos(eu) que somos iniciantes, e as vezes nos deparamos com erros que nao fazemos a minima ideia do que se trata.
vlw
brigadao pela ajuda.
|
|
|
|
|
