AccessTr.neT

Sayfalar: 1 2 3 4

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

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

Sayfalar: 1 2 3 4

kanakan52

feraz