مشاهده نسخه کامل
: Payame-Nour
20-12-2006, 15:20
سلام دوستان عزيز؛
من يه برنامه دارم مي نويسم توي اكسس كه بعضي جاهاش تكه برنامه هاي vb هم كار كردم. البته بايد بگم من از طريق access به Vb كانكت مي شم. (نه طبق روش معمول، يعني از VB 6 يا هر برنامه ديگه اي به Access وصل نمي شم و برعكس از خود access به VB وصل مي شم )
از اين راه كه : وقتي داخل يك پروژه اكسس ، روي يكي از combobox ها كليك راست مي كنم، از طريق گزينه properties وارد پرده Event مي شم و بعد مثلا در قسمت afterupdate، گزينه Event Procedure رو انتخاب مي كنم و بعد با كليك كردن روي سه نقطه (...) كنارش وارد vb مي شم و اونجا برنامه م رو مي نويسم.
الان مشكلي كه دارم اينه كه توي يكي از فرمها براي وضعيت جسماني 4 حالت دارم : سالم - جانباز - معلول - بيمار (كه توي يه combobox نمايشش مي دم) حالا مي خوام اگر كاربرم گزينه "معلول" رو انتخاب كرد و textbox هاي مربوط به اون، يعني : "درصد معلوليت" و "ناحيه معلوليت" رو پر كرد، و بعد منصرف شد و خواست وضعيت "سالم" رو انتخاب كنه، بدون اينكه عملياتي انجام بده، خود برنامه textboxهاي قبلي رو خالي كنه كه ديگه اطلاعات اضافي توي برنامه م ذخيره نشه. من چيزي شبيه به اين رو نوشتم :
Private Sub vaziat_j_Change()
If vaziat_j.Text = "salem" Then
nahie_janbaz = ""
nahie_malool = ""
noe_bimari = ""
darsad_janbaz = ""
darsad_malool = ""
End If
End Sub
ولي هروقت كه با textboxها سر و كار پيدا مي كنم مدام يه پيغامي مي ده كه مي گه : همزمان با شما يه كاربر ديگه هم داره از برنامه استفاده مي كنه. آيا مي خواهيد تغييرات اون هم ذخيره بشه؟ ... و سه تا گزينه داره : save changes - copy to clipboard - drope changes
يه نفر بهم گفت كه احتمالا چون textbox ها رو خالي مي كني، اين پيغام رو ميده و احتمالا بايد بعد از اون دستور،يه دستور update يا چيزي شبيه به اين بهش بدي ... ولي نشد
ممنون ميشم اگر به سوالم جواب بديد :sad:
من يه برنامه دارم مي نويسم توي اكسس كه بعضي جاهاش تكه برنامه هاي vb هم كار كردم. البته بايد بگم من از طريق access به Vb كانكت مي شم. (نه طبق روش معمول، يعني از VB 6 يا هر برنامه ديگه اي به Access وصل نمي شم و برعكس از خود access به VB وصل مي شم )
از اين راه كه : وقتي داخل يك پروژه اكسس ، روي يكي از combobox ها كليك راست مي كنم، از طريق گزينه properties وارد پرده Event مي شم و بعد مثلا در قسمت afterupdate، گزينه Event Procedure رو انتخاب مي كنم و بعد با كليك كردن روي سه نقطه (...) كنارش وارد vb مي شم و اونجا برنامه م رو مي نويسم.
الان مشكلي كه دارم اينه كه توي يكي از فرمها براي وضعيت جسماني 4 حالت دارم : سالم - جانباز - معلول - بيمار (كه توي يه combobox نمايشش مي دم) حالا مي خوام اگر كاربرم گزينه "معلول" رو انتخاب كرد و textbox هاي مربوط به اون، يعني : "درصد معلوليت" و "ناحيه معلوليت" رو پر كرد، و بعد منصرف شد و خواست وضعيت "سالم" رو انتخاب كنه، بدون اينكه عملياتي انجام بده، خود برنامه textboxهاي قبلي رو خالي كنه كه ديگه اطلاعات اضافي توي برنامه م ذخيره نشه. من چيزي شبيه به اين رو نوشتم :
Private Sub vaziat_j_Change()
If vaziat_j.Text = "salem" Then
nahie_janbaz = ""
nahie_malool = ""
noe_bimari = ""
darsad_janbaz = ""
darsad_malool = ""
End If
End Sub
ولي هروقت كه با textboxها سر و كار پيدا مي كنم مدام يه پيغامي مي ده كه مي گه : همزمان با شما يه كاربر ديگه هم داره از برنامه استفاده مي كنه. آيا مي خواهيد تغييرات اون هم ذخيره بشه؟ ... و سه تا گزينه داره : save changes - copy to clipboard - drope changes
يه نفر بهم گفت كه احتمالا چون textbox ها رو خالي مي كني، اين پيغام رو ميده و احتمالا بايد بعد از اون دستور،يه دستور update يا چيزي شبيه به اين بهش بدي ... ولي نشد
ممنون ميشم اگر به سوالم جواب بديد :sad: