一般公司都會配給員工個人碟,讓員工能夠將公司資料或重要資料放在網路上,一則有定時備份的好處,不怕因個人NB Hardware 問題而毀損,一則能讓Citrix/Remote Server 等一些特定程式使用共用的Data 區域。
但是 File Server 的Share Folder 該如何正確設定,才能讓 個人資料不會被其他人搜詢出來呢?
環境假設:
Server Name: FileServer1
分享目錄:ShareFolder
員工1:Staff1 的個人碟:\\FileServer1\ShareFolder\Staff1
員工2:Staff2 的個人碟:\\FileServer1\ShareFolder\Staff2
首先,分享目錄(\\FileServer\ShareFolder)有兩個設定權限的地方:Sharing 及Security
Sharing 的成員設定 Domain users 具有讀/寫(Read/Write),如果 Security 成員也設定Domain User,雖權限只給Folder 瀏覽權限,但子目錄 Staff1 將繼承Domain User 具Folder 瀏覽權限。
於sharepoint 搜尋的結果,將造成所有人都可搜詢出Staff1 的資料,雖點選路徑後,無法進入,但部份資料已於搜詢上顯示出來,實為不當。
經測試後,只需將分享目錄的Security 上的Domain User刪除。於子目錄 Staff1 的Security上保留Staff1的Modify 權限,不能讓使用者瀏覽(\\FilerServer1\ShareFolder),但能讓使用者直接開啟目錄(\\FileServer1\ShareFolder\Staff1 )。
這樣的設定權限,讓Sharepoint 顯示搜尋結果時,只會顯示自己有權限的目錄資料。
參考文章
2012年10月2日 星期二
2012年8月29日 星期三
Excel 表格中取出長路徑字串中的檔名
我有一個Excel 的Cell,是一長串的檔名路徑,我只要取最後的檔名,這困擾著我..
[
\Device\HarddiskVolume4\partir\Lotus\Notes\framework\shared\eclipse\features\com.ibm.collaboration.realtime.telephony.prod.feature_8.0.2.20100802-0849\feature_hu.properties
]
有一些formula 如 Left(B) / Right(B) / Find / SEARCH ,感覺沒一個可用的,算了..
自己建一個 Formula 來處理吧!
作法:
1. 開啟 Excel 2010 及文件
2. 移至[檢視]
3. 點選[巨集]
4. 填入巨集名稱: [RightOfBackSlash] -> 建立
5. 自動開出一個模組(Module1)於VBAProject 中,將下方程式貼上
Function RightOfBackSlash(strTmp As String)
While InStr(strTmp, "\") > 0
strTmp = Right(strTmp, Len(strTmp) - InStr(strTmp, "\"))
Wend
RightOfBackSlash = strTmp
End Function
6. Formula 建立完成
7. 於Excel 的New Cell中 ,填上 =RightOfBaclSlash( "OldCell")
8. 完成, 自動取出最後一個檔名
[
\Device\HarddiskVolume4\partir\Lotus\Notes\framework\shared\eclipse\features\com.ibm.collaboration.realtime.telephony.prod.feature_8.0.2.20100802-0849\feature_hu.properties
]
有一些formula 如 Left(B) / Right(B) / Find / SEARCH ,感覺沒一個可用的,算了..
自己建一個 Formula 來處理吧!
作法:
1. 開啟 Excel 2010 及文件
2. 移至[檢視]
3. 點選[巨集]
4. 填入巨集名稱: [RightOfBackSlash] -> 建立
5. 自動開出一個模組(Module1)於VBAProject 中,將下方程式貼上
Function RightOfBackSlash(strTmp As String)
While InStr(strTmp, "\") > 0
strTmp = Right(strTmp, Len(strTmp) - InStr(strTmp, "\"))
Wend
RightOfBackSlash = strTmp
End Function
6. Formula 建立完成
7. 於Excel 的New Cell中 ,填上 =RightOfBaclSlash( "OldCell")
8. 完成, 自動取出最後一個檔名
2012年8月3日 星期五
使用GPO關閉Windows Services
最近防毒軟體新版的網頁防禦功能有點問題,將部份使用IP為網站的網頁,認定為惡意網站,相對的,網站 Redirect 的行為通通被防毒軟體檔下來,連開啟default.htm都不行,甚為困擾!
還好Windows GPO可管理 Services,將Services設為Disable 即可。在此稍稍記錄..以免忘記!!
1. 建立[Disable_SWI_Serivces]的GPO
2. 編輯[Disable_SWI_Service]的GPO:於[Computer Configuration] => Policies => Windows Settings => Security Settings => System Services => 選擇要Dsiable 的Services
4. 套用GPO到適當的OU
5. Windows Client 下: gpupdate /force 來立即更新
還好Windows GPO可管理 Services,將Services設為Disable 即可。在此稍稍記錄..以免忘記!!
1. 建立[Disable_SWI_Serivces]的GPO
2. 編輯[Disable_SWI_Service]的GPO:於[Computer Configuration] => Policies => Windows Settings => Security Settings => System Services => 選擇要Dsiable 的Services
3. 設定Service: 勾選[Define this policy setting]來啟動設定 =>設定狀態為[Disabled] =>確認並關閉編輯
4. 套用GPO到適當的OU
5. Windows Client 下: gpupdate /force 來立即更新
2012年5月14日 星期一
Lync 查找原始分機擁有者的方法
Lync Enterprise Voice 設定的分機重覆了,無法設定給新人,怎麼找到舊的設定者 ?
設定使用者的Lync Enterprise Voice 時,Line URI 欄位不得重覆,如果新人要設定時,會出現下列的錯誤訊息:
Filter failed to return unique result, "[SipAddress : sip: tester@demo.com] [LineURI : tel:+856277][PrivateLine : tel:856277]"
由此得知已有使用者使用過 tel:+856277,
可使用Get-CsUser -Filter {LineURI -eq "tel:+856277"} 的方式找出舊的擁有者或離職者.
其他 Filter 的相關Operator 可看參考。
設定使用者的Lync Enterprise Voice 時,Line URI 欄位不得重覆,如果新人要設定時,會出現下列的錯誤訊息:
Filter failed to return unique result, "[SipAddress : sip: tester@demo.com] [LineURI : tel:+856277][PrivateLine : tel:856277]"
由此得知已有使用者使用過 tel:+856277,
可使用Get-CsUser -Filter {LineURI -eq "tel:+856277"} 的方式找出舊的擁有者或離職者.
其他 Filter 的相關Operator 可看參考。
2012年5月7日 星期一
SAP Client 登入訊息伺服器錯誤
SAP GUI 710發生"登入平衡發生錯誤88: 無法連線至訊息伺服器(rc=9)" 的錯誤訊息。
必需檢查 c:\windows\system32\drivers\etc下的Services file, 是否有訊息伺服器使用的Port號:
如: sapmsXXX 36<XX>/tcp
2012年4月27日 星期五
使用VBScript將OU內的User名稱改大寫
要將OU內的所以使用者名稱,將英文小寫部份都變更為大寫。
爬文了一下, 原來DN (distinguishedName) 是不能用 objUser.put 方式來改的..
要用Move的方式來處理..
如下 : 將User Object 由原來的名稱, 移到大寫的新名稱的位置.
' Change DN (distinguishedName) to UpperCase by VBScript
' -----------------------------------------------'
Option Explicit
Dim objOU, objUser , UName, LName
Set objOU = GetObject("LDAP://ou=OU1,dc=demo,dc=com")
For each objUser in objOU
If objUser.class="user" Then
LName = objUser.displayName
UName = UCase(objUser.displayName)
objUser.Put "displayname", UName
objUser.Put "givenName", UName
objUser.Put "sAMAccountName",UName
objUser.SetInfo
GetObject(objUser.parent).moveHere ObjUser.adspath,"CN=" & UName
End If
Next
2012年4月9日 星期一
How to delete files after archiving in Schedule tasks
發現一個目前是winrar 獨有的功能, delete files after archiving , 下的參數是 rar -df , 目前download winrar 4.11 是具備此功能的,其他如 7zip / winzip 目前都沒有發現對應的功能.
把它寫成一個VBS
strshell = "RAR.exe a -r -df d:\arc\demo-datetime.rar d:\datafolder\"
result1 = wshshell.run (strshell,0,False)
放到 WIN2k8做成排程
怪了..居然可以壓縮,但不能刪除舊檔..??
Why?
查了一下 Task Security Context ,是權限不足,勾選排程的"run with highest privileges", 即可正常執行.
把它寫成一個VBS
strshell = "RAR.exe a -r -df d:\arc\demo-datetime.rar d:\datafolder\"
result1 = wshshell.run (strshell,0,False)
放到 WIN2k8做成排程
怪了..居然可以壓縮,但不能刪除舊檔..??
Why?
查了一下 Task Security Context ,是權限不足,勾選排程的"run with highest privileges", 即可正常執行.
訂閱:
文章 (Atom)



