Access Update Komutu Hakkında

1 2 3 4
24/02/2020, 11:53

berduş

4. mesajınızdaki kodlara bakarak söyleyeyim metinsel değerler için tek tırnak eklememişsiniz gibi geldi, doğrudan sorgu koduna eklemeyi denediniz mi ayrıca başta set rs= olmayacak bence
Birkaçı için düzenleme çalıştım

Set baglan = CreateObject("adodb.connection")
baglan.Open "provider=microsoft.jet.oledb.4.0;data source=" & ThisWorkbook.Path & "\veritabani.mdb"

baglan.Execute("UPDATE carikart SET CARIADI='" & cari & "',HESAPGURUBU=" & hesgrp & ",ADRES='" & adres & "',IL=" & il & ",ILCE=" & ilce & ",TELEFON=" & tlfn & ",FAKS=" & fks & ",VERGIDAIRESI=" & vdaire & ",VERGINO=" & vno & ",TCNO=" & TcNo & ",YETKILI" & yetkili & ",MAIL=" & mail & " WHERE ID=" & sno)
Set baglan = Nothing
24/02/2020, 12:01

kanakan52

Hocam bu kadar hızlı dönüş yapacağınızı düşünemedim, Allah razı olsun..

Öncelikle şunu söylim hiç acsess tecrübem yok, forumlardan örnekleri araştırıp kendi çalışmama uyarlamayı böylece acsess konusunda da bilgi sahibi olmayı hedefliyorum.

Kod konusuna gelince, aşağıdaki hatayı aldım..
24/02/2020, 12:03

kanakan52

Sanırım burada resim ekleyemiyoruz.

baglan.Execute ile başlayan satırda eksik işleç hatası verdi.
24/02/2020, 12:04

berduş

Yorum yaz kısmından girince aşağıda resim ekleme butonu var
24/02/2020, 12:10

kanakan52



Hata ekranım bu hocam..
24/02/2020, 12:38

berduş

ofisi yeniden yükledim ama yine çalışmadı maalesef o nedenle düzenlemem sadece teorik, kodun ilgili kısmını aşağıdaki gibi dener misiniz?
dilerim çalışır
Set baglan = CreateObject("adodb.connection")
baglan.Open "provider=microsoft.jet.oledb.4.0;data source=" & ThisWorkbook.Path & "\veritabani.mdb"

baglan.Execute ("UPDATE carikart SET CARIADI='" & cari & "',HESAPGRUBU='" & hesgrp & "',ADRES='" & adres & _
                "',IL='" & il & "',ILCE='" & ilce & "',TELEFON=" & tlfn & ",FAKS='" & fks & "',VERGIDAIRESI='" & vdaire & _
                "',VERGINO=" & vno & ",TCNO=" & TcNo & ",YETKILI='" & yetkili & "',MAIL='" & mail & "' WHERE ID=" & sno)
Set baglan = Nothing
Not: accesstek tabloda neredeyse tüm alanları uzun metin olarak ayarlamışsınız, faks isim yada ne bileyim telefon no gibi alanlar 255 karakter uzunluğunu aşmazlar o nedenle kısa metin olmalıydı, ayrıca TCNo 11 hanelidir yanı uzun tamsayıda bile hata verir o alanı da kısa metin olarak ayarlayabilirsiniz
1 2 3 4