HadesLgc
|
PINDORAMA
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 02/05/2004 11:20 hs
tenta usar no modulo dim BD as Database no começo do seu modulo na primeira linha se for possivel e no formulario assim Dim TBcliente As Recordset ' na primeira linha tbm se possivel depois vá no menu project_references e selecione microsoft DAO abraços...
Um trabalho se justifica na medida em que ganha experiências e esforços permitindo que outros comecem por onde terminamos, pois a vida é curta demais para que possamos pesquisar e analizar a grande quantidade de informações dispersas em muitas fontes que não podemos consultar 
|
|
|
|
|
|
Nobus_000
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 02/05/2004 11:47 hs
o meu Microsoft DAO 3.51 Object Library está marcado em Preferences Rochª Coloquei no modulo o seguinte codigo Sub ABRIR_BD()
Global DB As Database
Set BD = OpenDatabase(App.Path & "\BANCODEDADOS.mdb")
End Sub quando executo ele dar o seguinte erro: Compile error:
Invalid attribute in Sub or Function quando debugo ele seleciona a palavra global dar o erro 91 e quando debugo ele seleciona a linha no form: Set TBcliente = bd.OpenRecordset("CLIENTE", dbOpenTable) |
|
|
|
Jose.Niz
|
CURITIBA
PR - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 02/05/2004 11:51 hs
Variáveis Globais e Publicas devem estar fora de funções e procedimentos e em módulos .bas, e devem estar definidas no topo do módulo logo após a linha Option Explicit. |
|
TÓPICO EDITADO
|
|
|
|
Nobus_000
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 02/05/2004 12:43 hs
Jose.NizFiz o que vc me indicou e parou de dar o erro do post anterior... ...mas ainda continua dando o erro 91 que eu expliquei logo no inicio dessa postagem. Se alguem pode me ajudar... serei grato! |
|
|
|
Vaughyman
|
RIO DE JANEIRO
RJ - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 02/05/2004 17:33 hs
Se a referencia do DAO 3.51 está marcada... Se a variavel está Publica ou Global na seção declarações... Se a variavel foi setada corretamente como descrito acima( Set BD = OpenDatabase(App.Path & "\BANCODEDADOS.mdb") e Set TBcliente = bd.OpenRecordset("CLIENTE", dbOpenTable) Se (suponho eu ) que vc está com seu VB atualizado (SP5)... Se a tabela "Cliente" existe no BD... então so pode ser Poltergeist!!! Todas as opções foram dadas aqui. Tenta usar o ADO para ver se da certo! |
|
|
|
Jose.Niz
|
CURITIBA
PR - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 02/05/2004 21:27 hs
Você ainda ta cometendo erros. O seu problema é pura falta de atenção ! Mova a linha Dim BD As Database do procedimento ABRIR_BD para um modulo .bas ! Ta uma confusão imensa, no seu penúltimo poste vc define DB e usa BD ! O seu problema é pura falta de atenção ! |
|
|
|
