INICIANTE EM VB 6! COMO ACESSAR O ACCESS 2003...
NÃO CONSIGO ACESSAR O ACCESS 2003 ATRAVES DO VB 6.0. APARECE UMA MENSAGEM DIZENDO QUE NÃO RECONHECE O FORMATO. O QUE FAZER?
Pode ser necessário fazer a conversão
oq vc está usando ADO ou DAO?
até mais...
até mais...
Pessoal mostra como que faz z conexão via DAO, pra acessa o Access 2003.
primeiro va em Projeto/Referencias e clique na referencia MIcrosoft DAO
sub Banco
dim Db as database
dim Rd as recordset
dim sql as string
set db = opendatabase("c:\BD\VB.mdb")
sql = "select * from [Tb_Socios]"
set rd = db.openrecordset(sql)
do while not(rd.eof)
List1.Additem rd("Nome")
rd.movenext
loop
db.close
rd.close
end sub
Até mais...
sub Banco
dim Db as database
dim Rd as recordset
dim sql as string
set db = opendatabase("c:\BD\VB.mdb")
sql = "select * from [Tb_Socios]"
set rd = db.openrecordset(sql)
do while not(rd.eof)
List1.Additem rd("Nome")
rd.movenext
loop
db.close
rd.close
end sub
Até mais...
Você também pode usar o componente DATA que é mais simples, mas eu acho mais fácil trabalhar como o Trovam especificou.... Fica a seu critério!
Respostas esclarecedoras, não?
Bom, é assim:
- O Vb6 só vinha preparado de origem para trabalhar com bases de dados access(MDBs) até à  versão 97
- Posteriormente sairam SPs que permitem trabalhar com as versões posteriores
Se tem instalado o SP5 você pode trabalhar por código com todas as versões do access(2003 inclusivé) bastando para isso que, se usar DAO, utilize o DAO 3.6, nas suas referências. Se utilizar ADO, onde faz referência ao JET, utilize o JET 4.0.
Pode também utilizar o ADODC(que faz as mesmas vezes do DataControl), utilizando como provedor o JET 4.0.
Se, pelo contrário, pretende continuar a utilizar o DataControl, tem que actualizar o vb6 com o SP6.
Parece-me que é tudo.
Bom, é assim:
- O Vb6 só vinha preparado de origem para trabalhar com bases de dados access(MDBs) até à  versão 97
- Posteriormente sairam SPs que permitem trabalhar com as versões posteriores
Se tem instalado o SP5 você pode trabalhar por código com todas as versões do access(2003 inclusivé) bastando para isso que, se usar DAO, utilize o DAO 3.6, nas suas referências. Se utilizar ADO, onde faz referência ao JET, utilize o JET 4.0.
Pode também utilizar o ADODC(que faz as mesmas vezes do DataControl), utilizando como provedor o JET 4.0.
Se, pelo contrário, pretende continuar a utilizar o DataControl, tem que actualizar o vb6 com o SP6.
Parece-me que é tudo.
este exemplo é muitu bom pra vc
sub Banco
dim Db as database
dim Rd as recordset
dim sql as string
set db = opendatabase("c:\BD\VB.mdb")
sql = "select * from [Tb_Socios]"
set rd = db.openrecordset(sql)
do while not(rd.eof)
List1.Additem rd("Nome")
rd.movenext
loop
db.close
rd.close
end sub
sub Banco
dim Db as database
dim Rd as recordset
dim sql as string
set db = opendatabase("c:\BD\VB.mdb")
sql = "select * from [Tb_Socios]"
set rd = db.openrecordset(sql)
do while not(rd.eof)
List1.Additem rd("Nome")
rd.movenext
loop
db.close
rd.close
end sub
Jefinho vc só copiou o conteudo que o TROVAM tinha colocado
assim vc não ajuda em nada!!!!!!!!!
assim vc não ajuda em nada!!!!!!!!!
Olá pessoal, estou iniciando no VBMania.
Gostaria de saber como gerar um relatório sem utilizar o Data Environmente Design, pois preciso utilizar variáveis e o environmente não aceita !
Gostaria de saber como gerar um relatório sem utilizar o Data Environmente Design, pois preciso utilizar variáveis e o environmente não aceita !
Caro amigo, BonFim acho q para ter um melhor resultado de sua duvida abra um tropico para vc!!
Sobre a pergunta, vc pode utilizar o Data Report sem o Environmente, é so montar a sql e abrir o recordSet e depois dar um Set no dataReport.
Sobre a pergunta, vc pode utilizar o Data Report sem o Environmente, é so montar a sql e abrir o recordSet e depois dar um Set no dataReport.
Tópico encerrado , respostas não são mais permitidas