گزارش گیری با ویژوال بیسیک

[alicomputer]

با عرض سلام و خسته نباشید
من میخوام اطلاعاتی که از query یا فیلتر کردن و جستجو در بانک بدست آوردم را در دیتاریپورت به من نشان بده حالا باید چه کار کنم.
البته query را با (data) دیتا بدست آوردم و با adodc کار نکردم و بانکم را نیز با اکسس خود ویژوال بیسیک ساختم (visual data manager) لطفا کمکم کنید.
نیاز سریع به پاسخ دارم.
کد کامل برام بنویسید

[sokote_bi_payan]

بسم رب الشهدا

با سلام

دوست عزیز شما با استفاده از یک شی از نوع رکوردست می توانید به راحتی یک کوئری بنویسید و در دیتا ریپورت تون ازش استفاده کنید

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

یا علی

[alicomputer]

اگه برام مثال بزنید لطف کردید

[hosseinhossein]

سلام عزیز اگه جواب خودتو پیدا کردی برام بفرست چون من هم مشگل تورو دارم
hossein_ironi2000

[vbhamed]

سلام
فرض کنیم شما یک DataEnvironment دارید به اسم DE با یک Connection به اسم cn که و یک DataReport به اسم DR که DR اطلاعاتش رو از cn می گیره، ضمنا یک Command به اسم cmd هم داریم

دستورات زیر را بنویسید و به جای mybank.mdb و Table1 به ترتیب اسم بانک اطلاعاتی و جدولتون رو قرار بدید، بعد از Where هم شرط مورد نظرتون رو بزارید



On Error Resume Next

Dim Sql As String

DE.cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & Replace(app.path & "\mybank.mdb","\\,"\")

DE.Recordsets("cmd").Close

Sql = "Select * From Table1 Where ..."

DE.Recordsets("cmd").Open Sql
DR.Show