电脑中毒了，怎么办？web hosting

神奇宝贝

经常格式化对电脑岂不是很伤？再说资料老是要移来移去的，也是挺麻烦的！我看呢，只要防毒系统做得充足一点，应该没什么大问题吧！！:)

Artvine

经常格式化对电脑岂不是很伤？再说资料老是要移来移去的，也是挺麻烦的！我看呢，只要防毒系统做得充足一点，应该没什么大问题吧！！

建議Hard Disk將資料做分割，Formate不會傷到，使用習慣的確會影響中毒機率。另外，可考慮抽取式Hard Disk，多備份幾顆。一般說來，我覺得不穩定時就Formate，一次約15分鐘。
最近發現一些Hard Disk損壞在第一行，以致無法開機，但資料還救得回來。多買非大陸製的(品管問題)
在臺北買電腦零件，是當場測試的，我不知道大陸服務如何？
總之Hard Disk/主機版/Ram一定要買原裝名牌(大陸廠商跟我說他們常用次貨動手腳)

[ 本帖最后由 Artvine 于 2007-6-14 15:55 编辑 ]

mengqing

呵呵，水电斑竹，这个不是零部件的问题。中毒本身也不是丢失资料的问题。

原帖由 神奇宝贝 于 2007-6-14 14:10 发表
经常格式化对电脑岂不是很伤？再说资料老是要移来移去的，也是挺麻烦的！我看呢，只要防毒系统做得充足一点，应该没什么大问题吧！！

一般的格式化的确不会伤硬盘，这个倒不用担心。但是，问题就一个：麻烦！
如果重做系统，那好多东西都要重新设置，浪费时间不说，很麻烦。我一向喜欢把事情变得简单，然后再做，事半功倍。

至于防病毒系统，你可以用，但是不可以依靠他。因为现在是“道高一尺，魔高一丈”。新病毒，杀毒软件总是认不出来的。我最近就中了一个，杀毒软件根本不识别，我手工杀掉的。这个是很常见的盘符下autorun类型的病毒，这种病毒很多，“熊猫”就是这种。藏在各个盘符的根目录下（系统级隐藏文件）。因为有系统还原，所以没什么大的影响。发现中毒后，重新启动系统（此时，中毒的系统已经被还原），然后查看所有盘符下的系统级隐藏文件，发现病毒后，删除，OK。如果没有系统还原软件。这次就死定了:L。有杀毒软件也没用，我用刚更新的卡巴斯基试了，根本没发现。

保护系统的最佳方案，就是“系统还原+杀毒软件”了。但是不能用XP自带的，要另外安装第三方的保护系统。一般只保护C盘（系统盘）就可以了。安装新软件的时候，需要将保护软件暂时关闭，这是唯一稍显麻烦的地方。

