Acsess Sorgusu İle Listview'e Veri Alma - Baskı Önizleme

Acsess Sorgusu İle Listview'e Veri Alma - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Acsess Sorgusu İle Listview'e Veri Alma (/konu-acsess-sorgusu-ile-listview-e-veri-alma.html)

Sayfalar: 1 2 3 4

Re: Acsess Sorgusu İle Listview'e Veri Alma - kanakan52 - 11/04/2020

feraz hocam rica etsem, form üzerindeki Değitir Butonu için aşağıda yazdığım kodlarda eksik ne var kontrol edebilir misini ?

Kod:

Set baglan = CreateObject("adodb.connection")

baglan.Open "provider=Microsoft.ACE.OLEDB.12.0;data source=" & ThisWorkbook.Path & "\veritabani.mdb"



SqlG = "UPDATE SiparisKayitlari SET Stok_Kodu='" & ComboBox4.Text & "',Stok_Adi='" & TextBox7.Text & "',Miktar='" & TextBox8.Text & "',Fiyat='" & TextBox9.Text & "',İskonto1='" & TextBox46.Text & _

                "',İskonto2='" & TextBox47.Text & "',İskonto3='" & TextBox48.Text & "',Serbest_1='" & TextBox24.Text & "',Serbest_2='" & TextBox25.Text & "',Serbest_3='" & TextBox26.Text & _

                "',Serbest_4='" & TextBox27.Text & "',BrütTutar='" & TextBox10.Text & "' WHERE Kimlik=" & sno

                



baglan.Execute SqlG

Set baglan = Nothing

RE: Acsess Sorgusu İle Listview'e Veri Alma - feraz - 11/04/2020

Baktım tam anlaşılmıyor.
WHERE Kimlik=" & sno burdaki sno yerine textbox hangisise o gelmeli gibi.
Birde accessteki alan
metin ise İskonto3='" & TextBox48.Text & "'
sayısal ise İskonto3=" & TextBox48.Text & "
gibi değiştirin ilgili yerleri.
Yukardakiler sadece örnekti