3:58 ص
VBTown
السلام عليكم ورحمة الله وبركاتة
الاتصال بقاعدة بيانات اكسس 2003 عليها كلمة مرور
يكون من خلال جملة الاتصال التالية
طبعا حتغير اسم قاعدة البيانات وكلمة المرور ليتوافق مع الاعدادات لديك
لاحظ كيف يتم تمرير كلمة المرور
بالتوفيق ان شاء الله
| |
الاثنين، 10 ديسمبر 2012
الاتصال بقاعدة بيانات اكسس 2003 عليها كلمة مرور
الخميس، 29 نوفمبر 2012
مشكلة اللغة في اوركال
السلام عليكم ورحمة الله وبركاتة
الموضوع : كيفية معالجة مشكلة اللغة داخل اوركال
او تغير اللغة الي الانجليزية
قم بما يلي
افتح من قائمة استارت Run كما يلي
كما يلي
نقوم بالبحث عن NLS_LANG ونفتحها كما يلي
ونفتحها كما يلي ثم نغير اللغة كما يلي
اللغة التي ستكتبها هي
american_america.utf8
بالتوفيق باذن الله
الخميس، 15 نوفمبر 2012
How to make help files
May Allah's peace , mercy and blessing be upon you
First, we installed a program Html Help
We open the program Html Help Workshop
 |
| open HTML Help Workshop |
الجمعة، 9 نوفمبر 2012
مكتبة الادو مع ويندوز 7 MS ADO ver 6.0 Backcompat
السلام عليكم ورحمة الله وبركاتة
هناك تحديث لمكتبة الادو كلاسك للتعامل مع ويندوز 7 ويمكنك تحميلة من الروابط التالية
لتحميل مكتبة الادو الاصدار الجديد متوافق مع ويندوز 7 و ويندوز سرفر 2008
MS ADO ver 6.0 Backcompat On a computer that is running Windows 7 or Windows Server 2008
لانظمة تشغيل 32 من الرابط التالي
MS ADO ver 6.0 Backcompat OS 32Bit
لانظمة تشغيل 64 بت من الرابط التالي
MS ADO ver 6.0 Backcompat OS 64Bit
بعد تحميل الملف السابق والخاص بالمكتبة ماذ تفعل ؟؟؟
قم بما يلي
اولا انقل المكتبة الي المسار التالي
في الدريف الخاص بالويندوز داخل المجلد التالي
Program Files >> Common Files >> System >> ado
C:\Program Files\Common Files\System\ado
 |
