نمایش رکوردهای خاص در vb6

[mehdi.ganji62]

سلام.با تشکر از سایت خوبتون:تشویق:
من یه بانک اطلاعاتی به نام billing دارم و می خوام یه سری رکورد خاصی رو تو datareport نمایش بدم
مثال: من تو form1 یه label1 دارم که می خوام اگه مقدارش با مقدار فیلد day از بانک برابر بود تمامی فیلداشو نمایش بده یعنی مثلا نام و نام خانوادگی افرادی که روز تولدشون امروزه
بازم تشکر :بوس:

[m.4.r.m]

شما مقدار Adodc1.RecordSource رو باید با این مقادیر قرار بدید تا نمایش بده

Adodc1.RecordSource = "Select * From Billing Where Day=" & Label1.Caption
Adodc1.Refresh

[mehdi.ganji62]

دوباره سلام.تشکر که جواب دادی ولی مشکلم حل نشد، این سورسشه:
Private Sub Form_Load()

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\BILL.mdb"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "Select name From Billing Where Day=" & Form1.label1.Caption
Adodc1.Refresh

End Sub

3 تا سوال:

1)اینکه باید تو رویداد form_load() انجام بشه یا جای دیگه؟
2)بعد از اینکه این درست شد یه Command button دارم که میخوام فقط مقادیر بالا رو نمایش بده که اونم با این کد نوشتم ولی جواب نمیده

Set DataReport1.DataSource = Adodc1
DataReport1.Show 1

3)چرا تو سورس بالا به adodc1.refresh گیر میده(اینم ارورش : Data type mismach in criteria expession ***** run time)

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

[mehdi.ganji62]

ببخشید که 3 تا سوال شد:خجالت: