CONSULTA BACO DE DADOS ACCESS

DELEON 25/06/2013 23:32:38
#425210
Galera, fiz a conexão com o bd no vb, usei os comando para add e editar e excluir (query)
quando trabalhava com vb6 o cod para pesquisar era esse:

data_Cliente.RecordSource = [Ô]select * from cliente where nome like[ô]*[Ô] & TxtPesquisa.Text & [Ô]*[ô][Ô]
data_Cliente.Refresh

Data_Cliente.Refresh

sei que no vb.net poderia colocar a primeira linha assim
strSql = ([Ô]SELECT * FROM Cliente WHERE Nome[ô] Like [ô]%[Ô] & TxtPesquisa.Text & [Ô]%[ô][Ô])

porem nao sei como atualizar para que o resultado apareça no meu ClienteDataGridView




agradeço sugestões..

arquivo chama db.mdb
tabela chama cliente
campo que desejo pesquisar é o campo nome

Obrigado
PEGUDO 26/06/2013 08:43:26
#425217
Cara, não faça como muitos e muitos por aí:
[Ô]No VB6 eu fazia assim...[Ô], No VB6 eu fazia assado...[Ô]

VB6 é VB6 e .NET é .NET.

O seu caso parece que você quer retornar todos os registros da coluna nome,
Vou supor que sua conexão já está aberta.
Dim da As SqliteDataAdapter
Dim ds As DataSet
da = New SQLiteDataAdapter(sql, connection) [txt-color=#007100][ô]sql é a sua string SELECT e connection é sua conexão como BD
[ô] Cria um DataSet, ou seja, uma representação em memória da informação[/txt-color]
ds = New DataSet
[txt-color=#007100][ô] Coloca a informação da tabela definida no DataSet[/txt-color]
da.Fill(ds, [txt-color=#e80000][Ô]Tabela[Ô][/txt-color])
[txt-color=#007100][ô] Define que a fonte de dados da DataGridView é a nossa DataSet
[ô] criando automaticamente as colunas e linhas de dados[/txt-color]
Me.DataGridView1.DataSource = ds.Tables([txt-color=#e80000][Ô]Tabela[Ô][/txt-color])
connection = Nothing

Fiz este exemplo de cabeça e não testei em máquina.
Espero que tenha ajudado.
DELEON 26/06/2013 10:11:25
#425232
Sei que é feio mesmo ficar comparando....rs

Eu substitui o SQLiteDataAdapter por dbdataset ai um erro sumiu

minha conexão foi feita pelo assistente de configuração de banco de dados, o nome dela é BDConnectionString
porem coloquei no lugar de connection e não deu certo.

esta falando algo né?rs

Desculpa estou começando agora...
Obrigado
DELEON 26/06/2013 11:53:08
#425241
Tentei tbm com o cod para fazer a coneção com o bd mas nao deu, ele nao reconhece a conexão da linha
[Ô][Ô]da = New SQLiteDataAdapter(sql, [txt-color=#0000f0]connection[/txt-color]) [ô]sql é a sua string SELECT e connection é sua conexão como BD[Ô][Ô][Ô]

Imports System.Data.OleDb



Dim cnn As New OleDbConnection([Ô]Provider=Microsoft.Jet.Oledb.4.0;Data Source=C:\BD.mdb[Ô])



cnn.Open()
DELEON 04/07/2013 10:46:24
#425562
Obrigado por ninguem me ajudar....
Tópico encerrado , respostas não são mais permitidas