could not be added please make sure that the file is accessible, and that it is a valid assembly or Com component
|
could not be added please make sure that the file is accessible, and that it is a valid assembly or Com component
نعم فانت لم تقم بتسجيل المكتبة في الدوت نت فقم بما يلي
في دريف الذي علي علية الويندوز
داخل المجلد التالي
Windows >> Microsoft.NET >> Framework >> v4.0.30319
مثال
C:\Windows\Microsoft.NET\Framework\v4.0.30319
regtlibv12.exe
هذا الملف هو الذي من خلالة سيتم تسجيل المكتبة
كيف قم بما يلي افتح المجلدين التالين بجانب بعضهم كما يلي
نحدد المكتبة في شاشة ونحدد البرنامج الخاص بتسجيل المكتبة في الشاشة الثانية
ثم نقوم بالضغط علي المكتبة الموس والسحب والقاء المكتبة فوق البرنامج
بمجرد القيام بذلك يتم تسجيل المكتبة مباشرتا
الان ارجع الي الفيجوال بيسك دوت ثم اضف مكتبة الادو كلاسك الاصدار الجديد
سيتم اضافتها دون مشاكل
بالتوفيق باذن الله
كيفية الحصول علي جملة الاتصال من خلال ملف UDL
السلام عليكم ورحمة الله وبركاتة
كيفية الحصول علي جملة الاتصال من خلال ملف UDL :-
قم بما يلي
انشئ ملف نصي جديد ثم غير الاسم الممتدد الخاص بة الي udl كما يلي
نغير الان الاسم الممتدد من txt الي udl
اذا كان الاسم الممتدد غير ظاهر لديك فقم بما يلي
قم بفتح الكنترول بانيل Control Panel ثم اختار فلدر اوبشن Folder Options ومن تبويب view قم بازالة العلامة من علي
Hide Extensions for Known File types
نرجع مرة اخري للملف الذي قمنا بانشاءة ونغير الاسم المتتدد الي udl
سيظهر لك الرسالة التالي اختر منها yes
ثم نقوم بفتح هذا الملف ومن التبويب الاول نختار البروفيدر الخاص بنا
ثم من التبويب الثاني كونكشن Connection نعطي لة البيانات المتطلبة لانشاء جملة الاتصال
بعد كتابة البيانات نضغط علي Test Connection
لاختبار الاتصال
ثم Ok
نفتح الملف مرة اخري ولكن بالنوت باد او الورد
سنجد النص التالي
[oledb]
; Everything after this line is an OLE DB initstring
Provider=Microsoft.ACE.OLEDB.12.0;Data Source=dblaw.accdb;Persist Security Info=False
بالتوفيق ان شاء الله
كيفية عمل نسخة احتياطية من قاعدة بيانات اكسس بالفيجوال بيسك 6
السلام عليكم ورحمة الله وبركاتة
كيفية عمل نسخة احتياطية من قاعدة بيانات اكسس بالفيجوال بيسك 6
اول شئ اضف الي مشروعك فورم جديدة كما يلي
ثم اضف الي المراجع الريفرنس المكتبة التالية
في الفورم لود حدث تحميل الفورم نقوم بوضع الكود التالي
- الرمز:
'هذا متغير علي مستوي المشروع ويتمرير الية اسم قاعدة البيانات وسنستخدمة فيما بعد في امور اخري منها اخذ نسخة احتياطية من تلك قاعدة البياناتdbname = "dblaw.mdb"
'لانشاء المجلد الذي سنضع بة النسخ الاحتياطية داخل مجلد المشروع ان لم يكن منشئ من قبل
If Dir(App.Path & "\backup", vbDirectory) = "" Then
MkDir (App.Path & "\backup")
End If
ثم تحت مفتاح اخذ نسخة احتياطية نقول الكود التالي
- الرمز:
Dim x As String
MousePointer = 11
'للتاكد من وجود قاعدة البيانات التي سناخذ منها نسخة احتياطية قبل البداء في عمل ذلك
If Dir(App.Path & "\" & dbname) = "" Then
MousePointer = 1
Exit Sub
End If
'المتغير اكس يتم تمرير لة التاريخ الحالي للجهاز ولكن بصيغة معينة تم تحديدها لو ستاخذ نسخة في اقل من دقيقة او يوم يمكنك اضافة الي المتغير اكس الثانية التي تم اخذ النسخة بها او الدقيقة الخ
x = Format(Date, "dd-mm-yyyy")
'اخذ نسخة احتياطية من قاعدة البيانات
je.CompactDatabase "data source=" & App.Path & "\" & dbname & ";", _
"data source=" & App.Path & "\backup\backup" & x & ".mos;"
MousePointer = 1
يمكنك لتفادي خطاء ان هناك اكثر من نسخة بنفس الاسم في حال تكرارك لاخذ نسخ احتياطية في وقت قصير ان تضيف الي المتغير اكس الدقيقة والثانية التي تم اخذ بها النسخة الاحتياطية
بالتوفيق باذن الله
الجمعة، 2 نوفمبر 2012
كيفية وضع كلمة مرور علي قاعدة بيانات اكسس 2010
السلام عليكم ورحمة الله وبركاتة
موضوعنا اليوم هو كيفية وضع كلمة مرور علي قاعدة بيانات اكسس 2010
سنقوم بما يلي اولا نقوم بفتح برنامج الاكسس كما يلي
ثم نقوم بفتح قاعدة البيانات كما يلي
لاحظ نوع الفتح هنا
نقوم الان بوضع باختيار غلق قاعدة البيانات بكلمة مرور
أكتب كلمة المرور التي تريد وضعها علي قاعدة البيانات
عند محالة فتح قاعدة البيانات مرة اخري سيطلب منك ادخال كلمة المرور
بالتوفيق باذن الله
