用InstallShield脚本创建或删除IIS虚拟路径[在线等待,如解决问题100分奉送]
我用InstallShield制作安装程序,需要根据用户选择的安装路径为应用程序配置IIS虚拟路径,我现在用如下代码段进行虚拟目录的创建:
//创建虚拟目录函数的声明
prototype CreateVitualDir();
//创建虚拟目录函数的实现
function CreateVitualDir()
NUMBER nRootKey,nType,nSize;
STRING szValue,szKey,szName;
begin
//注册表入口点
nRootKey=HKEY_LOCAL_MACHINE;
RegDBSetDefaultRoot(nRootKey);
//创建fstat虚拟目录
szValue= TARGETDIR^"\\wwwroot,,201";
szKey="SYSTEM\\CurrentControlSet\\Services\\W3SVC\\Parameters\\Virtual Roots";
szName="/fstat";
nType=REGDB_STRING;
nSize=-1;
//首先删除已经存在的注册信息
RegDBDeleteValue(szKey,szName);
//创建注册信息
if (RegDBSetKeyValueEx(szKey,szName,nType,szValue,nSize)<0) then
MessageBox("创建虚拟目录/fstat错误,请参照安装手册手工设置!",WARNING);
endif;
//创建fstat_bin虚拟目录
szValue= TARGETDIR^"\\ActiveX,,205";
szKey="SYSTEM\\CurrentControlSet\\Services\\W3SVC\\Parameters\\Virtual Roots";
szName="/fstat_Bin";
nType=REGDB_STRING;
nSize=-1;
RegDBDeleteValue(szKey,szName);
if (RegDBSetKeyValueEx(szKey,szName,nType,szValue,nSize)<0) then
MessageBox("创建虚拟目录/fstat_Bin错误,请参照安装手册手工设置!",WARNING);
endif;
end;
但是这段代码创建出的别名和手工配置的虚拟路径有很大差异,比如不能创建应用程序。现在寻求能够创建或删除IIS虚拟路径的方法,如果能够解决`100分立即奉送!
如能提供其他方法同样给分!