استيراد بيانات جدول من قاعدة بيانات اكسس

[احمد ابو غريب]

السلام عليكم 

الرجاء المساعده من الاحباب الكرام

محتاج اعمل نسخة تجميع لقاعدة بيانات موحده على أكثر من جهاز 

ما الخطأف في هذا الكود 

مرفق قاعدة البيانات

Option Compare Database
Option Explicit
Dim addsql, a As String
Dim WK As DAO.Workspace
Dim db As DAO.Database
Dim Chemin As String
Private Sub BtImporter_Click()
If Nz(cmbTable, "") <> "" Then
DupliquerTable db, cmbTable
Else
MsgBox "اختــر جـــدولا"
End If
End Sub
Private Sub cmd_new_Click()
On Error GoTo mm
DoCmd.SetWarnings False


addsql = "INSERT INTO asdst IN '" & New_DB & "' SELECT [asdst].* FROM asdst;"
db.Execute addsql


MsgBox ("تم الاستيراد بنجاح"), vbOKOnly + vbMsgBoxRight, " رساله  "
DoCmd.Close
End

mm:
MsgBox ("تأكد من أختيار ملف الأستيراد الصحيح"), vbOKOnly + vbMsgBoxRight, " رساله  "

 

New folder (24).rar

تم تعديل مايو 12 بواسطه jjafferr
لتنسيق الكود: من قائمة مربع الرسائل، اختار <> ، ثم ضع الكود فيه

[Foksh]

20 دقائق مضت, احمد ابو غريب said:

محتاج اعمل نسخة تجميع لقاعدة بيانات موحده على أكثر من جهاز 

 

وعليكم السلام ورحمة الله وبركاته ..

المطلوب غير مفهوم للأسف !!

نرجو منك التوضيح أكثر أخي الفاضل

[احمد ابو غريب]

5 minutes ago, Foksh said:

وعليكم السلام ورحمة الله وبركاته ..

المطلوب غير مفهوم للأسف !!

نرجو منك التوضيح أكثر أخي الفاضل

شكرا لاهتمامك اخي الفاضل 

 عندي قاعدة بيانات موجوده على أكثر من جهاز اماكن متفرقه مش على شبكه واحده

مثلا الجهاز الاول بيسجل أسماء من كود 1 - 1000وهكذا الجهاز الثاني من 1001 الى 2000 والثالث من 3001 الى 4000 وهكذا 

المطلوب عمل نسخة تجميع لكل البيانات التي تمت كتابتها على جميع الاجهزة 

 

[Foksh]

54 دقائق مضت, احمد ابو غريب said:

مثلا الجهاز الاول بيسجل أسماء من كود 1 - 1000وهكذا الجهاز الثاني من 1001 الى 2000 والثالث من 3001 الى 4000 وهكذا 

 

على اي أساس سيتم تمييز السجلات الخاصة بالجهاز ولنفترض Pc1 و Pc2 ... إلخ .؟؟؟

 

54 دقائق مضت, احمد ابو غريب said:

المطلوب عمل نسخة تجميع لكل البيانات التي تمت كتابتها على جميع الاجهزة 

 

لنفترض انني Pc1 على شبكة Net1 وموظف آخر على شبكة Net2 باسم Pc1 أيضاً !!!!!

هل فهمت المقصود ؟؟

ما الرابط فيما بينهم !!!!!

تم تعديل مايو 12 بواسطه Foksh

[احمد ابو غريب]

2 minutes ago, Foksh said:

على اي أساس سيتم تمييز السجلات الخاصة بالجهاز ولنفترض Pc1 و Pc2 ... إلخ .؟؟؟

 

لنفترض انني Pc1 على شبكة Net1 وموظف آخر على شبكة Net2 باسم Pc1 أيضاً !!!!!

هل فمت المقصود ؟؟

ما الرابط فيما بينهم !!!!!

المقصود عمل نموذج لتجميع البيانات بجدول واحد