الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

[ تمت الإجابة ] تصحيح مسار سجلات في الجدول حسب اسم الكمبيوتر الجديد

بدأه فتى الوادي في 29 يناير 2011 · 7 رد · 595 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

لدي جدول t_1 وفيه حقل txt1

حقل txt1 فيه بيانات كثيرة تحتوي كل سجل على مسار لملف معين يحتوي على موقع الملف واسم الكمبيوتر .. مثال :

\\pc1\mot\111.jpg

حيث أن PC1 هو اسم الكمبيوتر ..

ألان نقلت هذه البيانات كلها إلى كمبيوتر جديد اسمه مثلا PC10 ..

اريد تصحيح السجلات بحيث يتعدل كل سجل فيه اسم الكمبيوتر القديم PC1 ويتعدل إلى اسم الكمبيوتر الجديد PC10

أنا أريد طريقة لمعالجة الجدول وليس الطريقة المعروف فتح الجدول واستبدال ...

db1.rar

mk17481_26bccea871.gif
#2

تفضل مثالك بعد التعديل

تحياتي

db1.rar

OMANI FOR EVER

-------------------------------------------------

post-12787-12780191801974.jpg

-------------------------------------------------

#3

جميل بارك الله فيك وفي علمك .... لكن

لا حظ أن mot متغيرة في الجدول وليست ثابتة ...

يعني يمكن تكون mot ويمكن تكون غيرها حسب المجلد .

هل أحصل على تعديل بناء على ذلك ؟؟

mk17481_26bccea871.gif
#4

قم بتغيير هذا السطر

p = InStr(1, rs.Fields(1), "\mot\", vbTextCompare)

واجعله يصبح هكذا

بحيث اننا نقوم بالبحث عن اول علامة "\" تأتي بعد العلامتين "\\" لذلك سنبدأ البحث من ثالث حرف في النص .

p = InStr(3, rs.Fields(1), "\", vbTextCompare)

تحياتي

db1.rar

تم تعديل هذه المشاركة بواسطة omani في 29 يناير 2011 في 18:02

OMANI FOR EVER

-------------------------------------------------

post-12787-12780191801974.jpg

-------------------------------------------------

#5

لا أملك لك إلا دعوة صالحة في ظهر الغيب ..

بارك الله فيك وفي علمك ونفع الله بك البلاد والعباد وزادك الله علما ..

mk17481_26bccea871.gif
#6

تعقيب بسيط :

ممكن شرح لهذا السطر :

  myPath = myPath & Mid$(rs.Fields(1), p, Len(rs.Fields(1)))

حيث اني اضفت حقول للجدول وكان تريب الحقل الذي تجرى عليه العملية هو 6 وحاولت اغير الرقم 1 إلى 6 في السطر السابق ولم تنفذ العملية !

هل رقم (1) في السطر السابق هو رقم ترتيب الحقل المراد تنفيذ الكود عليه ؟؟؟

ولماذا إذا اضفنا قبله حقول في الجدول وغيرنا الرقم لا تنجح العملية ؟

mk17481_26bccea871.gif
#7
فتى الوادي كتب:

تعقيب بسيط :

ممكن شرح لهذا السطر :

  myPath = myPath & Mid$(rs.Fields(1), p, Len(rs.Fields(1)))

حيث اني اضفت حقول للجدول وكان تريب الحقل الذي تجرى عليه العملية هو 6 وحاولت اغير الرقم 1 إلى 6 في السطر السابق ولم تنفذ العملية !

هل رقم (1) في السطر السابق هو رقم ترتيب الحقل المراد تنفيذ الكود عليه ؟؟؟

ولماذا إذا اضفنا قبله حقول في الجدول وغيرنا الرقم لا تنجح العملية ؟

اخي السطر السابق هو انشاء مسار في متغير mypath بحيث

يصبح

قيمة mypath السابقة اضافة الى

القيمة المقروءة من النص اعتباراً من موقع العثور على الحرف "\" والمحفوظ في المتغير p وإلى نهاية النص .

rs.feild(1)

هي تعني الحقل الثاني من الجدول لان الترقيم يبدأ من الصفر .

أي للوصول الى الحقل السادس يجب ان يكون رقم الحقل 5

او بطريقة اخرى . هو ان تقوم باستبدال رقم الحقل بإسم الحقل بهذه الطريقة

rs.feild("FeildName")

تحياتي

OMANI FOR EVER

-------------------------------------------------

post-12787-12780191801974.jpg

-------------------------------------------------

#8

ما شاء الله عليك ...

شرح وافي وما قصرت بيض الله وجهك ..

mk17481_26bccea871.gif

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…