Update Komutunda Hata - Baskı Önizleme

Update Komutunda Hata - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Update Komutunda Hata (/konu-update-komutunda-hata--86667.html)

Sayfalar: 1 2 3 4

Cvp: Update Komutunda Hata - berduş - 27/02/2020

Me.Resim & "','" & Me.Durum_CBO & "')  WHERE Id = " & me.[ID_TXT] & ";"

Cvp: Update Komutunda Hata - berduş - 27/02/2020

Neden 2 defa)

Cvp: Update Komutunda Hata - Oğuz Türkyılmaz - 27/02/2020

(27/02/2020, 18:41)Oğuz Türkyılmaz yazdı:

(27/02/2020, 16:51)ozanakkaya yazdı: Benim gördüğüm kadarıyla " & _ ile satır bölünmüş, ancak alt satır çift tırnak ile başlamamış, kodun kırmızı olma sebebi de bu.

If MsgBox("Girdiginiz veriler kaydedilecektir, Onayliyormusunuz ", vbExclamation + vbYesNo, "Dikkat") = vbNo Then Exit Sub

CurrentDb.Execute " insert into T_Uye " & _

"( UyeNo, AdSoyad,TcNo,Tabiyeti, DogumTarihi, DogumYeri, AnaAd, BabaAd, Cinsiyeti, OgrenimDurumu, Meslegi, SosyalGuvence, CepNo_1, " & _

"CepNo_2, Irtibat, Ilce, Sehir, UyeKabulTarih, UyeKabulKararNo, UyeIptalTarih, UyeIptalKararNo, UyelikIptalNedeni, E_Mail, Adres, " & _

"Aciklama, KanGrubu, EngelNedeni, EngelYuzdesi, IlgilendigiSpor, KanadyenBaston, Yurutec, Protez, Ortez, AkuluAraba, ManuelAraba, " & _

"Resim, Durum) values " & _

"(" & Me.UyeNo_TXT & ", '" & Me.AdSoyad_TXT & "', '" & Me.TcNo_TXT & "', '" & Me.Tabiyeti_TXT & "'," & CLng(Me.DogumTarihi_TXT) & ", '" & _

 Me.DogumYeri_TXT & "','" & Me.AnaAd_TXT & "','" & Me.BabaAd_TXT & "','" & Me.Cinsiyeti_CBO & "','" & Me.OgrenimDurumu_CBO & "','" & _

 Me.Meslegi_TXT & "','" & Me.SosyalGuvence_CBO & "','" & Me.CepNo1_TXT & "','" & Me.CepNo2_TXT & "','" & Me.Irtibat_TXT & "','" & _

 Me.Ilce_TXT & "','" & Me.Sehir_TXT & "'," & CLng(Me.UyeKabulTarih_TXT) & ",'" & Me.UyeKabulKararNo_TXT & "','" & Me.UyeIptalTarih_TXT & _

 "','" & Me.UyeIptalKararNo_TXT & "','" & Me.UyelikIptalNedeni_TXT & "','" & Me.EMail_TXT & "','" & Me.Adres_TXT & "','" & Me.Aciklama_TXT & "','" & _

 Me.KanGrubu_CBO & "','" & Me.EngelNedeni_TXT & "','" & Me.EngelYuzdesi_TXT & "','" & Me.IlgilendigiSpor_TXT & "','" & Me.KanadyenBaston_OKS & "','" & _

 Me.Yurutec_OKS & "','" & Me.Protez_OKS & "','" & Me.Ortez_OKS & "','" & Me.AkuluAraba_OKS & "','" & Me.ManuelAraba_OKS & "','" & _

 Me.Resim & "','" & Me.Durum_CBO & "')"

 

End If

(27/02/2020, 18:49)berduş yazdı: Neden 2 defa)

2 defa olan nedir sn.@berduş sizin yorumunza eklediğim kod update ozan beyin yorumuna eklediğim ınsert ınto bunumu kastettiniz anlayamadım.

Cvp: Update Komutunda Hata - berduş - 27/02/2020

