merhaba arkadaşlar aşağıdaki kodala excelden accese veri yolluyorum ama bazen hücreler boş kalabilior o zamanda hata veriyor illaki hücreleri doldurmam gerekiyor hücre boşsa onu atla şeklinde bir şey yapmak mümkün mü ?
teşekkürler.
Kod:
strqry = "Insert into adres(isim,BABA_ADI,ANA_ADI) VALUES ('" + Hcr.Text + "','" + Hcr.Offset(0, 2).Text + "','" + Hcr.Offset(0, 3).Text + "')"
con.Execute strqry
ilgili alan boş ise
NULL yazarak denenebilir
tabi örneğiniz olmadığı için deneme imkanım olmadı ama kabaca aşağıdkine benzer bir kod kullanılabilir
iif(len(alan)=0,null, değer) mantığı kullanılmıştır
strqry = "Insert into adres(isim,BABA_ADI,ANA_ADI) VALUES (" & iif(len(Hcr.Text)=0,"Null", "'" & Hcr.Text & "'") & ","
& iif(len( Hcr.Offset(0, 2).Text )=0,"Null","'" & Hcr.Offset(0, 2).Text & "'") & "," & iif(len( Hcr.Offset(0, 3).Text )=0,"Null","'" & Hcr.Offset(0, 3).Text & "'" ) & ")"
con.Execute strqry
(17/09/2022, 14:30)berduş yazdı: [ -> ]ilgili alan boş ise NULL yazarak denenebilir
tabi örneğiniz olmadığı için deneme imkanım olmadı ama kabaca aşağıdkine benzer bir kod kullanılabilir
iif(len(alan)=0,null, değer) mantığı kullanılmıştır
strqry = "Insert into adres(isim,BABA_ADI,ANA_ADI) VALUES (" & iif(len(Hcr.Text)=0,"Null", "'" & Hcr.Text & "'") & ","
& iif(len( Hcr.Offset(0, 2).Text )=0,"Null","'" & Hcr.Offset(0, 2).Text & "'") & "," & iif(len( Hcr.Offset(0, 3).Text )=0,"Null","'" & Hcr.Offset(0, 3).Text & "'" ) & ")"
con.Execute strqry
teşekkürler elinize sağlık.
sorunsuz çalıştı mı?
cevaplanmışlara taşıyalım mı?
(17/09/2022, 16:28)berduş yazdı: [ -> ]sorunsuz çalıştı mı?
cevaplanmışlara taşıyalım mı?
evet sorunsuz çalişti teşekkürler.
rica ederim
iyi çalışmalar
Not: Lütfen sorularınıza her zaman örnek dosya ekleyiniz