added some functions

GetProjectUsers.ps1

@@ -0,0 +1,17 @@
+# Parameter help description
+[CmdletBinding()]
+param (
+    [string]
+    $Name
+)
+
+if($PSBoundParameters.ContainsKey('Name')){
+    . .\Variables.ps1
+    $Read='GR-'+$Name+'-RO,'
+    $Write='GR-'+$Name+'-RW,'
+    Write-Host $Read+$Roles
+    Write-Host $Write+$Roles
+    Return $null
+}
+
+throw "No such Project was found"

GetRoles.ps1

@@ -0,0 +1,3 @@
+. .\Variables.ps1
+
+Get-ADGroup -SearchBase $Roles