visual basic ile access e erişim nasıl olur ?

[RedGhost]

herkese merhaba. ben visual studio 2005 kullanıyorum ve access veritabanına erişip üzerinde işlem yapmak istiyorum. bunun içni kodları kullanmak istiyorum. fakat biraz karışık geldi. yaptığım kısım :

Dim baglanti As OleDbConnection
Dim isle As OleDbCommand
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub
Public Sub kaydet()
Dim conn As New OleDbConnection
conn.ConnectionString = Module1.connStr
Dim comm As New OleDbCommand
comm.Connection = conn
comm.CommandType = CommandType.Text
comm.CommandText = "INSERT INTO kisi(ad, soyad)values(@ad, @soyad)"
comm.Parameters.Add("@ad", TextBox1.Text)
comm.Parameters.Add("@soyad", TextBox2.Text)
Try
conn.Open()
comm.ExecuteNonQuery()
Catch ex As Exception
MessageBox.Show(ex.Message)
Finally
conn.Close()
End Try

şeklinde. hata vermiyor ama comm.parameters.add kısmında sorun yaşıyorum. bu kodların doğrusu nedir ?

teşekkürler.

[VoLkanZerdaL]

Ben Bunları Kullanıyorum Gayet Sağlıklı Çalışıyor

Imports System.Data
Imports System.Data.OleDb
Imports System.Xml
PublicClass ana
Dim baglan As OleDbConnection
Dim oledbcommand1 As OleDbCommand
Dim verial As OleDbDataAdapter
Dim a1 As DataSet
Dim goster As DataView
Dim baglanti, sorgu AsString
Dim yonet As CurrencyManager
Dim numara, sill AsInteger

PrivateSub ana_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
baglanti = "provider=microsoft.jet.oledb.4.0; data source=C:\kayitlar.mdb"
baglan = New OleDbConnection(baglanti)
sorgu = "select * from salon1"
verigoster()

EndSub
Sub verigoster()
verial = New OleDbDataAdapter(sorgu, baglan)
a1 = New DataSet
verial.Fill(a1, "salon1")
goster = New DataView
goster.Table = a1.Tables("salon1")
DataGridView1.DataSource = goster
EndSub

[RedGhost]

tamam hallettim. teşekkür ederim. şimdi databaseden rasgele bir sözcük çekmem gerekiyor. onu nasıl yapabilirim acaba ? id numaraları var ve id numarasına göre o tablodaki diğer sütunda bulunan kelimeyi almak istiyorum. bir kaç yol denedim ama olmadı. teşekkürler.

[alavardi]

sorun sql'i yazmaksa,

sorgu = "select * from salon1 where id=" &idNo

gibi yazılabilir..

[rockn]

verial.Fill(a1, "salon1")

kodu çalışmıyor
geçersiz parola hatası veriyor
oledb was unhandled diyor..

[Revlis]

rockn, mesajından alıntı:

verial.Fill(a1, "salon1")

kodu çalışmıyor
geçersiz parola hatası veriyor
oledb was unhandled diyor..

cevabı söyleyip soruyu sormak ayrı ilginç.. Veritabanında belli ki parola var. ConnetionString ona göre yapılandırılmalı.