ozcank yazdı: ↑25 May 2020 08:02
Excel den SQL veri tabanına data alıyorum fakat Excel de bazı alanlar NULL ve boş bu durumda kontrol etmek istiyorum eğer NULL veya boş ise veri tabanına yazmayacak. Bu şekilde yapmaya çalıştım ama olmadı.
Merhaba,
Kullandığınız yöntemde Excel'den okunan veriler Variant türünde bir değişkende saklanır. Variant değişkenlerin NULL kontrolünü aşağıdaki şekilde yapabilirsiniz.
Kod: Tümünü seç
uses
System.Variants;
if VarIsNull(ExcelWorkSheet1.Cells.Item[ Satir, 15 ].Value) then
// Değer Null
else
// Değer Null değil
Eğer sizin için NULL *veya* Boş olması aynı şey ise bu defa iki kontrolü birlikte yapan aşağıdaki fonksiyonu kullanabilirsiniz
Kod: Tümünü seç
uses
System.Variants;
if VarIsNull(ExcelWorkSheet1.Cells.Item[ Satir, 15 ].Value) or VarIsEmpty(ExcelWorkSheet1.Cells.Item[ Satir, 15 ].Value) then
// Değer Null veya boş
else
// Değer Null veya boş değil
Eğer NULL durumunda farklı ve boş olması durumunda farklı işlem yapmak isterseniz bu durumda aşağıdaki gibi bir kod yazabilirsiniz
Kod: Tümünü seç
uses
System.Variants;
if VarIsNull(ExcelWorkSheet1.Cells.Item[ Satir, 15 ].Value) then
// Değer Null
else
if VarIsEmpty(ExcelWorkSheet1.Cells.Item[ Satir, 15 ].Value)
// Değer boş
else
// Değer mevcut
NOT: Delphi 7 için uses kısmına System.Variants değil, sadece Variants yazmalısınız.