• 5

求救~~全公司的PC都無法開啟網路芳鄰了..但打IP或名稱卻可以..

fedora wrote:
如果以 samba ...(恕刪)


嗯嗯..不能再同意更多了...XD

之前是因為公司環境裡還有很多舊PC..(Win98系統)
所以沒辦法架AD...
但接下來首要考慮的就是把AD架起來了..
不然一台一台設定..真的是考驗耐心的...

我也覺得用網芳很麻煩...而且常常沒辦法跑出全部的PC..
總要等上老半天..還要看電腦心情..打個IP還比較快..
但是總要考慮公司大部份User的使用習慣...無奈...

感謝01上一堆熱心的朋友..^^
希望公司的網路明天上班還是健康的...哈哈..
461559 wrote:
嗯嗯..不能再同意更...(恕刪)


如果不能用AD請考慮一下Wins Server也可以解決網芳找電腦時間過於冗長的問題
fedora wrote:
果以 samba 的角度來說
傳播網路芳鄰資料的那台主機,叫做:wins server
...(恕刪)


不好意思,我記得應該是browse server,WINS Server是微軟才有的東西,是內建在Server及以上的作業系統才有的service(當然linux也可以裝),而browse server 每一台電腦都有,其餘就如您所說得一樣,會有一個os level 的priority決定誰當頭,

fedora wrote:
smb 這個協定,使用的 port 是:
TCP 139
UDP 137,138


fedora大應該是 fedora 的power user吧,linux系統下有 samba,不過網芳這種東西應該是遵從 netbios的規範定下來的,後來微軟的NETBUEI跟netbios over tcpip還有linux下的samba也是跟著netbios去走,所以他們之間都能夠透過網路上的芳鄰透過電腦名稱互連。

版主關了某幾台server的browse service的服務之後網芳就可以連,有可能的原因是他們這幾台的os level一樣高,加上某種不確定的因素(中毒/網路卡有問題...),所以他們在互搶master browse server的位置(老二以為老大死了就出來佔上位),搶來搶去變成下面的小弟(一般PC)不知道要聽那個老大的,所以網芳找不到。

公司的IP應該都是DHCP配發的,你可以把DHCP 裡面的 WINS Server指定給下面的電腦,當然要先把wins架起來,這樣就可以讓每台電腦優先使用wins server當作網路芳鄰搜尋時的第一優先,如果wins server掛了,那其他電腦就照著原本的機制再去搜尋電腦,優先權是
WINS Server > host file > browse server

使用WINS Server的好處就是已經對外昭告它就是老大,一直到他死掉以前,都不會有其他人敢跳出來說他是老大,所以網芳的速度會快很多
應該是中毒啦...

上回我公司也是類似的情形

請工程師來搞了好幾天才弄好
其實我一直都覺得 AD 所謂的分散式儲存,沒什麼道理
分散式儲存:就是充分利用每一台 client端電腦的硬碟空間
一般網路芳鄰在找區網內其它電腦,大致上也是這樣子
這種作法的毛病在於無法保障資料的安全性
因為若 client端電腦中毒或硬碟壞軌,資料救不回來
且資料到處存,沒有一個規劃分類,要找很麻煩

解決這個毛病,solution 是勤備份
但是備份有時效性問題,比如中午排程備份
那假如不幸資料毀損,也只能救回前一天以前的
而這還是假設備份有確實執行的情況
實際上要去備份每一台 client端電腦的資料
太過費工,浪費網路頻寬
更基本的問題是:無法完全掌控
比如某台電腦當天沒有開機,或是被 user 給中斷掉,那就備份不到
這種要依賴 client端的方式,對於 MIS 來講,無法100%掌控,不是好方法


「儲存」還是統一集中控管比較好
有一台 NAS 專門負責檔案伺服器
這台 NAS 備有 RIAD 磁碟陣列,可以保障資料安全
RIAD 5 /1+0/1 就等於即時性備份(在線式備份)

因為有統一的檔案伺服器
擴充容量比較容易,只須為那台 NAS 買硬碟
不用每台 client端都升級更換硬碟

NAS 鎖在高度保安房間內,比如機房
不怕辦公室被入侵,client端硬碟被拔走,機密被竊走

伺服器上有詳細的存取 Log 紀錄
這樣子假如發生資料外洩,可以釐清責任抓出兇手

所有人要交換資料、取用資料,都上這一台 NAS 就好了
只須一個 IP
\\IP 直接建立捷徑放在桌面上,點了就進入檔案伺服器

有權限控管,需要帳號、密碼才能登入
然後裡面有很多目錄,比如:企劃部、開發部、行銷部、臨時分享目錄....
一般員工只能進入自己部門的目錄,其餘的看得到但是進不了
主管級,或跨部門專案合作的員工,才開放權限讓他能進入其它部門的目錄
這部份是利用群組權限來控管

這樣一台 NAS,可以買現成的產品
也可以組台PC,裝 FreeNAS 或 Linux(samba)來實作
當 NAS 的電腦,配備不用太好,甚至拿老舊零件來組都行


MIS 要省事,準時下班,統一控管才是王道 XD
科技始終來自於人性(懶)
導入技術可以幫助工作更輕鬆愜意,休息時間更多

採用自由軟體方案,才能有高度自由,不用申請經費
有什麼點子,什麼改良方案,增效系統,不用囉唆,立即開工
倉庫老舊零件組台出來,OS、軟體裝上去,設定好
把整套系統、整套 solution,秀給老闆、同事看,不花一毛錢
工作效率、安全性都提高,理論上應該都會滿意
老闆就說:好,通過!以後就這樣搞~
就算不通過,那也可證明 MIS 是有在動腦做事情的
才不會變成高級水電工,被使來換去,做些沒有技術含量的勞力...

PS.如果要用 Linux 實作的話,推薦 CentOS 比較穩定,RHEL 的克隆版


剛剛同事和我分享一支Find LMB scripts
存在記事本取名為xxx.vbs
例如:FindMB.vbs
在點擊執行!
會產生log
目錄C:\windows\Temp\NetViewList.txt
以下程式開始

Option Explicit
Dim WshShell, FileSystem, RegularExpression, PFound1, Dummy, TheNVFile, TheLine, ThePattern1, ThePattern2
Dim Flag, SysName, NBTable, ThePattern3, PFound2, ThePattern4, WrkGrp, TheText, ThePattern, Match
Dim Matches, TheMatch, NBCommand, TheNBTFile
Const ForReading = 1

Set WshShell = WScript.CreateObject("WScript.Shell")
Set FileSystem = CreateObject("Scripting.FileSystemObject")
Set RegularExpression = New RegExp

Dummy = WshShell.Popup ( "Finding Master Browser. Please Wait...",1,"Find Master Browser Utility",64)

WshShell.Run "Cmd.exe /c Net View > C:\windows\Temp\NetViewList.txt", 2,True
Set TheNVFile = FileSystem.OpenTextFile("C:\windows\Temp\NetViewList.txt", ForReading, True)

Do While TheNVFile.AtEndOfStream <> True
TheLine = TheNVFile.ReadLine
ThePattern1 = "\\"
PFound1 = FindPattern(TheLine, ThePattern1)
If PFound1 Then
ThePattern2 = "\\\\\w*"
Flag = "1"
SysName = GetPattern(TheLine, ThePattern2, Flag )
NBTable = GetNBTable(SysName)
ThePattern3 = "MSBROWSE"
PFound2 = FindPattern(NBTable, ThePattern3)
If PFound2 Then
ThePattern4 = "\w* \w* <1E>"
Flag = "2"
WrkGrp = GetPattern(NBTable, ThePattern4, Flag)
Exit Do
End If
End If
Loop

If PFound2 Then
Dummy = MsgBox("The computer acting as the Master Browser" & vbCrLf &_
" for the workgroup " & WrkGrp & vbCrLf &_
" is " & SysName, 4160, "Find Master Browser Utility")
Else
Dummy = MsgBox("No Master Browser found at this time. " & vbCrLf &_
"Chances are that an election is in progress.", 4144, "Find Master Browser Utility")
End If

TheNVFile.Close
FileSystem.DeleteFile("C:\windows\Temp\NetViewList.txt")

Wscript.Quit


Function FindPattern(TheText, ThePattern)
RegularExpression.Pattern = ThePattern
If RegularExpression.Test(TheText) Then
FindPattern = "True"
Else
FindPattern = "False"
End If
End Function

Function GetPattern(TheText, ThePattern, Flag)
RegularExpression.Pattern = ThePattern
Set Matches = RegularExpression.Execute(TheText)
For Each Match in Matches
TheMatch = Match.Value
If Flag = "1" Then TheMatch = Mid(TheMatch, 3)
If Flag = "2" Then TheMatch = Left(TheMatch, 15)
Next
GetPattern = TheMatch
End Function

Function GetNBTable(SysName)
NBCommand = "nbtstat -a " & SysName
WshShell.Run "Cmd.exe /c " & NBCommand &" > C:\windows\Temp\NBTList.txt", 2,True
Set TheNBTFile = FileSystem.OpenTextFile("C:\windows\Temp\NBTList.txt", ForReading, True)
GetNBTable = TheNBTFile.ReadAll
TheNBTFile.Close
FileSystem.DeleteFile("C:\windows\Temp\NBTList.txt")
End Function




happyhero wrote:
剛剛同事和我分享一支...(恕刪)

好用耶...感謝!!

可惜您是回文,不能幫您加分...先收藏!!

幫您把檔案傳到01上好了...若不妥請告知

附加壓縮檔: FindMB.zip
happyhero wrote:
剛剛同事和我分享一支...(恕刪)


太強了!!好用耶..幾秒就找到擔任Computer Browser的主機...

感謝XD...01真多高手!!
  • 5
內文搜尋
X
評分
評分
複製連結
Mobile01提醒您
您目前瀏覽的是行動版網頁
是否切換到電腦版網頁呢?