Make an ASP installer using InstallShield

xiaoxiao2021-03-06  76

I am doing an ASP installer so that it can be convenient for users. I am using the InstallShield version of INSTALLSHIELD Professional-Standard Edition 6.3. I have not used this stuff, the problem is as follows: The question is a Copy package work with Project Wizard-Generated Script. However, if the 6.3 version seems to support the main Program ... Endprogram, because I see the script script that COPY packages is achieved by two Fuction.

So my script can't add, unless you call these two futers! Is it 6.3, you can't use Program ... Endprogram, how should you use it if you can use it? Question II want to directly implement IIS settings after COPY after the ASP program, that is, by the installer can be completed, do not need to be set manually, how to implement it? Here is two futers I have done with Project Wizard-Generated Script, they don't have to call it without declating the definition, I really don't understand! What is my Script? // Include header files #include "" ifx.h "" function OnFirstUIBefore () number nResult, nSetupType; string szTitle, szMsg; string szLicenseFile, szQuestion; string szName, szCompany, szSerial; string szTargetPath; string szDir; string szComponents, szTargetdir Number Nlevel; list listStartcopy; Number nvsize; begin nsetupType = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = type = "^" wwwroot "^ @ product_name; szdir =" ""; Szcompany = "" ""; szserial = "" ""; DLG_Start: // Beginning Of Dialogs Label DLG_SDWELCOME: SZTITLE = "" ""; szmsg = "" ""; nresult = SDwelcome (sztitle, szmsg); if (NResult = BACK) GOTO DLG_START; DLG_SDLICENSE: SZLICENSEFILE = Supportdir ^ "" license.txt ""; sztitle = "" ""; szmsg = "" "; szquesg =" ""; nresultion = "" "" NRESULT = SDLICENSE (Sztitle, Szmsg, Szques , szLicenseFile); if (nResult = BACK) goto Dlg_SdWelcome; Dlg_SdRegisterUserEx: szMsg = "" ""; szTitle = "" ""; nResult = SdRegisterUserEx (szTitle, szMsg, szName, szCompany, szSerial); if (nResult = BACK) Goto DLG_SDLICENSE; DLG_SDASKDESTPATH: SZTITLE = "" ""; szmsg =

"" Please select setup folder ""; nResult = SdAskDestPath (szTitle, szMsg, szDir, 0); TARGETDIR = szDir; if (nResult = BACK) goto Dlg_SdRegisterUserEx; Dlg_SetupType: szTitle = "" ""; szMsg = "" "" ; nResult = SetupType (szTitle, szMsg, "" "", nSetupType, 0); if (nResult = BACK) then goto Dlg_SdAskDestPath; else nSetupType = nResult; if (! nSetupType = CUSTOM) then szTargetPath = TARGETDIR; nvSize = 0; ComponentCompareSizeRequired (MEDIA, szTargetPath, nvSize); if (nvSize = 0!) then MessageBox (szSdStr_NotEnoughSpace, WARNING); goto Dlg_SetupType; endif; endif; endif; Dlg_SdComponentTree: if ((nResult = BACK) && (nSetupType = CUSTOM)!) goto Dlg_SetupType; szTitle = "" ""; szMsg = "" ""; szTargetdir = TARGETDIR; szComponents = "" ""; nLevel = 2; if (nSetupType = CUSTOM) then nResult = SdComponentTree (szTitle, szMsg, szTargetdir, szComponents , NLEVEL); if (nresult = back) goto DLG_SETUPTYPE; ENDIF; DLG_OBJDIALOGS: NRESULT = ShowobjwizardPages (NRESULT); if (NRESULT = BACK) GOTO DLG_SD ComponentTree; Dlg_SdStartCopy: szTitle = "" ""; szMsg = "" ""; listStartCopy = ListCreate (STRINGLIST); nResult = SdStartCopy (szTitle, szMsg, listStartCopy); ListDestroy (listStartCopy); if (nResult = BACK) goto Dlg_ObjDialogs; // setup default status setStatusWindow (0, "" ""; enable (statusex); statusupdate (ON, 100); RETURN 0;

转载请注明原文地址:https://www.9cbs.com/read-121229.html

New Post(0)