parisa.s
جمعه 16 مهر 1389, 00:17 صبح
سلام به همه ی دوستان و استادان
بچه ها من می خوام در یک قسمت از برنامه وقتی یک کلید زده میشه یک مسافر ثبت بشه و یک اتاق پر، و همزمان با زدن این دکمه و پر شدن اتاق سطر مربوطه در vsflex م، در فرم mdi به رنگ قرمز در بیاد. و همین کار برای رزرو اتفاق بیفته و به رنگ زرد در بیاد.کد زیر برای قرمز شدن فرم جواب داد ولی در هنگام رزرو وقتی adodc2.refresh را می نویسم باید یکبار از برنامه خارج بشم و دوباره برنامه رو باز کنم که زرد بشه، اگر هم این خط رو ننویسم فقط همون یک رکورد رو رنگشو تغییر میده و نشون میده.
Adodc2.Recordset.Filter = "shomareotagh ='" & lblroom.Caption & "'"
Adodc2.Recordset.Fields!por = True
Adodc2.Recordset.Update
Adodc2.Refresh
Set MDIForm1.vs.DataSource = Adodc2.Recordset
MDIForm1.vs.Refresh
MDIForm1.Adodc1.Refresh
از همه خواهش می کنم هر چه زودتر و سریعتر راهنماییم کنین.ممنون
بچه ها من می خوام در یک قسمت از برنامه وقتی یک کلید زده میشه یک مسافر ثبت بشه و یک اتاق پر، و همزمان با زدن این دکمه و پر شدن اتاق سطر مربوطه در vsflex م، در فرم mdi به رنگ قرمز در بیاد. و همین کار برای رزرو اتفاق بیفته و به رنگ زرد در بیاد.کد زیر برای قرمز شدن فرم جواب داد ولی در هنگام رزرو وقتی adodc2.refresh را می نویسم باید یکبار از برنامه خارج بشم و دوباره برنامه رو باز کنم که زرد بشه، اگر هم این خط رو ننویسم فقط همون یک رکورد رو رنگشو تغییر میده و نشون میده.
Adodc2.Recordset.Filter = "shomareotagh ='" & lblroom.Caption & "'"
Adodc2.Recordset.Fields!por = True
Adodc2.Recordset.Update
Adodc2.Refresh
Set MDIForm1.vs.DataSource = Adodc2.Recordset
MDIForm1.vs.Refresh
MDIForm1.Adodc1.Refresh
از همه خواهش می کنم هر چه زودتر و سریعتر راهنماییم کنین.ممنون