Question

是否可以通过innosetup安装创建网络共享文件夹？

拥有权限和所有权限？

我的应用程序在客户端网络中使用2个共享文件夹，每个人都必须能够读取/写入这些文件夹。

我喜欢在设置中创建它，以避免手动操作。这可能吗？

Answer 1

您可以使用Win32_Share类的Create方法。

试试这个样本

Const
 FILE_SHARE = 0;
 MAXIMUM_CONNECTIONS = 25;

function CreateShared(const Path, Name, Description : string):Integer;
var
    FSWbemLocator: Variant;
    FWMIService   : Variant;
    FWbemObjectSet: Variant;
begin
    FSWbemLocator := CreateOleObject('WBEMScripting.SWBEMLocator');
    FWMIService := FSWbemLocator.ConnectServer('', 'root\CIMV2', '', '');
    FWbemObjectSet := FWMIService.Get('Win32_Share');
    Result:=FWbemObjectSet.Create(Path, Name, FILE_SHARE, MAXIMUM_CONNECTIONS, Description);
end;

并以这种方式使用

  Err:= CreateShared('C:\Foo', 'MyShare','This is a public shared folder'); //0 indicates Success

使用Inno Setup在安装期间共享文件夹

1 个答案: