Virus???

Thảo luận trong 'Ứng dụng Excel' bắt đầu bởi levanduyet, 4 Tháng năm 2006.

3,201 lượt xem

  1. levanduyet

    levanduyet Welcome

    Bài viết:
    535
    Đã được thích:
    11
    Giới tính:
    Nam
    Nơi ở:
    HCM
    Chào các bạn,
    Tôi có một số file excel, mới vừa bị tình trạng thanh công cụ Toolbox của tôi các nút đều bị mờ đi. Tôi đã dùng chương trình để sửa lại nhưng không được! (bị từ lúc chép file của BinhOverAC, hi hi hi). Các nút lệnh đều bị không thấy. Vậy đây có phải là virus không? Tôi đã thử tìm hiểu (hình như là virus). Vậy thì làm sao phục hồi lại các file này (vẫn ổn định như trước khi bị...)

    Thân,

    Lê Văn Duyệt
     
    #1
  2. Bình_OverAC

    Bình_OverAC Over Abnormal / Crazy

    Bài viết:
    845
    Đã được thích:
    7
    Nơi ở:
    Nha Trang
    Bác ơi. Máy của em có bị gì đâu? :wall:
     
    #2
  3. levanduyet

    levanduyet Welcome

    Bài viết:
    535
    Đã được thích:
    11
    Giới tính:
    Nam
    Nơi ở:
    HCM
    hi hi

    Tôi upload file lên các bạn xem sao nha.

    Lê Văn Duyệt
     

    Các file đính kèm:

    #3
  4. heroic

    heroic Thành viên hoạt động

    Bài viết:
    56
    Đã được thích:
    0
    Nơi ở:
    vn
    Đúng rồi, em thử chạy bị dính luôn!

    Em đã thử mở file của Bác Duyệt gởi lên đúng như cảnh báo Control toolbox bị mờ không hoạt động được thế là khỏi thiết kế form luôn. Lạ thật Viruts gì kỳ vậy cơ chứ. không nguy hiểm nhưng bực mình thật????????????//
     
    #4
  5. HảiĐăng

    HảiĐăng Thành viên hoạt động

    Bài viết:
    99
    Đã được thích:
    1
    Nơi ở:
    Biển Khơi
    Tôi không hiểu lắm về mấy cái này:

    Option Explicit

    Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Dim rs As New ADODB.Recordset
    On Error GoTo Workbook_BeforeClose_Error
    Application.Calculation = xlCalculationManual
    Application.ScreenUpdating = False
    If bConnected = False Then
    Call ConnectToDatabase
    End If
    'If bConnected Then
    ' gcnAccess.Open
    ' rs.Open "TB_USERS_INOUT", gcnAccess, adOpenKeyset, adLockOptimistic, adCmdTable
    ' rs.AddNew
    ' rs.Fields("User") = IIf(Len(Trim(sUserName)) = 0, User, sUserName)
    ' rs.Fields("StringLogInOut") = FormatStringLogInOut("LOUT")
    ' rs.Update
    ' rs.Close
    ' Set rs = Nothing
    'End If
    Call DestroyConnection
    'Call AskToEnableWhenOpen
    ErrorExit:
    If bConnected Then
    gcnAccess.Close
    bConnected = False
    End If
    If IsNull(rs) Then
    If rs.State = adStateOpen Then
    rs.Close
    Set rs = Nothing
    End If
    End If
    Application.Calculation = xlCalculationAutomatic
    Application.ScreenUpdating = True
    Exit Sub

    Workbook_BeforeClose_Error:

    If bCentralErrorHandler("ThisWorkbook", "Workbook_BeforeClose", , False) Then
    Stop
    Resume
    Else
    Resume ErrorExit
    End If
    End Sub

    Private Sub Workbook_Open()

    On Error GoTo Workbook_Open_Error
    Application.Calculation = xlCalculationManual
    Application.ScreenUpdating = False
    Call ConnectToDatabase
    Application.CommandBars("Control Toolbox").Reset
    ErrorExit:
    Application.Calculation = xlCalculationAutomatic
    Application.ScreenUpdating = True
    Exit Sub

    Workbook_Open_Error:

    If bCentralErrorHandler("ThisWorkbook", "Workbook_Open", , False) Then
    Stop
    Resume
    Else
    Resume ErrorExit
    End If
    End Sub


    Nhưng ở các máy khác nhau có lẽ sẽ chịu ảnh hưởng khác nhau nhỉ
     
    #5
  6. levanduyet

    levanduyet Welcome

    Bài viết:
    535
    Đã được thích:
    11
    Giới tính:
    Nam
    Nơi ở:
    HCM
    Chào bạn,
    Bạn không cần quan tâm mấy cái này vì nó đâu có làm gì ảnh hưởng đến Toolbox.

    LVD
     
    #6
  7. levanduyet

    levanduyet Welcome

    Bài viết:
    535
    Đã được thích:
    11
    Giới tính:
    Nam
    Nơi ở:
    HCM
    help, help

    Các bạn có ai help được mình cái vụ này không?

    Gấp, gấp...

    Thân,

    LVD
     
    #7
  8. dragon2

    dragon2 Thành viên thân thiết

    Bài viết:
    52
    Đã được thích:
    0
    Nơi ở:
    Ha Noi
    Anh thử dùng AGV quét xem sao !
    Nếu không thì gửi cho BKAV .
     
    #8
  9. Đào Việt Cường

    Đào Việt Cường Moderator

    Bài viết:
    400
    Đã được thích:
    3
    Giới tính:
    Nam
    Nơi ở:
    Khánh Hòa
    Dear levanduyet,
    ----------------
    Em nhận thấy "bộ đồ nghề" tools bar chỉ bị vô hiệu hoá khi Workbook For_Test.xls được active. Sao anh không chuyển đổi Workbook này bằng cách sao chép Database và các thủ tục VBA thành Workbook mới?
    Còn để tìm hiểu sâu xa, em đã Alt+Shift +11 vào Microsoft Script Editor và so sánh với Workbook bình thường. Em không hiểu mấy nhưng thấy có nhiều mã lệnh khác lắm.
    Anh thử tìm hiểu phần đó xem sao!
     
    #9
  10. levanduyet

    levanduyet Welcome

    Bài viết:
    535
    Đã được thích:
    11
    Giới tính:
    Nam
    Nơi ở:
    HCM
    Dĩ nhiên là làm như vầy thì OK rồi, nhưng tốn thời gian lắm. Vì cái cục nợ của anh hơi bị nhiều.

    Tks em nhiều.

    Lê Văn Duyệt
     
    #10
  11. cold

    cold Thành viên thân thiết

    Bài viết:
    243
    Đã được thích:
    42
    Nơi ở:
    A2,Hoang Hoa Tham,Q.TB
    Virus???
    To levanduyet,
    Chỉ cần làm như sau: Tool/Options/View/nhấn vào nút " Show all" o Objects.

    :bigok: :bigok: :dzo:
     
    #11
  12. Đào Việt Cường

    Đào Việt Cường Moderator

    Bài viết:
    400
    Đã được thích:
    3
    Giới tính:
    Nam
    Nơi ở:
    Khánh Hòa
    cool

    Ồ! phải rồi đấy!
    ---------------
    Bạn cold làm mình... "hot" quá! Té ra đây là kiến thức căn bản mà mình lại bỏ qua, lại còn suýt nữa nghi oan cho cái "cục ấy" của bác Duyệt! :cool2: :inlove:
     
    #12
  13. Bình_OverAC

    Bình_OverAC Over Abnormal / Crazy

    Bài viết:
    845
    Đã được thích:
    7
    Nơi ở:
    Nha Trang
    Không thể tin được! Chuyện này lạii có thể như thế.
    Cảm ơn Cold rất nhiều.
     
    #13
  14. levanduyet

    levanduyet Welcome

    Bài viết:
    535
    Đã được thích:
    11
    Giới tính:
    Nam
    Nơi ở:
    HCM
    Tks cold nhiều. Tôi chưa bao giờ rớ vào cái này. Hic

    Thân,

    Lê Văn Duyệt
     
    #14
  15. HongViet

    HongViet Thành viên thân thiết

    Bài viết:
    286
    Đã được thích:
    10
    Nơi ở:
    Đà nẵng
    Xin ké B. Duyệt 1 câu!

    Đáng lí hỏi bên AFC, nhưng tiện thấy có trương mục này xin B. Duyệt cho ké với:
    Rằng trong Office của ông B. có vài thứ đã bị virus xơi như words rồi sau đó đến anh Excel;
    Vậy khi nào đến anh Access đây, hay là nó có rồi hử các Bác?!:dance2: :angel:
     
    #15
  16. lehongduc

    lehongduc Thành viên thân thiết

    Bài viết:
    129
    Đã được thích:
    1
    Nơi ở:
    VietNam
    Tất cả các tài liệu của MS. Office đều có thể mang Virus!

    Xin chào các Bác,
    Có 1 điều khẳng định rằng: tất cả các tài liệu được tạo từ Microsoft Office đều có thể mang theo virus.
    Vì sao vậy, vì tất cả các thành phần của Microsoft Office đều đã được Bác Bill Gate cho tích hợp ngôn ngữ VBA đằng sau nó. Với VBA các Bác có thể format cả 1 ổ đĩa đi mất tiêu luôn đó chứ!
    Kính các Bác cẩn thận hết sức nhé.
     
    #16
  17. HảiĐăng

    HảiĐăng Thành viên hoạt động

    Bài viết:
    99
    Đã được thích:
    1
    Nơi ở:
    Biển Khơi
    Mình thấy sợ mấy cái VBA này quá. Nó cứ tự động chạy, chẳng hỏi han gì cả. Không lẽ khi nào cũng đặt Macro Security ở mức High.

    Ps: Mời các bác xem thêm cái này nhé:

    Phát hiện lỗ hổng nghiêm trọng trong MS Word

    Các chuyên gia nghiên cứu bảo mật vừa mới phát hiện ra một lỗ hổng bảo mật "zero-day" nghiêm trọng trong Microsoft Word đã bị tin tặc Trung Quốc và Đài Loan khai thác.

    Microsoft Security Response Center cho biết trung tâm này đã nỗ lực làm việc với các hãng bảo mật nhằm ngăn chặn các cuộc tấn công thông qua các lợi dụng khai thác lỗi bảo mật nói trên. Dự kiến bản vá lỗi sẽ được tung ra vào ngày 13/6 tới đây. Lỗi bảo mật này được khai thác thông qua một tệp tin Word "đặc biệt" được đính kèm trong các email. Nếu người sử dụng mở tệp này bằng Word XP hay Word 2003, một con trojan sẽ đột nhập lên hệ thống của họ. Con trojan này được trang bị các tính năng của rootkit nhằm tự giấu mình trước các ứng dụng bảo mật diệt virus.

    Con trojan này có nhiệm vụ liên lạc với một máy chủ ở xa. Tuy nhiên, đến này các chuyên gia vẫn chưa biết là chúng chuyển đi những loại thông tin dữ liệu gì.

    Hãng bảo mật F-Secure cho biết con trojan Ginwui.A đột nhập qua tệp tin Word "đặc biệt" cho phép tin tặc tạo, đọc, soạn thảo và tìm kiếm các tệp tin, thư mục, truy cập chỉnh sửa Registry, khởi động dịch vụ, khởi động hoặc huỷ bỏ các tiến trình  (VnMedia/Betanews)
     
    #17

Chia sẻ trang này