当然，“IE收藏夹”、“IE缓存”、“IE Cookies”、“桌面”、“开始菜单”之类的系统文件夹，我们需要用“超级兔子”把他们挪出来。这样，系统受到了保护，这些需要每天更新的东西，又不会被还原了。杀毒软件平时也不用开，严重的占系统，有了他，干什么都慢。我总是觉得，没有病毒的时候，杀毒软件本身就是个病毒。:-(

这样的做法，只在第一次安装系统的时候显得麻烦。一旦系统安装好，就可以用很久。这种很久，是指系统在干干净净的情况下，而不是带着病毒。不出什么意外，装一次，用个一年半年的没问题。反正我是很少重装系统的，因为根本不需要。

[ 本帖最后由 mengqinghao 于 2007-6-14 23:52 编辑 ]

Artvine

最近木馬和病毒橫行，我甚至覺得許多站不知道自己帶毒了。它們的原理是先侵入system32\，有兩個類型：一是化身於影像檔連結的執行檔(exe\dll)如Viking病毒，另一個是影響Htm檔(自動加入病毒網址)。一般的掃毒軟件目前殺不乾淨，瑞星則是殺個過頭，目前我用的是Norton，效果不錯。
硬碟分割的方法已經破功。
最近台北有一奇特現象，消費者買新電腦紛紛要求自動降級為XP，還要貼1250RMB(5000NT)。我目前買電腦並不急著用Vista，因為它不能被Formate乾淨，因此一部電腦至少要2部HD，2套作業系統，因此預料屆時病毒將更可怕。

湘里妹子

有您说得那么恐怖么？

运用多个杀毒软件杀毒可以比较好的防御。

Artvine

多个杀毒软件杀毒

某些廠牌的軟件互斥。根據我的測試，目前新種病毒都殺不乾淨(包括大陸的)

mengqing

换浏览器，安装系统还原，双硬盘，双操作系统。（没杀毒软件什么事）

嗯，我的电脑就是这样。
周边除了不能上网的朋友，我的电脑最安全。

mengqing

原帖由 湘里妹子 于 2007-8-3 20:47 发表
有您说得那么恐怖么？

运用多个杀毒软件杀毒可以比较好的防御。

你的电脑卡，就是他们害的吧。每个软件运行的时候，杀毒软件都要过滤，他们之间再过滤。这运行速度，可想而知。:huh:

原帖由 Artvine 于 2007-8-3 23:28 发表

某些廠牌的軟件互斥。根據我的測試，目前新種病毒都殺不乾淨(包括大陸的)

“新”病毒，谁能杀？肯定杀不了啊。不然，更新病毒库作甚？所以，杀毒软件，最多是个辅助，sametimes，有用。

[ 本帖最后由 mengqinghao 于 2007-8-3 23:59 编辑 ]

湘里妹子

原帖由 mengqinghao 于 2007-8-3 23:53 发表
你的电脑卡，就是他们害的吧。每个软件运行的时候，杀毒软件都要过滤，他们之间再过滤。这运行速度，可想而知。:huh:

运行速度在杀毒过程中是有点儿慢:-P  杀完了就正常了！

原帖由 Artvine 于 2007-8-3 23:28 发表

某些廠牌的軟件互斥。根據我的測試，目前新種病毒都殺不乾淨(包括大陸的)

连续交叉杀毒三次以上完全可以把害虫赶出去阿！;-)

Artvine

"互斥"的意思是說裝了某牌後不讓你裝別牌。某些牌子(如PCCLIN..)根本除了格式化無法反安裝。說句內行人常說的話，沒人對防毒軟體有信心，只能要求自己小心並養成好習慣。
以前面說的Viking木馬(群)來說，我試過大陸各牌軟體，沒一個掃得到(這個情況下當然覺得掃完了)，只有"瑞星"能找到，只是它殺了太多，會造成系統完蛋。它會"滲透到各分割槽，並破壞所有執行檔"，因此你無論是在C\D\E...所有的執行檔都完蛋；就算你以為把C\格式化了，但其它槽仍有病毒並繼續擴散。
此外某些"綁架式"的木馬掃毒軟件反而不好找，後來我發現用全硬碟htm/html/txt/xml.. Search and Replace的方法反而更好。

部分程式函數列舉於下：(Vb)

1. 
   
2. Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
   
3. 
   
4. Private Const forReading = 1, forWriting = 2, forAppending = 3
   
5. Private fs, f
   
6. 
   
7. Private Sub Form_Load()
   
8. 　' fs 表示 FileSystemObject 物件
   
9. 　Set fs = CreateObject("Scripting.FileSystemObject")
   
10. End Sub
    
11. 
    
12. ' 包含子目錄的檔案搜尋
    
13. ' 參數 inPath 表示起始目錄，參數 Filter 表示檔案過濾條件，例如字串 "*.txt;*.htm;*.html"
    
14. ' 選擇性參數 Include_SubDir 決定是否要搜尋子目錄，預設為否
    
15. Private Sub searchFile(inPath As String, Filter As String, Optional Include_SubDir As Boolean)
    
16. 　On Error Resume Next
    
17. 　　
    
18. 　Dim fn As String, pfn As String, i As Long, isFind As Boolean
    
19. 　Dim dirList() As String, nDir As Long, filterList() As String
    
20. 　　
    
21. 　filterList = Split(Filter, ";")
    
22. 　fn = Dir(inPath, vbHidden Or vbDirectory Or vbReadOnly)
    
23. 
    
24. 　Do While fn <> ""
    
25. 　　If fn <> "." And fn <> ".." Then
    
26. 　　　pfn = inPath & fn
    
27. 　　　If fs.FolderExists(pfn) Then
    
28. 　　　　If Include_SubDir Then
    
29. 　　　　　nDir = nDir + 1
    
30. 　　　　　ReDim Preserve dirList(nDir)
    
31. 　　　　　dirList(nDir) = pfn
    
32. 　　　　End If
    
33. 　　　Else
    
34. 　　　　isFind = False
    
35. 　　　　For i = 0 To UBound(filterList)
    
36. 　　　　　If UCase(fn) Like UCase(filterList(i)) Then isFind = True: Exit For
    
37. 　　　　Next i
    
38. 　　　　If isFind Then
    
39. 　　　　　'====================
    
40. 　　　　　' 針對找到的檔案執行處理程序
    
41. 　　　　　'====================
    
42. 　　　　End If
    
43. 　　　End If
    
44. 　　End If
    
45. 　　fn = Dir
    
46. 　Loop
    
47. 
    
48. 　For i = 1 To nDir
    
49. 　　searchFile dirList(i) & "", Filter, Include_SubDir
    
50. 　Next i
    
51. End Sub
    
52. 
    
53. ' 取得指定文件的全部內容
    
54. Private Function getFileText(fn As String) As String
    
55. 　On Error Resume Next
    
56. 
    
57. 　Set f = fs.OpenTextFile(fn, forReading)
    
58. 　getFileText = f.ReadAll
    
59. 　f.Close
    
60. End Function
    
61. 
    
62. ' 重寫指定文件的全部內容，並且傳回是否成功
    
63. Private Function saveFileText(fn As String, txt As String) As Boolean
    
64. 　On Error GoTo ErrorHandler
    
65. 
    
66. 　Set f = fs.OpenTextFile(fn, forWriting)
    
67. 　f.write txt
    
68. 　f.Close
    
69. 　saveFileText = True
    
70. 
    
71. Exit Function
    
72. ErrorHandler:
    
73. 　saveFileText = False
    
74. End Function
    
75. 
    
76. ' 取得指定文件的全部內容（另一種方法）
    
77. 'Private Function getFileText(fn As String) As String
    
78. '　Open fn For Binary As #1
    
79. '　getFileText = Input(LOF(1), 1)
    
80. '　Close #1
    
81. 'End Function
    
82. 
    
83. ' 重寫指定文件的全部內容（另一種方法）
    
84. 'Private Sub saveFileText(fn As String, txt As String)
    
85. '　Open fn For Output As #1
    
86. '　Print #1, txt
    
87. '　Close #1
    
88. 'End Sub
    
89. 
    
90. ' 以系統的預設方式，開啟個別檔案
    
91. Private Sub openFile(fn as String)
    
92. 　ShellExecute Me.hWnd, "open", fn, "", "", 1
    
93. End Sub
    
94. 
    
95. ' 以 notepad.exe 檢視個別檔案
    
96. Private Sub viewFile(fn as String)
    
97. 　ShellExecute Me.hWnd, "open", "notepad.exe", Chr(34) & fn & Chr(34), "", 1
    
98. End Sub
    
99. 
    
100. ' 以 explorer.exe 瀏覽檔案的所在目錄
     
101. Private Sub exploreDir(fn as String)
     
102. 　ShellExecute Me.hWnd, "open", "explorer.exe", "/e," & fs.GetParentFolderName(fn), "", 1
     
103. End Sub
     

复制代码