

Visual Basicde Bir Hata (Nesne Başvurusu Bir Nesnenin Örneğine Ayarlanmadı.)
-
Arkadaşlar aşağıdaki vb kodda bu hatayı veriyor nasıl çözümleyebilirim.
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
Dim Cmd As New OleDbCommand("Select * from sigorta where sira=" & Val(TextBox3.Text), c)
Dim Dr As OleDbDataReader
Dim cdc As New OleDbCommand("Select max (sira) as toplam from sigorta", c)
c.Open()
Try
Dr = Cmd.ExecuteReader
Dr.Read()
TextBox3.Text = Dr("sayi")
TextBox1.Text = Dr("ad")
TextBox2.Text = Dr("tc")
DateTimePicker1.Text = Dr("tarih")
CheckBox1.CheckState = Dr("sigorta")
Catch ex As Exception
MessageBox.Show("Kayıt Bulunmamaktadir", "HATA", MessageBoxButtons.OK, MessageBoxIcon.Error)
TextBox3.Text = ""
TextBox1.Text = ""
TextBox2.Text = ""
DateTimePicker1.Text = DateTime.Now.ToLongDateString
CheckBox1.CheckState = False
Dr.Close()
Dr = cdc.ExecuteReader
Dr.Read()
TextBox3.Text = Dr("toplam") + 1
End Try
Dr.Close()
c.Close()
End Sub -
Arkadaşlar tezimle alakalı bir konudur bu hafta bitirmem lazım bilen arkadaşlar bi el atsın lütfen çözemedim olayı.
-
Yok mu bu işten anlayan bi babayiğit...
-
.net değilmi bu. konuyu yanlış yere açmışsın zaten.
-
1. kaçıncı satırda veriyo
2. vb den çakmam ama sınıfları import ettinmi? system.oledb falandır heralde...?
-
Şu an disardayim, cok acil yazmissin onun icin cevap vermek istedim :) Yazdigin hatanin nedeni ya sorgu yanlistir, ya veri tipleri uyusmuyodur ya da geriye deger donmuyodur. (yani istediginin verinin karsiligi veritabaninda yoktur) Duzeneleme: hocam sorgun yanlis sorgudaki & yerine + kullan. vbde birlestirme operatoru + dir.
-
hacı sen veritabanına bağlanmamışsınki? :D uğraşıyon boşuna :D hahaha :D
-
tamam sağolun hallettim olayı
o tanımladığım oledbcommand cümlesinin sonundaki c bağlantımı ifade eder boşuna yazmama gerek yoktu.