ورود

View Full Version : مشكل در جستجو رشته در بانك SQL



mbr485
شنبه 20 مهر 1387, 12:39 عصر
با سلام
من با استفاده از 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
یک شنبه 28 مهر 1387, 16:28 عصر
با سلام.

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


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
پنج شنبه 02 آبان 1387, 18:49 عصر
از
QuotedStr()

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

tefos666
سه شنبه 07 آبان 1387, 23:07 عصر
دوست عزیز با ایجاد پارامتر به راحتی مشکلت حل میشه فقط قبل از : حتما یک فاصله بزار
تازه اگه خواستی عددی برگرده فقط جای 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 :لبخندساده: