+- 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ığı: Access Update Komutu Hakkında (/konu-access-update-komutu-hakkinda.html)
Cvp: Acsess Update Komutu Hakkında - berduş - 24/02/2020
kodu tekrar düzenledim
Cvp: Acsess Update Komutu Hakkında - kanakan52 - 24/02/2020
Cvp: Acsess Update Komutu Hakkında - kanakan52 - 24/02/2020
Hata verdi hocma, şimdi namaza gidiyorum, dönüşte uzak başlantı versem vakit ayırabilir misiniz ?
Cvp: Acsess Update Komutu Hakkında - berduş - 24/02/2020
aşağıdaki kodu dener misiniz?
Not:baglan.Open "provider=Microsoft.ACE.OLEDB.12.0;data source=" & ThisWorkbook.Path & "\veritabani.mdb" bu koddaki
Microsoft.ACE.OLEDB.12.0; sizde
microsoft.jet.oledb.4.0; olabilir
Dim sno As Integer
sno = TextBox20.Value
cari = ComboBox4
adres = TextBox1
il = ComboBox3
ilce = ComboBox1
tlfn = TextBox2
fks = TextBox17
vdaire = TextBox15
vno = TextBox16
TcNo = TextBox19
yetkili = TextBox14
mail = TextBox3
hesgrp = TextBox18
tür = ComboBox2
Set baglan = CreateObject("adodb.connection")
baglan.Open "provider=Microsoft.ACE.OLEDB.12.0;data source=" & ThisWorkbook.Path & "\veritabani.mdb"
StrTcVr = IIf(Len(TextBox16) = 0, ", VERGINO=Null", ", VERGINO=" & vno) & IIf(Len(TextBox19) = 0, ",TCNO=Null", ",TCNO=" & TcNo)
SqlG = "UPDATE carikart SET CARIADI='" & cari & "',HESAPGRUBU='" & hesgrp & "',ADRES='" & adres & _
"',IL='" & il & "',ILCE='" & ilce & "',TELEFON='" & tlfn & "',FAKS='" & fks & "',VERGIDAIRESI='" & vdaire & _
"',YETKILI='" & yetkili & "',MAIL='" & mail & "'" & StrTcVr & " WHERE ID=" & sno
baglan.Execute SqlG
Set baglan = NothingCvp: Acsess Update Komutu Hakkında - kanakan52 - 24/02/2020
Hocam merhaba,
Dayanamadınız uğraştınız değil mi ? İnanın biri benden yardım isteyince bende işi gücü bırakıp onla uğraşıyorum.
Bu arada kodlar çalışıyor , emeğinize sağlık. Aşağıdaki uyarınızda belirtmiştiniz TC no ve vergi no alanlarını kısa metin olarak değiştirmem lazım. Diğer türlü hata verdi.
Tekrardan hakkınızı helal ediniz,
"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"
Cvp: Acsess Update Komutu Hakkında - berduş - 24/02/2020
1 - verdiğim kod şu haliyle tüm sayısıal alanları boş bıraksanız bile çalışıyor mu?
2 - sayısal alanları metne çevirirseniz kodu güncellemek gerekebilir.