InstallShield製作ASP安裝程式(1)
看人家用使用InstallShield製作ASP安裝程式(1)
(文件類別:) 2002-2-5
我現在在做ASP的安裝程式,這樣可以方便使用者的使用。我使用的InstallShield版本是InstallShield Professional—Standard Edition6.3。 我沒有用過這個東東,問題如下: 問題一 透過Project Wizard-generated script 做好了COPY打包工作。可是6.3版本的好象不支援主體Program...Endprogram,因為我看COPY打包的Script指令碼就是透過兩個Fuction實現的。所以我的指令碼加不進去,除非在這兩個Fuction中呼叫!請問是不是6.3版本不能使用Program...Endprogram,如果可以使用的話,應該如何去用? 問題二 想在COPY完ASP程式後直接實現IIS的設定,也就是透過安裝程式就可以完成,不需要手動設定,請問怎樣去實現呢? 以下就是我用Project Wizard-generated script 做好的兩個Fuction,他們不用呼叫也不用宣告定義就自動執行,真是搞不懂呀!我的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 = TYPICAL; TARGETDIR = "C:"^"inetpub" ^"wwwroot" ^@PRODUCT_NAME; szDir = TARGETDIR; szName = ""; 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 = ""; szQuestion = ""; nResult = SdLicense( szTitle, szMsg, szQuestion, 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_SdComponentTree; 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; end; /////////////////////////////////////////////////////////////////////////////// // // FUNCTION: OnMoving // // EVENT: Moving event is sent when file transfer is started as a result of // ComponentTransferData call, before any file transfer operations // are performed. // /////////////////////////////////////////////////////////////////////////////// function OnMoving() string szAppPath; begin szAppPath = TARGETDIR; RegDBSetItem(REGDB_APPPATH, szAppPath); RegDBSetItem(REGDB_APPPATH_DEFAULT, szAppPath ^ @PRODUCT_KEY); end; // --- include script file section --- |
來自 “ ITPUB部落格 ” ,連結:http://blog.itpub.net/631872/viewspace-823708/,如需轉載,請註明出處,否則將追究法律責任。
相關文章
- InstallShield製作ASP安裝程式(6)
- InstallShield製作ASP安裝程式(5)
- InstallShield製作ASP安裝程式(4)
- InstallShield製作ASP安裝程式(3)
- InstallShield製作ASP安裝程式(2)
- InstallShield X製作安裝程式
- InstallShield製作升級安裝包
- InstallShield Express for delphi製作安裝程式定製BDE引擎 (轉)Express
- 製作asp.net的安裝程式ASP.NET
- Installshield製作更新安裝包
- InstallShield6.3安裝檔案製作要點 (轉)
- 教你如何製作程式安裝包
- InstallShield中如何製作靜默安裝包-IntallScript或InstallScript MSI工程型別型別
- 自己編寫安裝製作程式 (轉)
- java 應用程式 安裝程式製作(要帶jvm)JavaJVM
- 使用NSIS製作安裝包
- Redhat kickstart 安裝光碟製作Redhat
- RedHat DVD安裝盤製作Redhat
- 升級安裝包的製作
- win10怎麼製作安裝u盤_win10安裝U盤製作教程Win10
- U盤如何製作win10安裝盤|win10安裝U盤製作方法Win10
- DMG Canvas 4.0.7 DMG安裝包製作Canvas
- Mac OS製作Ubuntu安裝U盤MacUbuntu
- 製作iPhone PXL安裝包的方法iPhone
- Mac 製作 win10 安裝盤MacWin10
- 隨身碟如何製作win10安裝盤|win10安裝隨身碟製作方法Win10
- 製作yum源及安裝賽門鐵克
- Debian安裝包的簡單製作
- 7z製作自解壓安裝包
- 本地yum庫製作及本地安裝DockerDocker
- Python 模組的製作,釋出,安裝Python
- 《ASP網頁製作教程》筆記網頁筆記
- 怎樣製作win10的iOS映象安裝U盤_製作win10 iso映象安裝U盤教程Win10iOS
- 如何製作python安裝模組(setup.py)Python
- VS2010 製作安裝包
- 系統安裝引導盤的製作(轉)
- Windows CE/Pocket PC安裝盤的製作 (轉)Windows
- linux製作安裝包的兩種方法Linux