Operações via SQL no Visual Basic
A princípio deve-se declarar a variáveis de database e dynaset:
Global DBanco as database
Global DyRec as dynaset
Abrindo o Banco de Dados:
Set DBanco = Opendatabase (app.path & “\banco.mdb”)
‘onde banco é o banco de dados
Selecionando registros:
Set DyRec = DBanco.Createdynaset(“select * from func”)
‘onde func é uma tabela do banco.mdb
‘seleciona todos registros de func
Inserindo registros:
Banco.Execute “insert into func values (‘Nome_func’,Identidade,’Endereco’)
‘onde Nome_func,Identidade,Endereco são colunas do banco
‘veja que Nome_func e Endereco estão entre aspas simples pois têm
atributos do tipo Text
‘e Identidade é Number
Excluindo registros:
Banco.Execute “delete from func where Nome_func like ‘R*’)
‘exclui todas as linhas onde Nome_func começa com ‘R’
Atualizando registros:
Banco.Execute “update func set
Nome_func = ‘Renato’,
Endereco = ‘Rua Web Mundi , 2 andar. Sala 1’ where Identidade = “19982002”
