02-07-19, 10:54 PM
اخواني الكرام
اذا اردت الغاء كلمة مرور القاعدة فماذا اعدل بالاجراء التالي من قبل الاخ elgokr بارك الله فيه وفيكم جميعا:
اذا اردت الغاء كلمة مرور القاعدة فماذا اعدل بالاجراء التالي من قبل الاخ elgokr بارك الله فيه وفيكم جميعا:
PHP كود :
Sub RunCompactDatabase(ByVal Sou As String, ByVal Com As String, ByVal Pass As String)
Dim AccessDatabaseEngine As New Microsoft.Office.Interop.Access.Dao.DBEngine
Dim source As String = Sou
Dim compact As String = Com
Dim MyPassword As String = Pass
AccessDatabaseEngine.CompactDatabase(source, compact, ";pwd=" & MyPassword, , ";pwd=" & MyPassword)
MsgBox("The database was compacted successfully")
End Sub
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير