السلام عليكم
لدي قاعدة أكسس وحجمها كبير ولدي استعلام لها بلغة asp
أريد طرق لضغط القاعدة غير ضغطها من خلال قائمة tool في الأكسس
أرجوكم عاجل
ومشكورين
السلام عليكم
لدي قاعدة أكسس وحجمها كبير ولدي استعلام لها بلغة asp
أريد طرق لضغط القاعدة غير ضغطها من خلال قائمة tool في الأكسس
أرجوكم عاجل
ومشكورين
لا يوجد
كود PHP:
Public Function CompactDatabase(strFileName As String) As Long
' Add the references
' Microsoft Jet and Replication Objects 2.x Library
Screen.MousePointer = vbHourglass
Dim msg As String
Dim strFileNameBackup As String
Dim JRO As JRO.JetEngine
strFileNameBackup = Left(strFileName, Len(strFileName) - 3) & "~db"
On Local Error Resume Next
Kill strFileNameBackup
On Error GoTo ErrorLine
Name strFileName As strFileNameBackup
Set JRO = New JRO.JetEngine
JRO.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strFileNameBackup, _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strFileName & ";Jet OLEDB:Engine Type=5"
Kill strFileNameBackup
Screen.MousePointer = vbDefault
Exit Function
ErrorLine:
CompactDatabase = Err.Number
End Function
__________________
[... الحمدُ لله خالقِ الخلق، باسط الرزق، فالقِ الاصباح، ذي الجلال والاكرام، والفضل والانعام، الذي بَعُد فلا يُرى، وقرُبَ فشهِد النجوى.. تبارَك وتعالى، الحمدُ لله الذي ليس له منازع يعادله، ولا شبيه يشاكله، ولا ظهير يعاضده، قهر بعزَّته الاعزاء، وتواضع لعظمته العظماء، فبلغَ بقدرته ما يشاء..]
برمجه برامج تطبيقيه بواسطه Visual C++ , Visual basic , C
احتراف قواعد بيانات Sql , Oracle , Access
الكود سليم 100% بالمرفق
__________________
[... الحمدُ لله خالقِ الخلق، باسط الرزق، فالقِ الاصباح، ذي الجلال والاكرام، والفضل والانعام، الذي بَعُد فلا يُرى، وقرُبَ فشهِد النجوى.. تبارَك وتعالى، الحمدُ لله الذي ليس له منازع يعادله، ولا شبيه يشاكله، ولا ظهير يعاضده، قهر بعزَّته الاعزاء، وتواضع لعظمته العظماء، فبلغَ بقدرته ما يشاء..]
برمجه برامج تطبيقيه بواسطه Visual C++ , Visual basic , C
احتراف قواعد بيانات Sql , Oracle , Access
الكود سليم 100% بالمرفق
__________________
[... الحمدُ لله خالقِ الخلق، باسط الرزق، فالقِ الاصباح، ذي الجلال والاكرام، والفضل والانعام، الذي بَعُد فلا يُرى، وقرُبَ فشهِد النجوى.. تبارَك وتعالى، الحمدُ لله الذي ليس له منازع يعادله، ولا شبيه يشاكله، ولا ظهير يعاضده، قهر بعزَّته الاعزاء، وتواضع لعظمته العظماء، فبلغَ بقدرته ما يشاء..]
برمجه برامج تطبيقيه بواسطه Visual C++ , Visual basic , C
احتراف قواعد بيانات Sql , Oracle , Access