13-07-13, 12:38 PM
بسم الله الرحمن الرحيم
إخوانى الكرام أهلا وسهلا بكم وكل عام وانتم بخير بمناسبة شهر رمضان الكريم أعاده الله عليكم بالخير و اليمن و البركات .....اليوم إن شاء الله تعالى سنتعلم سويا كيفية مشاركة قاعدة البيانات على الشبكة المحلية و الاتصال بها ومن ثم إعطاء مرونة كبيرة لبرنامجك باستخدامه على اكثر من جهاز .... واحب ان انوه ان هناك اكثر من طريقة لفعل ذلك .....ولكنى سأقدم اسهل الطرق هى مشاركة قاعدة البيانات بأستخدام بنظام الـWorkgroup ...ويتم ذلك بأتباع :
الخطوة الاولى : تفعيل نظام Workgroup وذلك على النحو التالى :
- أذهب الى My Computer ثم كليك شمال ثم أختر Properties من النافذة التى سوف تظهر أختر التويب Computer Name ثم قم بالضغط على زر (Change ) سوف تظهر لك نافذة أخرى قم بالتأكد أن الخيار Workgroup مفعل كما فى الصور التالية :
[url="http://www.0zz0.com"]
[/url]
[/url]
الخطوة الثانية: وضع قاعدة بيانات البرنامج فى مجلد معين.
الخطوة الثالثة : عمل مشاركة للمجلد الذي فيه قاعدة البيانات المراد العمل عليه من خلال الشبكة وذلك على النحو التالى .
_ قم بتحديد هذا المجلد ثم كليك شمال ......سوف تظهر لك النافذة التالية :
_ قم بالضغط على السطر الذى باللون الازرق و الذى يبدأ بــــ click on If you understand ...سوف تظهر لك المربع التالى :
_ قم بتنشيط الخيار Just enable file sharing ....ثم أوكية ....سوف تظهر لك الشاشة التالية :
_ قم بكتابة أسم المجلد الذى تم وضع قاعدة البيانات فية ...كما فى الشكل السابق .
هكذا نكون قد انتهيا من مشاركة المجلد الذى فية قاعدة البياانات المطلوب العمل عليها ...
الخطوة الثالثة : كتابة الاكواد المطلوبة للاتصال بقاعدة البيانات ....على النحو التالى :
PHP كود :
Public cn As ADODB.Connection
Public rs As ADODB.Recordset
Public Function DBConnect()
On Error GoTo openErr
Dim MSDatabase As String
MSDatabase = "\\seif-3b669de8e6\SHARE_NAME\db.mdb"
Set cn = New ADODB.Connection
cn.CursorLocation = adUseClient
cn.Provider = "Microsoft.Jet.OLEDB.4.0"
cn.Open MSDatabase, Admin
MsgBox "Database connected"
Exit Function
openErr:
MsgBox "Databae not connected"
End Function
مع ملاحظة أن seif-3b669de8e6 هو أسم جهاز الكمبيوتر الذى يحتوى على المجلد الذى فية قاعدة البيانات .... أما SHARE_NAME هو اسم المجلد الذى فية قاعدة البيانات ...وايضا db.mdb أسم قاعدة البيانات
منتدى مصر التقنى ....شارك معنا
http://egy-tech.forumegypt.net
http://egy-tech.forumegypt.net