如何从inno-setup创建和删除网络驱动器?

时间:2011-07-09 02:15:21

标签: delphi inno-setup

我正在编写一个需要执行非常旧的第三方安装应用程序的创建脚本,这个旧的安装程序(称为setup.exe)只能从根文件夹(如果没有失败)工作,所以我需要创建(并删除)网络驱动器以复制此安装程序的文件,然后执行setup.exe。所以问题是如何从inno-setup创建和删除网络驱动器?我看起来像WNetAddConnection函数。

1 个答案:

答案 0 :(得分:5)

您可以使用WshNetwork对象,它是Windows Script Host

的一部分
var
  WshNetWork : Variant;
begin

   WshNetWork:=CreateOleObject('WScript.Network');
   //create the network drive
   WshNetwork.MapNetworkDrive('H:', '\\localhost\c$\data');

   //do your stuff here


   //remove the network drive
   WshNetwork.RemoveNetworkDrive('H:');
end;