السلام عليكم إخواني أعضاء المنتدى
أنا عندي سؤال : لدي قاعدة بيانات أكسس تتكون من سبعة حقول =رقم المنخرط=الاسم الكامل=السنة=الشهر=الدلالة القديمة =الدلالة الجديدة=الحاضل=
السؤال هو كيف يمكنني نسخ بيانات حقل الدلالة الجديدة إلى حقل الدلالة القديمة عند تغيير الشهر من يناير إلى فبراير مثلا
أريد كود يمكنني من ذلك و جزاكم الله خيرا
لمعلوماتكم فأنا أشتغل على الفيجوال بيسك 2008
الأخ الكريم/الأخت الكريمة
السلام عليكم ورحمة الله وبركاته
مرحباً بكم في منتدى الفريق العربي للبرمجة
نود تنبيهك أن العنوان غير مناسب.
الرجاء اختيار عنوان مناسب أكثر في مواضيعك القادمة، وهذا بمثابة إشعار للأهمية.
وفي حال التكرار سيتعرض موضوعك للإغلاق والحذف!!!
قواعد المشاركة
شاكرين لكم حُسن تعاونكم
Do as I say, not as I do
We are Anonymous. We are Legion. We don't forgive. We don't forget
انظر هذا الكود اذا كان اول يوم في الشهر يقوم بجملة تحديث
If Date.Now.Day = 1 Then
Dim con As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\DB.mdb;Persist Security Info=True")
Dim cmd As New OleDb.OleDbCommand("UPDATE TABLE1 SET OLD=NEW", con)
Try
con.Open()
cmd.ExecuteNonQuery()
Catch ex As Exception
MessageBox.Show(ex.Message)
Finally
con.Close()
End Try
End Ifسبحانه الله وبحمده سبحانه الله العظيم
if (You Love ArabTeam2000 ) MessageBox.Show("All ArabTeam2000 Love You"); else MessageBox.Show("go to your mama");