نمایش نتایج 1 تا 2 از 2

نام تاپیک: خواهشا کمک کنید

  1. #1

    خواهشا کمک کنید

    دوستان خواهشا جواب بدید
    چطور میتوانم اطلاعات adodc که تونستم با دستور select یک ردیف اون انتخاب کنم و بفرستم به کریستال ریپورت
    یعنی اطلاعات همان ردیف دیتا گرید رو بدم فقط به کریستال

  2. #2
    کاربر دائمی آواتار bitasoft.ir
    تاریخ عضویت
    اسفند 1387
    محل زندگی
    جنگلهای تاریک اصفهان
    سن
    44
    پست
    279

    نقل قول: خواهشا کمک کنید

    نقل قول نوشته شده توسط vblink مشاهده تاپیک
    دوستان خواهشا جواب بدید
    چطور میتوانم اطلاعات adodc که تونستم با دستور select یک ردیف اون انتخاب کنم و بفرستم به کریستال ریپورت
    یعنی اطلاعات همان ردیف دیتا گرید رو بدم فقط به کریستال
    برای ارسال اطلاعات از یک ردیف انتخاب شده از یک ADODC به یک گزارش Crystal Reports در VB6، می‌توانید از مراحل زیر پیروی کنید:
    ابتدا، مطمئن شوید که شما از ADODC برای اتصال به پایگاه داده خود و انتخاب داده‌های مورد نیاز استفاده کرده‌اید.
    یک گزارش Crystal Reports در پروژه خود ایجاد کنید و آن را با فیلدهای مورد نیاز خود در پایگاه داده تنظیم کنید.
    در فرم یا محیطی که قصد دارید اطلاعات را به گزارش Crystal ارسال کنید، از کد زیر برای انتقال اطلاعات استفاده کنید:

    ' تعریف یک متغیر برای نگهداری کانکشن ADODC
    Dim cnn As ADODB.Connection
    Set cnn = Adodc1.Connection ' Adodc1 باید نام ADODC شما باشد


    ' تعریف دستور SQL بر اساس معیار مورد نظر شما
    Dim strSQL As String
    strSQL = "SELECT * FROM YourTable WHERE YourCriteria" ' تغییر YourTable و YourCriteria به مقادیر مورد نیاز


    ' تعریف یک دیتا ریکوردست
    Dim rs As ADODB.Recordset
    Set rs = New ADODB.Recordset


    ' اجرای دستور SQL
    rs.Open strSQL, cnn


    ' انتقال داده‌های ردیف فعلی به گزارش Crystal
    CrystalReport1.ParameterFields.GetItemByName("Your ParameterName").AddCurrentValue rs.Fields("YourFieldName").Value ' تغییر YourParameterName و YourFieldName به مقادیر مورد نیاز


    ' باز کردن گزارش
    CrystalReport1.Action = 1


    ' بستن رکوردست و اتصال ADODC
    rs.Close
    Set rs = Nothing
    در این کد، شما باید YourTable را با نام جدول مورد نظر و YourCriteria با شرط مورد نیاز خود جایگزین کنید. همچنین، YourParameterName را با نام پارامتر گزارش و YourFieldName را با نام فیلد مورد نظر از جدول جایگزین کنید. در پروژه‌ی‌تان، می‌توانید یک کلید یا رویداد (مثلاً کلیک بر روی یک دکمه) ایجاد کنید و کد بالا را در این رویداد قرار دهید تا اطلاعات انتخاب شده از ADODC به گزارش Crystal انتقال یابد و گزارش نمایش داده شود. این کد به شما این امکان را می‌دهد که اطلاعات از ADODC را به صورت پارامترها به گزارش Crystal انتقال دهید و گزارش با اطلاعات مورد نظر شما پر شود.

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •