Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   [VBA] Vba Sql Update

[VBA] Vba Sql Update
ibrahimsenol
Yeni Üye 1-15

*
Kayıt Tarihi: 27.10.2010
Toplam 3 konu açtı.
Toplam 7 yorum yaptı.
Toplam 0 puanı bulunmakta.
Beğeniler: 3 / 0
#1
08-12-2019, 22:41
Merhabalar,

aşağıdaki gibi buton aracılığı ile önce başka bir veritabanımı update edip, ardından kayıt işleminin gerçekleşmesini istiyorum fakat syntax hatası alıyorum. Mantık olarak yöntemim doğru mu?

Visual Basic
  1. Private Sub kaydet_Click()
  2. If MsgBox("KAYDI ONAYLIYORMUSUNUZ?", vbYesNo, "UYARI!") = vbYes Then
  3.  
  4. Dim SQL As String
  5.      
  6.     SQL = "UPDATE veri_degerler" & _
  7.           "SET VERI_DURUM = 'TANIMLI'" & _
  8.           "WHERE KAYIT_ID = '45'"
  9.  
  10.     DoCmd.RunSQL (SQL)
  11.  
  12. DoCmd.RunCommand acCmdSaveRecord
  13. MsgBox "KAYIT YAPILDI", vbInformation, "YENI KAYDI"
  14. End Sub





  Bul
  Alıntı
Bu mesajı beğenenler:
dsezgin
Forum Yöneticisi

*
Kayıt Tarihi: 24.03.2013
Toplam 27 konu açtı.
Toplam 9.092 yorum yaptı.
Toplam 1.103 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 57 / 240
#2
08-12-2019, 23:13
SQL = "UPDATE veri_degerler%" & _
         "SET VERI_DURUM = 'TANIMLI'%" & _
%=Bosluk.....
satirlarinin en son bolumune bosluk birakmalisiniz, SQL degiskeni "UPDATE veri_degerlerSET VERI_DURUM = 'TANIMLI'WHERE KAYIT_ID = '45'" olmaktadir, SQL komutun icerigi birlestigi icin hata verir. Ayrica KAYIT_ID alan tipi sayi ise '45' bolumunu kesme isaretini kadirip 45 yazin.

SQL degikene verileni
Visual Basic
  1. SQL = "UPDATE veri_degerler SET VERI_DURUM = 'TANIMLI' WHERE KAYIT_ID = '45'"


olarak yaziniz.
Access Fonksiyonlarının(Deyimler), Sorgu da kullanımı
Rapor veya-Pdf-Dosyalarını Birleştirme Uygulaması



  Website   Bul
  Alıntı
Bu mesajı beğenenler: ibrahimsenol
Access70
Aktif Üye 40-100

*
Kayıt Tarihi: 08.07.2009
Toplam 9 konu açtı.
Toplam 62 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016,
Beğeniler: 4 / 0
#3
10-12-2019, 09:13
Benim de daha önce çalışan update sorgum son zamanlarda çalışmıyor. Acaba bir güncelleme mi buna neden oldu? Sebep ne olabilir? Hata mesajı vermiyor ama güncellemeyi de yapmıyor.


Visual Basic
  1. Private Sub Komut1073_Click()
  2. If MsgBox("Durumu T.B. olan tüm fişlerin durumunu M.G. Yapmak İstiyormusunuz?", vbQuestion + vbYesNo, "Uyarı") = vbYes Then
  3.  
  4.  Dim SQL As String
  5.  On Error Resume Next
  6.     SQL = "UPDATE Fisler" & _
  7.           "SET Durum = 'M.G.'" & _
  8.           "WHERE Durum = 'T.B.'"
  9.     DoCmd.RunSQL SQL
  10.  
  11. End If
  12. End Sub





  Bul
  Alıntı
Bu mesajı beğenenler:
beab05
Forum Yöneticisi

*
Kayıt Tarihi: 05.03.2008
Toplam 252 konu açtı.
Toplam 3.105 yorum yaptı.
Toplam 131 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 9 / 23
#4
10-12-2019, 10:01
Hatada resume next olduğu için hatayı pas geçip almıyorsunuz.

Sorguda ifadeler arası boşluklar bırakın. Örneğin

"update fisler (boşluk olsun) " & _

diğer satırlara da dikkat edin..
Javascript
  1. this.setState({sign:"Here comes the sun...."})







  Website   Bul
  Alıntı
Bu mesajı beğenenler: ibrahimsenol
Access70
Aktif Üye 40-100

*
Kayıt Tarihi: 08.07.2009
Toplam 9 konu açtı.
Toplam 62 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016,
Beğeniler: 4 / 0
#5
10-12-2019, 10:28
Hocam hata mesajında sorgusu bozuk diyor. Yakın tarihe kadar sıkıntısız çalışıyordu. Şimdi niye çalışmıyor bilemedim.



  Bul
  Alıntı
Bu mesajı beğenenler:
halily
Access Takımı

*
Kayıt Tarihi: 29.06.2014
Toplam 3 konu açtı.
Toplam 1.709 yorum yaptı.
Toplam 464 puanı bulunmakta.
Beğeniler: 13 / 108
#6
10-12-2019, 10:40
bende de bir kaç gün sürdü, ofis güncellemesinden kaynaklanan bir sorundu son güncellemede düzeldi.
isterseniz ofis programınızı güncelleyin yada son ofis güncellemelerini kaldırmaya çalışın



  Bul
  Alıntı
Bu mesajı beğenenler: ibrahimsenol


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [VBA] Update Sorgusunu Bir Türlü Beceremedim :( vrdr 1 735 28-05-2020, 07:01
Son Mesaj: onur_can
  Acsess Update Komutu Hakkında kanakan52 1 640 26-02-2020, 12:14
Son Mesaj: dsezgin
  [VBA] Update De Datediff Kullanım Hatası ask200075 5 865 22-02-2020, 16:57
Son Mesaj: userx53
  Update Where çoklu Koşul kayaae 2 901 04-01-2020, 14:56
Son Mesaj: kayaae
access-sql-17 Update ile kayıt güncelleme Enigmatic 31 21.752 07-08-2019, 18:57
Son Mesaj: Access70
  [SORGU] Bir Tablodaki Satırların Toplamını UPDATE İle Başka Tabloya Aktarma ahmet025896 1 1.126 29-01-2019, 16:44
Son Mesaj: jon206
  [VBA] vba update where sorunu kayaae 1 740 26-12-2018, 13:52
Son Mesaj: kayaae
  [VBA] Şifre değiştirme ekranında hatalı kodlama "update" devilspath 4 1.344 23-10-2018, 17:03
Son Mesaj: devilspath

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar):