إنشاء Alias من الكود سورس

[tarek_ep]

مثال سأضع البرنامج داخل Procedure

PHP كود :

Procedure Connexion;
Begin
Session.ConfigMod := CmSession;
Try
    Session.AddStandardAlias('Nom alias', ExtractFilePath(Application.ExeName)+'data', 'Paradox');
finally
    Session.ConfigMod := CmAll;
end;
Database1.AliasName := 'Nom alias';
//Open All Tables
end; 


لاحظ أن داتاباز لها 'Nom alias' المستعمل في إنشاء الأليس
ExtractFilePath(Application.ExeName)+'data' يبين مكان وجود قاعدة البيانات
في انتظار ردودكم تقبلوا تحياتي

[عبد المجيد]

السلام عليكم اخي 
في حالة استعمال اكسس ماذا يتغير في الاجراء
 و شكرا