تبلیغات :
ماهان سرور
آکوستیک ، فوم شانه تخم مرغی ، پنل صداگیر ، یونولیت
دستگاه جوجه کشی حرفه ای
فروش آنلاین لباس کودک
خرید فالوور ایرانی
خرید فالوور اینستاگرام
خرید ممبر تلگرام

[ + افزودن آگهی متنی جدید ]




نمايش نتايج 1 به 5 از 5

نام تاپيک: نمایش نتیجه یک select !!!!!!!!!!!!!!!!!

  1. #1
    در آغاز فعالیت
    تاريخ عضويت
    Jul 2011
    پست ها
    6

    پيش فرض نمایش نتیجه یک select !!!!!!!!!!!!!!!!!

    سلام میخوام با کد نویسی رکوردی رو بازیابی کنم که table اون در اسکیوال 2005 موجوده و در یک DBGrig نمایش بده. از یک ADOQuery,ADOConnection,DataSource استفاده کردم .
    این کد رو هم نوشتم اما چیزی نشون نمیده. error هم نمیده


    procedure TForm1.Button1Click(Sender: TObject);
    begin
    ADOQuery1.Close;
    ADOQuery1.sql.Clear;
    ADOQuery1.sql.Add( 'Select Top(1)* From Forms' );
    ADOQuery1.active:=true;
    ADOQuery1.open;
    ADOQuery1.ExecSQL;
    end;


    لطفا کمک کنید.....................

  2. #2
    کاربر فعال آنتی‎ویروس و نرم‎افزارهای امنیتی M.Hashemi's Avatar
    تاريخ عضويت
    Sep 2008
    محل سكونت
    کرمان - رفسنجان
    پست ها
    726

    پيش فرض

    با سلام
    دوست عزیز من درست متوجه نشدم مشکل شما کجاست.
    اما تا جایی که فهمیدم کمکتون میکنم :
    1- برای گرفتن query نیازی به دستور execsql نیست و باید از همان open استفاده کنید :
    کد:
    برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
    2- من در دستوراتی که نوشتید اثری از connection string نمیبینم.
    شما برای اتصال به پایگاه داده یا باید connection string را مستقیما به query وصل کنید یا با استفاده از ado connection این کار را انجام دهید :
    کد:
    برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
    * خود دلفی قابلیت ساخت connection string را دارد اما اگر نتوانستید بسازید می توانید از سایت زیر استفاده کنید :
    کد:
    برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
    3- شما باید از datasource به صورت زیر استفاده کنید :
    کد:
    برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
    بازم اگر سوالی بود در خدمتم
    با تشکر

  3. #3
    در آغاز فعالیت
    تاريخ عضويت
    Jul 2011
    پست ها
    6

    14 مرسی اماااااااا

    ممنون مشکلم حل شد الان برای Insert کردن مشکل دارم
    کدم اینه:
    procedure TForm1.Insert_ButtonClick(Sender: TObject);
    begin
    ADOConnection1.Close;
    ADOQuery1.SQL.Clear;
    ADOQuery1.SQL.Add('Select * from forms');
    ADOCommand1.CommandText:='Insert into [Forms] ([ID],[Status]) Values (:ID,:Status)';
    ADOCommand1.Parameters.ParamByName('ID').Value:= Edit2.Text;
    ADOCommand1.Parameters.ParamByName('Status').Value := 'OK';
    ADOCommand1.Execute;
    ADOQuery1.Active:=true;
    ADOConnection1.Open;
    end;
    خطا میده میگه: explicit value نمیتونه وارد کنه چون
    IDENTITY_INSERT is set to OFF

  4. #4
    کاربر فعال آنتی‎ویروس و نرم‎افزارهای امنیتی M.Hashemi's Avatar
    تاريخ عضويت
    Sep 2008
    محل سكونت
    کرمان - رفسنجان
    پست ها
    726

    پيش فرض

    با سلام
    شما با همان adoquery می توانید دستورات sql را اجرا کنید.
    به این صورت :
    کد:
    برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
    با تشکر

  5. این کاربر از M.Hashemi بخاطر این مطلب مفید تشکر کرده است


  6. #5
    حـــــرفـه ای مرد مباح's Avatar
    تاريخ عضويت
    Dec 2005
    محل سكونت
    روي ميخ
    پست ها
    2,143

    پيش فرض

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

    موفق باشی.

  7. این کاربر از مرد مباح بخاطر این مطلب مفید تشکر کرده است


Thread Information

Users Browsing this Thread

هم اکنون 1 کاربر در حال مشاهده این تاپیک میباشد. (0 کاربر عضو شده و 1 مهمان)

User Tag List

قوانين ايجاد تاپيک در انجمن

  • شما نمی توانید تاپیک ایحاد کنید
  • شما نمی توانید پاسخی ارسال کنید
  • شما نمی توانید فایل پیوست کنید
  • شما نمی توانید پاسخ خود را ویرایش کنید
  •