مشكل در جستجو رشته در بانك SQL

[mbr485]

با سلام
من با استفاده از Adoquery مي خواهم از يك Edit محتواي آن را در جدول SQL پيدا كنم .
از دستور زير استفاده مي كنم ولي نمي دانم چرا جواب نمي دهد .

XStr:=UpperCase(LastNameBox.Text); // cast to all upper case
Q1.DisableControls;
Q1.Close;
Q1.SQL.Clear;
XS1:='select * from Employee.db D ';
Q1.SQL.Add(XS1);
XS1:=' where (upper(LastName) like "' +XStr +'%")'; // use UpperCase cast
Q1.SQL.Add(XS1);
XS1:=' order by LastName';
Q1.SQL.Add(XS1);
Q1.Open;
Q1.EnableControls;

[delphiprog3000]

با سلام.

دوست من پیشنهاد میکنم نگاهی به این تاپیکها بندازی روشهای جستجو رو کامل متوجه میشی.


http://barnamenevis.org/forum/showthread.php?t=126497&highlight=%D8%AC%D8%B3%D8%AA%D8%AC%D9%88%DB%8C+%DA %86%D9%86%D8%AF+%D9%81%DB%8C%D9%84%D8%AF

http://barnamenevis.org/forum/showthread.php?t=94956&highlight=

http://barnamenevis.org/forum/showthread.php?t=75552&highlight=%D8%AC%D8%B3%D8%AA%D8%AC%D9%88%DB%8C+%DA %86%D9%86%D8%AF+%D9%81%DB%8C%D9%84%D8%AF

http://barnamenevis.org/forum/showthread.php?t=22280&highlight=%D8%AC%D8%B3%D8%AA%D8%AC%D9%88%DB%8C+%DA %86%D9%86%D8%AF+%D9%81%DB%8C%D9%84%D8%AF

http://barnamenevis.org/forum/showthread.php?t=88786





موفق باشید.............

[oghab]

از
QuotedStr()

براي گذاشتن كوتيشن دو طرف رشته مورد نظرت استفاده كن

[tefos666]

دوست عزیز با ایجاد پارامتر به راحتی مشکلت حل میشه فقط قبل از : حتما یک فاصله بزار
تازه اگه خواستی عددی برگرده فقط جای value از asinteger یا بجای quetostr از strtoint استفاده کن !!! البته راه حل اساتید هم که دیگه بهتر از مال منه :گیج:
تو کوئری یا لود فرم کد زیر رو بنویس


query1.sql.clear;
query1.sql.add('select * from table where name= :@param1');
رو دکمه کد زیر رو بنویس



query1.close;
query1.parameters.paramsbyname('@param1').value:=q uetostr(edit1.text);
query1.open;
موفق باشید . success is doing , not wishing :لبخندساده: