โปรด อย่าติดต่อทาง FB ทาง Message นะครับ ถ้าไม่ได้ Add friend ผมไม่เห็นว่ามีข้อความมา แล้วผมไม่รับเพื่อนหากไม่มีเพื่อร่วมกันอย่างน้อย 10 คน ยกเว้นช่วงที่นั้นผมเพิ่งเข้าค่ายหรือมีกิจกรรม ถ้ามีข้อสงสัย comment ด้านล่างได้เลยครับ
เคยเป็นไหม เวลาเสียบแฟลชไดร์ใส่เครื่องแล้วไม่สามารถเปิดเข้าโฟลเดอร์ใดๆได้เลย หรือมันหายไปเลยทั้งๆที่ไม่ได้ลบ ถ้าหากคุณกำลังเป็นอยู่ขอบอกว่าแฟลชไดร์คุณโดนไวรัสเล่นงานเข้าแล้ว วันนี้เรามีวิธีแก้มานำเสนอ วิธีแก้นี้สามารถใช้กับไวรัสเกือบทุกตัวที่เป็นไวรัสซ่อนโฟลเดอร์อีกด้วย
ที่เปิดไม่ได้นั้นเป็นเพราะไวรัสซ่อนโฟลเดอร์จริงๆเอาไว้ จากนั้นสร้างทางลัด Shortcut ขึ้นมา โดยมันจะไปบังคับเปิดตัวไวรัส แต่เนื่องจากว่าที่อยู่ ของไวรัสเปลี่ยนไป เพราะเปลี่ยนเครื่อง ชื่อไดร์จึงเปลี่ยนไป ทำให้ไม่สามารถเปิดไวรัสได้ วิธีแก้คือทำให้โฟลเดอร์หายซ่อน แล้วลบทางลัดออก
หากจำไม่ได้ เรามีวิธีง่ายกว่านั้น คือทำเป็น Bat File เพื่อง่ายต่อการใช้งาน
del /F /Q *.lnk attrib -s -h -r /S /D *
หมาย ความว่าเครื่องคุณมีไวรัสแล้ว ทำให้เมื่อแสดงโฟลเดรอ์แล้วไวรัสแปลงกลับในทันทีครับ แต่ไม่ต้องห่วงเรามีวิธีนำเสนอ โดยทำตามขั้นตอนดังนี้
Option Explicit Dim objFSO,oWS,objFolder,objColFolders Dim tfolder,oLink Dim strPath Set objFSO = CreateObject("Scripting.FileSystemObject") Set oWS = WScript.CreateObject("WScript.Shell") Set objFolder = objFSO.GetFolder(".") Set objColFolders = objFolder.SubFolders For Each tfolder In objColFolders strPath = "./" & tfolder.Name & ".lnk" 'MsgBox strPath Set oLink = oWS.CreateShortcut(strPath) oLink.TargetPath = "%windir%/explorer.exe" oLink.Arguments = tfolder.Name oLink.Save Next MsgBox "Complete"