بعد اضافة الريفيرنس كما بالصورة اعلاه
كتبت الكود
كود :
Public Function cdb(ByVal DatabaseFullPath As String) As Boolean
Dim bAns As Boolean
Dim cat As New ADOX.Catalog()
Try
Dim sCreateString As String
sCreateString =
"Provider=Microsoft.ace.OLEDB.12.0;Data Source=" & _
DatabaseFullPath & ";Jet OLEDB:Database Password=pass;"
cat.Create(sCreateString)
bAns = True
Catch Excep As System.Runtime.InteropServices.COMException
bAns = False
Finally
cat = Nothing
End Try
Return bAns
End Function
لاحظت انه ينشيء ملف اكسس قديم
هل من حل؟
(06-08-17, 01:52 AM)سعود كتب : [ -> ]
بعد اضافة الريفيرنس كما بالصورة اعلاه
كتبت الكود
كود :
Public Function cdb(ByVal DatabaseFullPath As String) As Boolean
Dim bAns As Boolean
Dim cat As New ADOX.Catalog()
Try
Dim sCreateString As String
sCreateString =
"Provider=Microsoft.ace.OLEDB.12.0;Data Source=" & _
DatabaseFullPath & ";Jet OLEDB:Database Password=pass;"
cat.Create(sCreateString)
bAns = True
Catch Excep As System.Runtime.InteropServices.COMException
bAns = False
Finally
cat = Nothing
End Try
Return bAns
End Function
هل من حل؟
مرحبا اخي سعود
قصدك ايه بالاكسس القديم؟
[
attachment=15065]
[
attachment=15066]
السابقة نتيجة الكود والتالية انشاء يدوي
سوال كيف انشي حقل في مكان محدد وليس في اخر موضع للحقول ؟
بمعنى قبل حقل انا احدد موجود في الجدول او مثلا في الاول
(06-08-17, 09:58 PM)أبو نوره كتب : [ -> ]مرحبا اخى سعود
لم اجد المشكله عندي
ارفقت لك المشروع مع دمج ملف Interop.ADOX.dll احتياط لاحتمال اختلافه مع ما عندك
بارك الله فيك
حملت المثال ... لاحقا ان شاء الله احاول مجددا.
قبلت الوضع عندي
ولدي سؤال جديد.
___________________________________________________________________________
لقد استغربت فتحت ملف القاعدة اللي مرفق ونفس اللي عندي لما انشئه بالكود!
ماهو السر؟
تسلم اخى سعود
صراحه لا اعلم لانه من البدايه عندي مشي تمام
مرحبا اخي حريف
ما الهدف من ترتيب الحقول
لانه من الاستعلام تستطيع تحدد الترتيب الذي ياتي مع النتيجه
واذا كان لما تفتح الاكسس تراها مثل ما تريد فراح تكون امامك تستطيع ترتبها من الاكسس بسهوله
(07-08-17, 01:26 AM)أبو نوره كتب : [ -> ]تسلم اخى سعود
صراحه لا اعلم لانه من البدايه عندي مشي تمام
مرحبا اخي حريف
ما الهدف من ترتيب الحقول
لانه من الاستعلام تستطيع تحدد الترتيب الذي ياتي مع النتيجه
واذا كان لما تفتح الاكسس تراها مثل ما تريد فراح تكون امامك تستطيع ترتبها من الاكسس بسهوله
مرحبتين ابو نوره
لا يالغالي ما اقصد ترتيب اقصد انشاء حقل جديد قبل حقل موجود مثلاً :
عندي جدول فيه الحقول التالية :
ID
Name
Address
المطلوب انشاء حقل اسمه Age قبل حقل Address
لأني لو انشئت الحقل سوف يضعه بعد الحقل Address بمعنى في الأخير
مرحبا اخى
ساصحح استفسارى
ما الهدف لديك من انشاء حقل جديد قبل حقل موجود؟
ولا اسال من اجل هذا الجواب (لأني لو انشئت الحقل سوف يضعه بعد الحقل Address بمعنى في الأخير)
لاني بسالك كمبرمج بتتعامل مع قاعده بيانات بجملة استعلام sql وليس عن طريق فتحها بالاكسس او غيره
اتمنى يكون وصلك معنى استفسارى
