Dim ayarlar As New OleDbConnectionStringBuilder()
                     ayarlar.ConnectionString = "provider=microsoft.jet.oledb.4.0;" + "Data Source=" + Application.StartupPath().ToString + "\\proje ödevi.mdb"
        Dim yenibaglantı As New OleDbConnection(ayarlar.ConnectionString)
        '
        Dim sorgu As String
        sorgu = " Insert Into [ÖDEMELER] ([ödeme şekli],[servis]) values (?,?)"
        Dim sutunlar(1) As OleDbParameter
        '
        sutunlar(0) = New OleDbParameter()
        sutunlar(0).OleDbType = OleDbType.VarChar
        sutunlar(0).Value = ComboBox1.Text
        '
        sutunlar(1) = New OleDbParameter()
        sutunlar(1).OleDbType = OleDbType.VarChar
        sutunlar(1).Value = ComboBox2.Text
        '
        Dim direkveri As New OleDbCommand(sorgu, yenibaglantı)
        Dim parametreler As OleDbParameterCollection
        parametreler = direkveri.Parameters
        parametreler.AddRange(sutunlar)
        If (yenibaglantı.State = ConnectionState.Closed) Then
            yenibaglantı.Open()
        End If
        direkveri.ExecuteNonQuery()
        MessageBox.Show("Kaydınız Başarıyla Eklendi")
BU kod satırlarıyla kaydediyor gibi görünüyor ama veritabanına baktığımda kaydetmiyor sorun ne olabilir acaba nerede hata yapmış olabilirim..
				
				
			
			
			
			
			
				
Cevapla