تغيير ايعاز مكان تحديد تحميل البيانات

[النهر العطشان]

السلام  عليكم 

ارجو مساعدتي في تغيير مسار تحميل البيانات لملف اكسس خارجي الى مسار URL والمؤشر باللون الاحمر

On Error Resume Next
";UpdtQry = "INSERT INTO Data1 SELECT Data.* FROM Data
";TblDel = "Drop table Data
"datOld = CurrentProject.path & "\Access1.mdb
"DoCmd.TransferDatabase acLink, "Microsoft Access", datOld, acTable, "Data", "Data
DoCmd.RunSQL UpdtQry
DoCmd.RunSQL TblDel
 "تم بحمد الله" MsgBox

حيث عند الضغط على زر Import سوف يتم اضافة بيانات من ملف اكسس (Access1.mdb) والمطلوب هو عند الضغط على الزر المذكور يتم اضافة بيانات من عنوان URL بعد تحديد موقع قاعدة البيانات من زر ال URL

مع ابقاء نفس الكود اعلاه باستثناء اسم قاعدة البيانات باللون الاحمر

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

وشكرا

NEW.rar

[النهر العطشان]

ارجو مساعدتي في تغيير مسار تحميل البيانات لملف اكسس خارجي الى مسار URL والمؤشر باللون الاحمر

On Error Resume Next
";UpdtQry = "INSERT INTO Data1 SELECT Data.* FROM Data
";TblDel = "Drop table Data
"datOld = CurrentProject.path & "\Access1.mdb
"DoCmd.TransferDatabase acLink, "Microsoft Access", datOld, acTable, "Data", "Data
DoCmd.RunSQL UpdtQry
DoCmd.RunSQL TblDel
 "تم بحمد الله" MsgBox

حيث عند الضغط على زر Import سوف يتم اضافة بيانات من ملف اكسس (Access1.mdb) والمطلوب هو عند الضغط على الزر المذكور يتم اضافة بيانات من عنوان URL بعد تحديد موقع قاعدة البيانات من زر ال URL

مع ابقاء نفس الكود اعلاه باستثناء اسم قاعدة البيانات باللون الاحمر

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

وشكرا

NEW.rar

[النهر العطشان]

شكرا تم حل المشكلة من موقع آخر

تم تعديل أبريل 14, 2017 بواسطه النهر العطشان