ASP编程：利用InstallShield制造ASP安装程序(1)
结论：和PHP一样，ASP简单而易于维护，很适合小型网站应用，通过DCOM和MTS技术，ASP甚至还可以完成小规模的企业应用，但ASP的致命缺点就是不支持跨平台的系统，在大型项目开发和维护上非常困难。我如今在做ASP的安装程序，如许能够便利用户的利用。我利用的InstallShield版本是InstallShieldProfessional―StandardEdition6.3。我没有效过这个东东，成绩以下：
成绩一
经由过程ProjectWizard-generatedscript做好了COPY打包事情。但是6.3版本的好象不撑持主体Program...Endprogram，由于我看COPY打包的Script剧本就是经由过程两个Fuction完成的。以是我的剧本加不出来，除非在这两个Fuction中挪用！叨教是否是6.3版本不克不及利用Program...Endprogram，假如可使用的话，应当怎样往用？
成绩二
想在COPY完ASP程序后间接完成IIS的设置，也就是经由过程安装程序就能够完成，不必要手动设置，叨教如何往完成呢？
以下就是我用ProjectWizard-generatedscript做好的两个Fuction，他们不必挪用也不必声明界说就主动实行，真是弄不懂呀！我的Script该加在甚么中央呢？
//Includeheaderfiles
#include"ifx.h"
functionOnFirstUIBefore()
numbernResult,nSetupType;
stringszTitle,szMsg;
stringszLicenseFile,szQuestion;
stringszName,szCompany,szSerial;
stringszTargetPath;
stringszDir;
stringszComponents,szTargetdir;
numbernLevel;
LISTlistStartCopy;
numbernvSize;
begin
nSetupType=TYPICAL;
TARGETDIR="C:"^"inetpub"^"wwwroot"^@PRODUCT_NAME;
szDir=TARGETDIR;
szName="";
szCompany="";
szSerial="";
Dlg_Start:
//beginningofdialogslabel
Dlg_SdWelcome:
szTitle="";
szMsg="";
nResult=SdWelcome(szTitle,szMsg);
if(nResult=BACK)gotoDlg_Start;
Dlg_SdLicense:
szLicenseFile=SUPPORTDIR^"license.txt";
szTitle="";
szMsg="";
szQuestion="";
nResult=SdLicense(szTitle,szMsg,szQuestion,szLicenseFile);
if(nResult=BACK)gotoDlg_SdWelcome;
Dlg_SdRegisterUserEx:
szMsg="";
szTitle="";
nResult=SdRegisterUserEx(szTitle,szMsg,szName,szCompany,szSerial);
if(nResult=BACK)gotoDlg_SdLicense;
Dlg_SdAskDestPath:
szTitle="";
szMsg="pleaseselectsetupfolder";
nResult=SdAskDestPath(szTitle,szMsg,szDir,0);
TARGETDIR=szDir;
if(nResult=BACK)gotoDlg_SdRegisterUserEx;
Dlg_SetupType:
szTitle="";
szMsg="";
nResult=SetupType(szTitle,szMsg,"",nSetupType,0);
if(nResult=BACK)then
gotoDlg_SdAskDestPath;
else
nSetupType=nResult;
if(nSetupType!=CUSTOM)then
szTargetPath=TARGETDIR;
nvSize=0;
ComponentCompareSizeRequired(MEDIA,szTargetPath,nvSize);
if(nvSize!=0)then
MessageBox(szSdStr_NotEnoughSpace,WARNING);
gotoDlg_SetupType;
endif;
endif;
endif;
Dlg_SdComponentTree:
if((nResult=BACK)&&(nSetupType!=CUSTOM))gotoDlg_SetupType;
szTitle="";
szMsg="";
szTargetdir=TARGETDIR;
szComponents="";
nLevel=2;
if(nSetupType=CUSTOM)then
nResult=SdComponentTree(szTitle,szMsg,szTargetdir,szComponents,nLevel);
if(nResult=BACK)gotoDlg_SetupType;
endif;
Dlg_ObjDialogs:
nResult=ShowObjWizardPages(nResult);
if(nResult=BACK)gotoDlg_SdComponentTree;
Dlg_SdStartCopy:
szTitle="";
szMsg="";
listStartCopy=ListCreate(STRINGLIST);
nResult=SdStartCopy(szTitle,szMsg,listStartCopy);
ListDestroy(listStartCopy);
if(nResult=BACK)gotoDlg_ObjDialogs;
//setupdefaultstatus
SetStatusWindow(0,"");
Enable(STATUSEX);
StatusUpdate(ON,100);
return0;
end;
///////////////////////////////////////////////////////////////////////////////
//
//FUNCTION:OnMoving
//
//EVENT:Movingeventissentwhenfiletransferisstartedasaresultof
//ComponentTransferDatacall,beforeanyfiletransferoperations
//areperformed.
//
///////////////////////////////////////////////////////////////////////////////
functionOnMoving()
stringszAppPath;
begin
szAppPath=TARGETDIR;
RegDBSetItem(REGDB_APPPATH,szAppPath);
RegDBSetItem(REGDB_APPPATH_DEFAULT,szAppPath^@PRODUCT_KEY);
end;
//---includescriptfilesection---
在实现ERP等高端的ASP应用时，用户需要提供核心的经营资料，需要ASP商有很高的信用度。楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。 Server:这个表示的服务器，操作服务器的一些东西使用这个，如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件 从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了 没有坚实的理论做基础，那么我们连踏入社会第一步的资本都没有，特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP，从平时的学习过程中。 我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。 Request:从字面上讲就是“请求”，因此这个是处理客户端提交的东东的,例如Resuest.Form，Request.QueryString,或者干脆Request("变量名") 我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。 兴趣爱好，那么你无须学编程，申请一个域名和空间，在网上下载一些免费开源的CMS系统，你不用改代码，只须熟悉它们的后台操作，像office一样简单方便，很快就能建一个站点，很多站长都是这样做的 我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。
页:
[1]