回答編集履歴
1
取消し
answer
CHANGED
|
@@ -1,83 +1,4 @@
|
|
|
1
|
-
csvからディレクトリ名、ユーザー名を抽出するプログラムです。
|
|
2
|
-
|
|
3
|
-
```PowerShell
|
|
4
|
-
#
|
|
5
|
-
# csvからディレクトリ名、ユーザー名を抽出
|
|
6
|
-
#
|
|
7
|
-
# ■注意事項■
|
|
8
|
-
# ① このプログラムは（例）キー,値,値,値 には使用できません。ご注意ください。
|
|
9
|
-
# ② csvファイルは「ヘッダなし」にしてください。
|
|
10
|
-
# ③ csvファイルの配置図は（キー,値）または（キー,値,値）です。
|
|
11
|
-
# test1,user001
|
|
12
|
-
# test2,user001,user002
|
|
13
|
-
#
|
|
14
|
-
|
|
15
|
-
#
|
|
16
|
-
|
|
1
|
+
私のミスで質問者様の文章を読み間違えました。
|
|
17
|
-
# ↓
|
|
18
|
-
# キー,値
|
|
19
|
-
#
|
|
20
|
-
|
|
21
|
-
$inputfile = "c:\userlist.csv" # ← Cドライブに「ヘッダなし」のcsvファイルを置きます。
|
|
22
|
-
$aaaa = @() # 配列
|
|
23
|
-
$Datas = @(Get-Content -LiteralPath $inputfile) # Datas ← 最後の s は気にしないで。
|
|
24
|
-
foreach ( $Data in $Datas ){
|
|
25
|
-
if ( $Data -ne '' ){
|
|
26
|
-
$out = $Data -replace '^(.*),(.*),(.*)$','$1,$2'
|
|
27
|
-
$aaaa += $out
|
|
28
|
-
$out = $Data -replace '^(.*),(.*),(.*)$','$3'
|
|
29
|
-
if ( $out -ne '' ){
|
|
30
|
-
$out = $Data -replace '^(.*),(.*),(.*)$','$1,$3'
|
|
31
|
-
$aaaa += $out
|
|
32
|
-
}
|
|
33
|
-
}
|
|
34
|
-
}
|
|
35
|
-
|
|
36
|
-
#
|
|
37
|
-
|
|
2
|
+
取消して撤回致します。
|
|
38
|
-
# test1,user001 → user001
|
|
39
|
-
|
|
3
|
+
誠に申し訳ございませんでした。
|
|
40
|
-
#
|
|
41
|
-
|
|
42
|
-
foreach ( $bbbb in $aaaa ){
|
|
43
|
-
$target = "c:\temp" # c:\temp ターゲット
|
|
44
|
-
$Right = $bbbb.Split(",")[1] # user001 カンマを中心にして分解 test1,user001 → user001 右辺を取得
|
|
45
|
-
$Left = $bbbb.Split(",")[0] # test1 カンマを中心にして分解 test1,user001 → test1 左辺を取得
|
|
46
|
-
$User_or_Group_name = $Right # user001 ユーザー名
|
|
47
|
-
$Folder_Path = $target+ '\' + $Left # c:\temp\test1 target+ディレクトリ名
|
|
48
|
-
# -----
|
|
49
|
-
|
|
50
|
-
Write-host $Folder_Path $User_or_Group_name # 確認の為、表示させています ← c:\temp\test1 user001 ← この内容で正しいかどうか確認してください。確認後は削除できます。
|
|
51
|
-
|
|
52
|
-
# -----
|
|
53
|
-
#
|
|
54
|
-
# ↓ここから先は、自己責任になります。ご利用に際し如何なる損失や損害が発生しても、一切の責任を負いかねます。
|
|
55
|
-
#
|
|
56
|
-
|
|
4
|
+
心からお詫び申し上げます。
|
|
57
|
-
# $acl = Get-ACL $Folder_Path # ファイル名を修正しました FolderPath → Folder_Path
|
|
58
|
-
# $Permission = ("$User_or_Group_name","FullControl","ContainerInherit","None","Allow")
|
|
59
|
-
# $AccessRule = New-Object System.Security.AccessControl.FileSystemAccessRule $Permission
|
|
60
|
-
# $acl.SetAccessRule($AccessRule)
|
|
61
|
-
# $acl | Set-ACL $Folder_Path # ファイル名を修正しました FolderPath → Folder_Path
|
|
62
|
-
}
|
|
63
|
-
```
|
|
64
|
-
|
|
65
|
-
■注意事項■
|
|
66
|
-
|
|
67
|
-
※ このプログラムは（例）キー,値,値,値 には使用できません。ご注意ください。
|
|
68
|
-
|
|
69
|
-
※ csvファイルは「ヘッダなし」にしてください。
|
|
70
|
-
|
|
71
|
-
※ csvファイルの配置図は（キー,値）または（キー,値,値）です。
|
|
72
|
-
|
|
73
|
-
※「ここから先は。。。」の部分は、自己責任になります。
|
|
74
|
-
|
|
75
|
-
※ ご利用に際し如何なる損失や損害が発生しても、一切の責任を負いかねます。
|
|
76
|
-
|
|
77
|
-
※ 確認用に変数を表示させています。確認後は削除できます。
|
|
78
|
-
|
|
79
|
-
※ プログラムにコメントを付けています。実行する前に、すべてのコメントをお読みください。
|
|
80
|
-
|
|
81
|
-
※ サーバーのアクセス権を変更した事がありません。エラーが発生してもアドバイスできません。ご了承ください。
|
|
82
|
-
|
|
83
|
-
※ コマンドプロンプトに icacls 命令があります。問題が発生した場合、この命令を調べると良いかもしれません。
|