ورود

نسخه کامل مشاهده نسخه کامل : جستجو در Grid دلفی به کمک پروسیجر Sql



poriji
11-06-2010, 14:47
با سلام
قصد دارم با استفاده از یک پروسیجر و فرستادن پارامتر آن از طریق یک Editbox روی یک جدول عملیات جستجو را انجام بدهم
کد پروسیجر با شکل زیر است:

کد:

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
کد دلفی هم یه شکل زیر:
کد:

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

لطفا راهنمایی کنید که چرا بدون دادن خطا هیچ اتفاقی در جدول رخ نمیده
با تشکر

a-soft
30-06-2010, 15:44
سلام.
من یک برنامه با دلفی دارم و می خواهم در فرم اول آن user و pass را از کاربر بگیرم اگر درست بود کاربر وارد بشه .
برای همین هم در sql یک table با نام های user و pass ایجاد کردم و مقدار 1 را درون هر دو فیلد ریختم .
بعد در دلفی روی باتن این کد را نوشتم :
if edit1.text= adotable1.fieldbyvalue('user') and edit2.text=adotable1.fieldbyvalue('pass') then
form2.show
خطا نمی گیره ولی اجرا هم نمیشه یعنی فرم 2 را نشون نمیده.
تشکر.

pourya_lover
01-07-2010, 02:18
با سلام من با یه کوئری برات توضیح میدم حالا اگه خواستی به روش خودتم این کارو بکن

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
موفق باشی

a-soft
01-07-2010, 09:53
سلام دوست عزیز.
دستور شما درست ولی می خواستم بدانم اولا مشکل دستور من کجاست و ثانیا اگر بخواهم دستور خودم را با پروسیجر بنویسم چطوری می شه این کار را کرد ؟
تشکر

pourya_lover
01-07-2010, 18:59
اون قسمت شرطتو توی یه پرانتز بذار ببین درست میشه یا نه
اینجوریش کن

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

a-soft
01-07-2010, 22:19
سلام.
این کاررا کرده بودم ولی در اینجا یادم رفته بود بنویسم ولی باز هم جواب نمی دهد .

a-soft
01-07-2010, 23:52
سلام.
من این sp را نوشتم و با دلفی هم به آن وصل شدم ولی مثل اینکه جستجو جوابی پیدا نمیکنه یعنی recordcount صفر است :
create procedure enterk (@use nvarchar(10),@pas nvarchar(10))
as
begin
select * from enteruse where
usern=@use and pass=@pas
end
و این دستورات را هم در دلفی نوشتم :
ADOStoredProc1.Parameters.ParamByName('@use').Valu e :=edit1.Text ;
ADOStoredProc1.Parameters.ParamByName('@pas').Valu e :=edit2.Text ;
ADOStoredProc1.ExecProc ;

if ADOStoredProc1.RecordCount =1 then
begin
form2.Show ;
form1.Hide;
end;

a-soft
02-07-2010, 23:06
سلام .
اگر بخواهم دستور insert را مانند تاپیک 5 بنویسم چطوری میشه ؟
تشکر.

aboualfazl
28-10-2012, 00:27
سلام دوست عزیز ، هر چند میدونم دیر شده واسه جواب ، ولی احتمال میدم به درد بعضی های دیگه بخوره .جواب شما میشه این :

برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید

ضمنا بایستی در قسمت uses این رو هم اضافه کنید (db)