مشكلة في هذا الكود

[البسيسي]

لدي الكود التالي:

وهو يقوم بنقل المعلومات من النموذج غير المنضم الى الجدول

المشكلة في هذا الكود انه لا يقبل التعديل

يعني انا اريد ان ازيد حقل جديد في الجدول وانشء له خانه في النموذج واضيفهم الى الكود

لكن الكود يفتح على طول الى صفحة الفيجول بيزك ويعطيني خطأ في الحقل الجديد بلون ازرق

هل من يستطيع ان يجعل لى هذا الكود قابل للتعديل اي : استطيع ان اضيف حقول جديدة متى ما اريد

ولكم جزيل الشكر

DoCmd.GoToRecord , , acNewRec

r = b * o + 2

Me.cc = a

Me.bb = b

Me.cc = c

Me.dd = d

Me.ee = e

Me.ff = f

Me.gg = g

Me.hh = h

Me.ii = i

Me.jj = j

Me.kk = k

Me.ll = l

Me.mm = m

Me.nn = n

Me.oo = o

Me.pp = p

Me.qq = q

Me.rr = r

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

DoCmd.GoToRecord , , acNewRec

MsgBox "لقد تم الترحيل بنجاح", , "SADDIQ"

b = Null

c = Null

d = Null

e = Null

f = Null

g = Null

h = Null

i = Null

j = Null

k = Null

l = Null

m = Null

n = Null

o = Null

p = Null

q = Null

r = Null

End Sub

[sas_kik]

اخي الكريم

يجب ان تقوم بتغيير الرموز بالاكواد حسب ما لديك دائما

اى بمعنى ان تكتب اسماء الجداول والحقول والنماذج ومربعات النص وهكذا حسب الاسماء الموجودة لديك ولا تتركها كما هي حسب ما ترد بالامثلة

حاول .... وبالتوفيق

[البسيسي]

اخي الكريم :

اشكرك على هذا الرد السريع

لا استطين ان ارسل لك الملف حتى ترى كيف الخطا

لكن باريت لو تكرمت تشرحلي اكثر

واذا يكون في مثال اكون شاكر لك

[sas_kik]

اخي الكريم

ان ما اقصده هو مثلا كلا من

me.cc / me.ff /me.kk

كل هذه اسماء لحقول يجب ان تكون موجود لديك لكي تستكمل العملية

فلن يعمل الكود مثلا اذا كانت المسميات لديك غير ذلك

فيجب ان تنسجم جميع اسماء الكائنات وتكون مطابقة تماما

تم تعديل مايو 28, 2006 بواسطه sas_kik

[البسيسي]

المشكلة اخي الكريم

انه اي تعديل او اضافة او اي حركة الكود لا يتعرف لى الجدول ويعطي رسالة انه اول حقل في الكود يعلم علية بالازرق

سواء كان التعديل في النموذج او الجدول يعطي نفس الغلط

مع الرغم تجانس جميع المعلومات حسب خصائصها بالجدول

[rudwan]

وهو يقوم بنقل المعلومات من النموذج غير المنضم الى الجدول

المشكلة في هذا الكود انه لا يقبل التعديل

يعني انا اريد ان ازيد حقل جديد في الجدول وانشء له خانه في النموذج واضيفهم الى الكود

أولا هذا الكود ليس هو كود اضافة حقل الى الجدول

ثانيا ماهي هذه القيم : a b c d >>>>

[البسيسي]

اخي الكريم :

انت لم تفهمني ما اقصده

القيم : A B C D هي اسماء الحقول الغير منضمه في النموذج

هذا الكود كان شغال قبل ما اضيف الحقول الجديده وهي :pP QQ RR

وطبعا انشأت لها خانات في النموذج كما هو في الكود

لكن هذا الكود ما عد يتعرف على الجدول ويعطيني الغلط بلون ازرق من بداية الكود CC=A

[rudwan]

هذا الكود كان شغال قبل ما اضيف الحقول الجديده وهي P QQ RR

معناه أن أسماء تلك الحقول الجديدة في الكود مختلفة عن أسماءها الحقيقية , هذا أولا

ثانيا هناك اشكالية برمجية .

اذا كانت تلك الأحرف هي أسماء الحقول غير المنضمة , ثم بعد أن تسند للحقول المنضمة تلك القيم و تحفظ السجل تقوم بالغاء قيم تلك الحقول و جعلها خالية بهذا الكود

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.GoToRecord , , acNewRec
MsgBox "لقد تم الترحيل بنجاح", , "SADDIQ"
b = Null

اذا عندما تذهب الى سجل جديد لن تستطيع اسناد قيم للحقول المنضمة طالما أن قيم الحقول غير المنضمة أصبحت خالية

تم تعديل مايو 29, 2006 بواسطه rudwan