Resimde tek kod vardı bana ve ozan beye farklı kodlar yollayarak is bölümü mu yaptiniz)

Cvp: Update Komutunda Hata - Oğuz Türkyılmaz - 27/02/2020

(27/02/2020, 18:55)berduş yazdı: Resimde tek kod vardı bana ve ozan beye farklı kodlar yollayarak is bölümü mu yaptiniz)

Ozan beyin belirttiği hususun ınsert ınto kodunda yapılmadığını izah etmek için aralarında ne fark var diye ekledim .
[Resim: do.php?img=9756]

Private Sub Duzenle_BTN_Click()





DoCmd.SetWarnings False



DoCmd.RunSQL "UPDATE T_Uye SET " & _

"UyeNo, AdSoyad,TcNo,Tabiyeti, DogumTarihi, DogumYeri, AnaAd, BabaAd, Cinsiyeti, OgrenimDurumu, Meslegi,  " & _

"SosyalGuvence, CepNo_1,CepNo_2, Irtibat, Ilce, Sehir, UyeKabulTarih, UyeKabulKararNo, UyeIptalTarih, UyeIptalKararNo, UyelikIptalNedeni,  " & _

"E_Mail, Adres, Aciklama, KanGrubu, EngelNedeni, EngelYuzdesi, IlgilendigiSpor, KanadyenBaston, Yurutec, Protez, Ortez, AkuluAraba, ManuelAraba, " & _

"Resim, Durum ) Values " & _

"(" & Me.UyeNo_TXT & ", '" & Me.AdSoyad_TXT & "', '" & Me.TcNo_TXT & "', '" & Me.Tabiyeti_TXT & "'," & CLng(Me.DogumTarihi_TXT) & ", '" & _

Me.DogumYeri_TXT & "','" & Me.AnaAd_TXT & "','" & Me.BabaAd_TXT & "','" & Me.Cinsiyeti_CBO & "','" & Me.OgrenimDurumu_CBO & "','" & _

Me.Meslegi_TXT & "','" & Me.SosyalGuvence_CBO & "','" & Me.CepNo1_TXT & "','" & Me.CepNo2_TXT & "','" & Me.Irtibat_TXT & "','" & _

Me.Ilce_TXT & "','" & Me.Sehir_TXT & "'," & CLng(Me.UyeKabulTarih_TXT) & ",'" & Me.UyeKabulKararNo_TXT & "','" & Me.UyeIptalTarih_TXT & _

",'" & Me.UyeIptalKararNo_TXT & "','" & Me.UyelikIptalNedeni_TXT & "','" & Me.EMail_TXT & "','" & Me.Adres_TXT & "','" & Me.Aciklama_TXT & "','" & _

Me.KanGrubu_CBO & "','" & Me.EngelNedeni_TXT & "','" & Me.EngelYuzdesi_TXT & "','" & Me.IlgilendigiSpor_TXT & "','" & Me.KanadyenBaston_OKS & "','" & _

Me.Yurutec_OKS & "','" & Me.Protez_OKS & "','" & Me.Ortez_OKS & "','" & Me.AkuluAraba_OKS & "','" & Me.ManuelAraba_OKS & "','" & _

Me.Resim & "','" & Me.Durum_CBO & "')  WHERE Id = " & Me.[ID_TXT] & ";"



DoCmd.SetWarnings True



End Sub

Boyle bır hata verdı sn.@berduş ama kod satırı normalde yazım da hata gostermıyor. Duzenle butonuna bastıgımda hata ya düşüyor.

Cvp: Update Komutunda Hata - Oğuz Türkyılmaz - 27/02/2020

(27/02/2020, 16:51)ozanakkaya yazdı: Benim gördüğüm kadarıyla " & _ ile satır bölünmüş, ancak alt satır çift tırnak ile başlamamış, kodun kırmızı olma sebebi de bu.

Ozan bey 5.mesajdakı kod aynı formdakı ınsert ınto kodu burada sızın belirttiğiniz ayraçlardan sonra " işareti kullanılmamıştı arada ne fark var anlayamadım.