[Resolvido] Adicionar dados

[jcbiker]

Bom dia após algumas pesquisas conseguiu ligar a minha base em access

Mas agora não consigo adicionar nada. Já sei como pesquizar.

Conectar()
Dim query As New OleDbCommand("SELECT * FROM div WHERE nome =@nome", conecta)
query.Parameters.Add("@nome", OleDbType.VarChar).Value = txtNome.Text
conecta.Open()
Dim dr As OleDbDataReader = query.ExecuteReader()
If dr.Read Then txtmorada.Text = dr("Morada")
Else
MsgBox("Não existem registos!")
End If

Alguem me pode ajudar? 😕

Edited May 18, 2012 at 11:21 AM by Caça
GeSHi

[Caça]

Dá aqui uma vista de olhos

https://wiki.portugal-a-programar.pt/dev_net/vb.net/access/

[jcbiker]

Ok.

Resolvido

Obrigado