Çözüldü Sql ile Verileri Güncelleme ,Silme

Local · 15 Şub 2024

1)Merhaba ekteki dosyamda StokKartFormunda Kart giriş formu mevcut bu formda verileri kaydedip wampserver sunucusuna ve Mysql8.0 veri tabanında görecek şekilde aktarmaları yapıyorum.Güncelleme ve Silme yapmak için Listview tablosuna tıklayıp verileri textboxlara ve combolara aktarıyor silme ve güncelleme işlemi yaptırmak istiyorum bu işlemler yapıldıktan sonra mysql ve wamp serverda 'da değişmesini istiyorum.

2) Arama formum mevcut Listview tablosu üzzerinde .Tablodaki verileri aynı şekilde wampserverdan sql ile çekmek istiyorum .Arama kodları mevcut .

Local · 16 Şub 2024

Evet o kısım önemli excel sayfasında bu işlemi yapıyor ,alt alta kayıtları sıralıyor fakat bunu myadmin de yapma imkanı varmı şöyle düşünüyorum mesela

('" & textbox1 & "', '" & textbox2 & "' ) şeklinde sırası ile yazmayı düşündüm ama vba kodlarına uyarmı onu kestiremedim

aeGNoR · 16 Şub 2024

Local' Alıntı:
Evet o kısım önemli excel sayfasında bu işlemi yapıyor ,alt alta kayıtları sıralıyor fakat bunu myadmin de yapma imkanı varmı şöyle düşünüyorum mesela

('" & textbox1 & "', '" & textbox2 & "' ) şeklinde sırası ile yazmayı düşündüm ama vba kodlarına uyarmı onu kestiremedim

Bence biz burada kavram karmaşası yaşıyoruz karşılıklı

Excel sayfasından mı veri göndereceğiz? Userformdaki textboxlardan mı?

Cevap "excel sayfasındaki bir listeden veri gönderilecek" şeklinde ise eve birden fazla kaydı tek bir butona tıklayarak gönderebiliriz. Hatta yanlış hatırlamıyorsam tek bir string değişkene birden fazla INSERT INTO deyimi ekleterek tek bir sorgunun sunucuya gönderilmesi ile bile yapılabiliyor diye biliyorum.

Kod:

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Cevap "userform üzerindeki textboxlardan veri gönderilecek" şeklinde ise burada ayrışıyoruz. Textboxlardaki verilerden ilk veriyi gönderdik diyelim, sonraki kayıtların verilerini nereden alacak peki? Textboxlardaki aynı kaydı tekrar tekrar göndermek gibi bir niyetiniz yoksa böyle bir şey mümkün değil.

Local · 16 Şub 2024

Hocam şöyle ekteki dosyada StokKartFormu varmı o formda 1 'er tane olacak şekilde tasarlamıştım .Mesela 3 tane ürün geldi bu ürünleri tek seferde forma girecek şöyleki ana projemde bu var 3 tane textbox bu textboxlara stok kodu girilecek (ayrı stok kodları) daha sonra ürün grubu var 3 tane içinde ürün grubu için textbox buraları form üzerinde doldurup alt alta sunucuya kaydedecek bu anlattığım form bende var çoklu kayıt şuan excel sayfasına kaydediyor ama ileriki zamanlarda yavaşlamalar olacak o yüzden sunucuya alıyorum verileri.

Userform üzerinden verileri göndereceğim hep farklı kayıt girilecek aynı değil stok kodlarını otomatik yapmıştım farklı stok koıdları atıyor buraya kadar herşey normal

Local · 16 Şub 2024

Daha sonra yeni sql sorularıyla görüşürüz hocam

aeGNoR · 16 Şub 2024

