ActiveDirectory・FileServer構築メモ

ファイルサーバの共有ディレクトリにドメインのアクセス権が付与できない†

状況
ファイルサーバの共有ディレクトリにドメインユーザのアクセス権限を付与しようとしたが、ユーザの検索対象がローカルのみとなってしまう。
極稀にドメインを指定できる場合がある。

対策
ファイルサーバの名前解決をADサーバのみの状態に変更する。
ネットワークのプロパティにてADサーバ以外のDNSサーバが指定されていたことが原因。
DNSサーバとしてADサーバのアドレスのみに設定し、名前解決をADサーバにのみ向けることで解決。

↑

個人フォルダの共有†

状況
個人用フォルダを階層化して作成したがアクセス許可設定の階層化がうまくいかない
対策
共有領域のアクセス権は共有設定のアクセス権とイコールになるため、個人用フォルダを個別に共有領域とすることで解決。

↑

ログインスクリプトが動かない†

状況
ドメインのアカウント管理画面よりユーザのプロパティでログオンスクリプトを指定したが正常に動作しない。
対策
動作しない原因が不明なため、OUに対してグループポリシーでログオンスクリプトを実行するように設定。
グループポリシーは、

[ユーザーの構成] - [Windowsの設定] - [スクリプト（ログオン/ログオフ）] - [ログオン]

に登録する。
尚、スクリプトのデフォルト参照先は下記のパスである。

D:\domain.local\SYSVOL\sysvol\domain.local\Policies\{乱数}\User\Scripts

OUに指定したログオンスクリプトが動かない場合の対策は以下

1. ポリシーの再適用
クライアントPCより以下のコマンドを実行して再度ログオンを行う。

gpupdate

2. クライアントPCの再起動
タコな仕様を呪いつつ、クライアントPCを再起動する

↑

ログオンスクリプト†

個人フォルダのマウント

'-----------------------------------------------------
' Logon Script (個人フォルダのマウント処理)
'
' Data: 2007.02.15
'-----------------------------------------------------

On Error Resume Next

Dim wshNetwork
Set wshNetwork = CreateObject("WScript.Network")

'個人フォルダのマウント
wshNetwork.MapNetworkDrive "k:" , "\\fs\" & wshNetwork.UserName


set wshNetwork = Nothing

共有フォルダのマウント

'-----------------------------------------------------
' Logon Script (共有領域のマウント処理)
'
' Data: 2007.02.15
'-----------------------------------------------------

On Error Resume Next

Dim wshNetwork
Set wshNetwork = CreateObject("WScript.Network")

'共有領域のマウント
wshNetwork.MapNetworkDrive "m:" , "\\fs\Documents"
wshNetwork.MapNetworkDrive "n:" , "\\fs\FreeSpace"

set wshNetwork = Nothing

プリンタのマウント

'-----------------------------------------------------
' Logon Script (プリンタのマウント処理)
'
' Data: 2007.02.15
'----------------------------------------------------- 

On Error Resume Next 

'プリンタマウント
wshNetwork.AddWindowsPrinterConnection "\\fs\IPSiO_C810(color)"
wshNetwork.AddWindowsPrinterConnection "\\fs\LBP-1820(mono)" 

'デフォルトプリンタの設定
wshNetWork.SetDefaultPrinter "\\fs\LBP-1820(mono)" 

set wshNetwork = Nothing