[عبد العزيز البسكري]

السّلام عليكم و رحمة الله و بركاته
سادتي الأفاضل .. هذه محاولة بسيطة لشرح تثبيت البرامج التنفيذية بشكل تلقائي أثناء تنصيب مشروعنا عند العميل .. لعلّها تفي بالغرض إن شاء الله لدينا على سبيل المثال ..الملف التّنفيذي للفريم وورك المشار إليه بالسّهم الأحمر و الكريستال ريبورت بالسّهم الأخضر .. مع ضرورة مراعاة التّسمية لهذيْن الملفيْن .. و وضعهما بمجلّد البرنامج ال  Debug .. أو بمكان آخر كالريسورس مثلاً

نفتح الستيب فاكتوري .. نختار التّبويب RESOURCES .. ثم DEPENDENCIES

من الصفحة المنبثقة .. نختار .. DEPENDENCIES ثم .. ADVANCED ثم CREATE NEW MODULE

نقوم بتسمية الموديل بنفس التّسمية الموجودة لديك .. أقصد تسمية ملف الفريم وورك

بمجرّد الضغط على OK .. ستنفتح لديك صفحة جديدة .. إضغط دوبل كليك على اسم الموديل الذّي قمت بإنشائه ..

في الصفحة المنبثقة .. نقوم باختيار التّبويب FILES .. لجلب مسار الفريم وورك الموديل
لا ننس كتابة اسم الموديل مثلما تشير الأسهم الحمراء و الضغط لظهور نافذة الحوار ..

و سيظهر المسار تلقائيا بعدما تمّ إختياره ..

الآن .. نرجع إلى أوّل خطوة .. و نختار RESOURCES .. ثم DEPENDENCIES ..

دوبل كليك على اسم الموديل ..

نختار التّبويب DETECTION .. و ننتبه للتّسميات مثلما تشير الصّورة أدناه .. و نقوم بزرع هذا السكريبت ..
كود :

كود :

function NET45FRAMEWORK_Installed()
            return false;
end

بجانب التّبويب FILES .. نختار التّبويب .. INSTALLATION .. و نزرع هذا السكريبت .. ننتبه لاسم الموديل ..

داخل هذا السكريبت الأخير .. لا ننسً كتابة اسم مجلّد الفريم وورك و الذي هو ..DEBUG .. و كذلك تسمية الموديل ..

كود :

كود :

function NET45FRAMEWORK()

end


    local bShowUserPrompt = false;
    local bRunInstallFile = true;
    local bRequirementFail = false;
    local tbRequirementFailStrings = {};



    local strRuntimeSupportFolder = SessionVar.Expand("%TempLaunchFolder%\\Debug");
    local strExtractInstallerToPath = strRuntimeSupportFolder.."\\NET45FRAMEWORK.exe";
    local strMessageFail = "";
    local _NeedsReboot = false;
    local strCmdArgs = "";
    local bSilentMode = false;
    local bVital = true;
        

    if(bShowUserPrompt)then
        local nDialogResult = Dialog.Message(strDialogTitle,strMessage,MB_OKCANCEL,MB_ICONEXCLAMATION);
        if(nDialogResult == IDOK)then

            bRunInstallFile = true;
        else

            bRunInstallFile = false;
            File.Delete(strExtractInstallerToPath);
        end
    end
    


        if(bRunInstallFile)then

            local nResult = File.Run(strExtractInstallerToPath, strCmdArgs, "", SW_SHOWNORMAL, true);
            File.Delete(strExtractInstallerToPath);

        

end

نفس الخطوات نقوم بها مع الملف الثاني .. ملف الكريستال ريبورت أو الريبورت فيور مثلا .. أو أي ملف تنفيذي آخر نريد إدراجه
فبمجرّد البدأ في تنصيب مشروعنا لدى العميل .. ستظهر نافذة هذين الملفيْن لتثبيتهما بشكل أوتوماتيكي..
بالتّوفيق للجميع ..
تحياتي