Local' Alıntı:
Hocam şöyle ekteki dosyada StokKartFormu varmı o formda 1 'er tane olacak şekilde tasarlamıştım .Mesela 3 tane ürün geldi bu ürünleri tek seferde forma girecek şöyleki ana projemde bu var 3 tane textbox bu textboxlara stok kodu girilecek (ayrı stok kodları) daha sonra ürün grubu var 3 tane içinde ürün grubu için textbox buraları form üzerinde doldurup alt alta sunucuya kaydedecek bu anlattığım form bende var çoklu kayıt şuan excel sayfasına kaydediyor ama ileriki zamanlarda yavaşlamalar olacak o yüzden sunucuya alıyorum verileri.

Userform üzerinden verileri göndereceğim hep farklı kayıt girilecek aynı değil stok kodlarını otomatik yapmıştım farklı stok koıdları atıyor buraya kadar herşey normal

Sistem kurgunuzu tam olarak bilmediğimden varsayımsal yorumlar yapabiliyorum. Kurguyu tam olarak bilmeden tam bir çözüme ulaşmanız mümkün değil. Sadece fikir verebilecek şeyler sunabiliriz size (en azından ben kendi adıma öyle düşünüyorum. Çünkü bir yerde yapacağımız bir değişiklik bilmediğimiz oraya bağlı sistemleri geri dönülemez şekilde bozabilir ya da farklı sebeplerden veri kayıplarına neden olabilir)

Ama size tavsiyem böyle sistemler tasarlarken kurguya önem vermeniz. Her bir formdaki her bir ihtimali değerlendirerek tasarlanmalı. Mesela siz formda her kayıt için 3 textbox dediğinizde bununla ilgili nasıl bir sistem tasarlanır diye düşünmeye başladığımda ihtimaller tansiyonumu yükseltti 😅

Local · 16 Şub 2024

Hocam o zaman konuyu kapatmayalım kalsın böyle

Local · 23 Şub 2024

Hocam merhaba kodları yazdım fakat çalıştırınca Listview ekranına veriler gelmedi.

aeGNoR · 23 Şub 2024

Local' Alıntı:
Hocam merhaba kodları yazdım fakat çalıştırınca Listview ekranına veriler gelmedi.

Formun üzerinde listview var, açılışta içine liste alıyorsunuz. Daha sql ile veritabanına kayıt gönderdikten sonra listviewde görüntüleyemiyorsunuz. Doğru mu anlıyorum?

Local · 23 Şub 2024

Evet tablo başlıkları geliyor fakat veriler yok verileri çekemiyorum listview tablosuna

aeGNoR · 23 Şub 2024

EĞER yukarıda bahsettiğim gibi oluyorsa listviewe verileri alma mantığını sağlam oturtmak gerekiyor. Her işlemden sonra listview'in güncellenmesi ile ilgili kendi kullandığım yöntemi aşağıda göstereyim belki bir fikir verir.

Kod:

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Ayrıca yazdığım kodlar gerçek kodlar değil. Bu kodların gerçek kullanımında hata kontrolleri gibi durumlar yapılıyor. Ben sadece fikir vermesi açısından söyledim.

Local · 23 Şub 2024

query kısmını bu şekilde dolduracağım değilmi tablo başlıkları ve textboxların aldığı değeler yada sadece tablo başlıkları

Sql = "insert into stokzimmetkayıt(Stok_Zimmet_ID,Stok_Kodu,FişNumarası,Ürün_Adı,Teslim_Edilen_Personel,Teslim_Eden_Anbar_Personeli,Ürün_Grubu,Grup_Koduİsmi,Stok_Cinsi,Teslim_Edilen_Birim,Birim,Adet,Ürün_Tip,Üretici_Firma,Marka_1,Marka_2,Durum,Kayıt_Tarihi,Seri_Numarası,Diğer_Bilgiler,Zimmet_Tarihi,İrsaliye_Numarası,GirişYapılan_Yer)values(" & text_id & ",'" & txtstok & "', '" & TextBox3 & "','" & textürünadı & "', '" & combo_personel & "', '" & ComboBox2 & "', '" & combourungrup & "','" & TextBox5 & "', '" & stok_combo & "','" & combo_teslim_edilen & "', '" & birim_combo & "'," & combo_adet & ", '" & ürün_combo & "', '" & combo_firma & "', '" & combo_marka1 & "','" & text_marka & "','" & combo_durum & "', '" & kayit_tarih & "', '" & text_seri & "','" & text_bilgi & "', '" & zimmet_tarih & "','" & text_irsaliye & "', '" & depo_combo & "')"

