içinde ' işareti olan kelimeleri arama

[sako]

içinde ' işareti olan kelimeleri aramak itediğimde hata veriyor. Örnek Müdülüğü'ne kelimesini arattığımda hata veriyor. Bu hatadan nasıl kurtulabilirim...

[destiny24]

#39 da ' yerine geçtiği için aşağıdaki gibi kullanabilirsin.

procedure Form1.btn1Click(Sender: TObject);
var
bosDegisken: String;
i: Integer;
begin
bosDegisken := edit1.Text;
i := Pos(#39, bosDegisken);
end;

[sabanakman]

Aranacak bilgileri QuotedStr fonksiyonu ile biçimlendirerek aramalısın.

[sako]

sql cümlem şu şekilde

gelirtoplamlari.close;
gelirtoplamlari.SelectSQL.Clear;
gelirtoplamlari.selectSQL.Add('select sum(gelen) as gelenmiktar from gelen where tum_kod like ''%'+GKOD1.Text+'%'''+ 'and birim_kod like ''%'+gbirimler.Text+'%'''+ 'and (donem BETWEEN :ilkdonem AND :sondonem)');
gelirtoplamlari.ParamByName('ilkdonem').value:=Label14.Caption;
gelirtoplamlari.ParamByName('sondonem').Value:=Label14.Caption;
gelirtoplamlari.open;
gelirtoplamlari.FetchAll;

hata veren kısım GKOD1.Text e aktardığım arama kelimesi. Yani GKOD1.Text e aktardığım kelime içerisinde ' işareti varsa hata alıyorum.

[sabanakman]

Aranacak bilgileri QuotedStr fonksiyonu ile biçimlendirerek aramalısın.

sql cümlem şu şekilde

gelirtoplamlari.close;
gelirtoplamlari.SelectSQL.Clear;
gelirtoplamlari.selectSQL.Add('select sum(gelen) as gelenmiktar from gelen where tum_kod like ''%'+QuotedStr(GKOD1.Text)+'%'''+ 'and birim_kod like ''%'+QuotedStr(gbirimler.Text)+'%'''+ 'and (donem BETWEEN :ilkdonem AND :sondonem)');
gelirtoplamlari.ParamByName('ilkdonem').value:=Label14.Caption;
gelirtoplamlari.ParamByName('sondonem').Value:=Label14.Caption;
gelirtoplamlari.open;
gelirtoplamlari.FetchAll;

hata veren kısım GKOD1.Text e aktardığım arama kelimesi. Yani GKOD1.Text e aktardığım kelime içerisinde ' işareti varsa hata alıyorum.

[sako]

Hocam hata vermedi ama bu sefer de hiç bir sonuç bulamadı. MEsela aranacak kelimeyi yazdığı nesnenin içi boşken bütün akyıtları listeliyordu. Ama şimdi o şekilde bile hiçbir kayıt çıkmıyor...

[unicorn64]

kodu debug edip oluşan sql stringini kontrol etseniz daha kolay sonuca ulaşırsınız, oluşan sql i ibexpertte bi çalıştırın önce, sanırım son durumda tırnak işareti fazla geliyor bir yerde

[sako]

Herhangi bir hata ösz konusu değil ki. Eksik ya da fazla tırnak işareti olsa hata verir çalışmazdı ki...

[sabanakman]

Artık bu noktadan sonra bir ton deneme yanılma yaparak problemin kaynağını yakalama çalışmalarına girişmelisiniz. Aksi halde "o çalışmadı, bu olmadı, şunu da denedim" ler ile yol alamazsınız. Mesela büyük küçük harf ayrımı var mı? sağda veya solda boşluk kayıt edilmiş olabilir mi? Türkçe karakter ile alakalı bir sıkıntı mı? Bu ve benzeri doğabilecek sıkıntıları basitten karmaşığa giden arama çalışmaları ile test etmeniz gerekmektedir.

[sako]

Artık bu noktadan sonra bir ton deneme yanılma yaparak problemin kaynağını yakalama çalışmalarına girişmelisiniz. Aksi halde "o çalışmadı, bu olmadı, şunu da denedim" ler ile yol alamazsınız. Mesela büyük küçük harf ayrımı var mı? sağda veya solda boşluk kayıt edilmiş olabilir mi? Türkçe karakter ile alakalı bir sıkıntı mı? Bu ve benzeri doğabilecek sıkıntıları basitten karmaşığa giden arama çalışmaları ile test etmeniz gerekmektedir.

haklısınız. ben Biraz kurcaliyim kodları. İnşallah sonuca ulaşırım

[aslangeri]

s.a.
sağlıklısı text ifadeleride parametre olarak göndermen olacaktır.
yada tek tırnak işaretinin yanına iki tane daha tırnak işareti eklemen sorununu çözecektir. en sağlıklısı parametre olur.
kolay gelsin.