Creating share with Adsi

[tbaror]

Hello,

i am trying to set new share using code i ported frob Vb script to AutoIt

i getting error

WARNING: $objsNewShare possibly not declared/created yet

$objsNewShare.Path = @ScriptDir

please advice

thanks

$strShareName = "Reports"
 $domainSel = @ComputerName
 $objfServer = ObjGet("WinNT://" & $domainSel&"/lanmanserver")
    
    
    $objsNewShare = $objfServer.Create("Fileshare", $strShareName)

;' The path you want the share to point to.

$objsNewShare.Path = @ScriptDir

         
$objsNewShare.SetInfo

Edited November 14, 2008 by tbaror

[jvanegmond]

Try defining the variables using Dim or Local keywords.

Dim $strShareName = "Reports"
Dim $domainSel = @ComputerName
Dim $objfServer = ObjGet("WinNT://" & $domainSel&"/lanmanserver")
    
    
Dim $objsNewShare = $objfServer.Create("Fileshare", $strShareName)

;' The path you want the share to point to.

$objsNewShare.Path = @ScriptDir

         
$objsNewShare.SetInfo