Refaz · 24 Şub 2024

aeGNoR' Alıntı:
dim con as adodb.connection

aeGNoR' Alıntı:
dim rs as adodb.recordset

Yukarda new ile tanımlanmadığı için bence çalışmaması gerek.

aeGNoR' Alıntı:
rs.field(1).value

Yukardada s unutulmuş.

aeGNoR · 24 Şub 2024

Local' Alıntı:
query kısmını bu şekilde dolduracağım değilmi tablo başlıkları ve textboxların aldığı değeler yada sadece tablo başlıkları

Sql = "insert into stokzimmetkayıt(Stok_Zimmet_ID,Stok_Kodu,FişNumarası,Ürün_Adı,Teslim_Edilen_Personel,Teslim_Eden_Anbar_Personeli,Ürün_Grubu,Grup_Koduİsmi,Stok_Cinsi,Teslim_Edilen_Birim,Birim,Adet,Ürün_Tip,Üretici_Firma,Marka_1,Marka_2,Durum,Kayıt_Tarihi,Seri_Numarası,Diğer_Bilgiler,Zimmet_Tarihi,İrsaliye_Numarası,GirişYapılan_Yer)values(" & text_id & ",'" & txtstok & "', '" & TextBox3 & "','" & textürünadı & "', '" & combo_personel & "', '" & ComboBox2 & "', '" & combourungrup & "','" & TextBox5 & "', '" & stok_combo & "','" & combo_teslim_edilen & "', '" & birim_combo & "'," & combo_adet & ", '" & ürün_combo & "', '" & combo_firma & "', '" & combo_marka1 & "','" & text_marka & "','" & combo_durum & "', '" & kayit_tarih & "', '" & text_seri & "','" & text_bilgi & "', '" & zimmet_tarih & "','" & text_irsaliye & "', '" & depo_combo & "')"

Evet o şekilde olacak. Ben "query" adında değişken tanımladıktan sonra "rs.open query, con, 3, 1" satırında kullandım.
Siz sql diye tanımlayıp "rs.open sql, BaglantiNesnenizinAdi, 3, 1" şeklinde kullanabilirsiniz.

Yukarıda yazdığım mantık her hareketten sonra listview nesnenizi güncelleyecek mantık. Ayrı bir Sub prosedüründe listview nesnenizi dolduran kodları yazarsınız, daha sonra ihtiyaç olan her yerde çağırabilirsiniz.

Projenizde ListViewDoldur() diye bir prosedür tanımladınız diyelim. Form açılışında UserForm_Initialize olayında çağırabilirsiniz. Ekleme mi yaptınız ekleme kodundan sonra hemen ListViewDoldur ile çağırabilirsiniz. Güncelleme mi yaptınız güncelleme kodundan sonra hemen ListViewDoldur ile çağırabilirsiniz. Böylece veritabanınızda gerçekleşen her değişimi anında listview nesnesinde görüntülemiş olursunuz.

Bu arada üstad Refaz Bey yazdığım örnek kodda kritik hatalar bulmuş, olayın genel mantığını anlatmak için kabaca örnek yazmıştım, oradaki hataları da yapmamaya dikkat etmek gerekir.

aeGNoR · 24 Şub 2024

Local
Size kabaca bir örnek hazırladım. ListViewDoldur prosedürünü bütün hareketlerden sonra çağırdığıma dikkat etmenizi rica ediyorum.

Ayrıca Baglanti diye bir class oluşturup bütün ADODB nesnelerini orada tanımladım. her defasında bağlantı, kayıtseti, bağlantımetni gibi değişkenleri tekrar tekrar çağırmak zorunda kalmıyoruz.

Formun genel değişken tanımlama kısmına Dim b as Baglanti diye bir kere tanımladıktan sonra kullanacağımız olaylar ya da prosedürler içinde set b = new Baglanti şeklinde çağırarak classı kullanabiliyoruz.

aeGNoR · 24 Şub 2024

Baglanti classında default ConnectionString metni Class_Initialize olayında aşağıdaki gibi tanımlandı

Kod:

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Kullanırken değiştirmek isterseniz ya buradan düzenleyin ya da kullandığınız olay ya da prosedür içinde aşağıdaki örnekteki gibi değiştirebilirsiniz.

Kod:

Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.

Local · 25 Şub 2024

Teşekkürler hocam Accses örneğiniz için ben yine aynı şekilde bu kodları yazsam phpmyadmin için çalışır değilmi..

Local · 25 Şub 2024

Refaz' Alıntı:
Yukarda new ile tanımlanmadığı için bence çalışmaması gerek.

Yukardada [COLOR=%s]s[/COLOR] unutulmuş.

S kısmı nereye gelecek acaba.?

Local · 25 Şub 2024

Teşekkürler hocam Accses örneğiniz için ben yine aynı şekilde bu kodları yazsam phpmyadmin için çalışır değilmi..

Private Sub Class_Initialize()
Set con = New ADODB.Connection
Set rs = New ADODB.Recordset
Set cmd = New ADODB.Command
m_ConnStr = "Provider=Microsoft.Ace.OLEDB.12.0;Data Source=" & ThisWorkbook.Path & "\Data.accdb;Persist Security Info=False;"
End Sub

m_Constr kısmınıa sunucu bağlantı adı ve şifresini yazarak değiştireceğim doğrumudur.Yukarda yazdığınız örnektenmi drevam edeyim Sayın refazın yotum yaptığı yoksa verdiğniz örnektenmi .

Refaz · 25 Şub 2024

Local' Alıntı:
S kısmı nereye gelecek acaba.?

rs.fields
Yukardaki gibi gelecek.
0 Olan yerde var diğerlerinde unutulmuş.

Local · 25 Şub 2024

aeGNoR hocam sunucudan verileri Listview tablosuna aktarma işlemini gerçekleştirdim desteğinizle arama formu için ne önerirsiniz ekteki ilk dosyamda arama formu mevcut verileri sunucudan çekerek filtreleme işlemini nasıl yapabiliriz.

Foruma hoş geldin 👋 Ziyaretçi

Çözüldü Sql ile Verileri Güncelleme ,Silme

Local

Ekli dosyalar

aeGNoR

Local

aeGNoR

Local

Local

aeGNoR

Local

Local

aeGNoR

Local

aeGNoR

Local

Refaz

aeGNoR

aeGNoR

Ekli dosyalar

aeGNoR

Local

Local

Local

Refaz

Local

aeGNoR hocam sunucudan verileri Listview tablosuna aktarma işlemini gerçekleştirdim desteğinizle arama formu için ne önerirsiniz ekteki ilk dosyamda arama formu mevcut verileri sunucudan çekerek filtreleme işlemini nasıl yapabiliriz.

Konuyu okuyanlar

Foruma hoş geldin 👋 Ziyaretçi

Çözüldü Sql ile Verileri Güncelleme ,Silme

Ekli dosyalar

Ekli dosyalar

aeGNoR hocam sunucudan verileri Listview tablosuna aktarma işlemini gerçekleştirdim desteğinizle arama formu için ne önerirsiniz ekteki ilk dosyamda arama formu mevcut verileri sunucudan çekerek filtreleme işlemini nasıl yapabiliriz.​

Konuyu okuyanlar

aeGNoR hocam sunucudan verileri Listview tablosuna aktarma işlemini gerçekleştirdim desteğinizle arama formu için ne önerirsiniz ekteki ilk dosyamda arama formu mevcut verileri sunucudan çekerek filtreleme işlemini nasıl yapabiliriz.