Форум   Статьи   Новости   Файлы   Bugtraq   Сниффер   Друзья   О Клубе
Вернуться   HPC / Кодинг / .NET / VB.NET
   
  Страница 1
  , 19:07   #1
1nt
Постоянный
 
Аватар для 1nt
 
Регистрация: 19.11.2010
Сообщений: 733

Репутация: 141 / 2
По умолчанию Anti VMware c использованием WMI

Простой образец кода, ОС на предмет наличия виртуальной

Main
source:
Option Strict Off
Public Class Form1
    Dim osInfo As New FindOSInfo

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If osInfo.Manufacturer = "VMware, Inc." Or osInfo.Model = "VMware Virtual Platform" Then
            MessageBox.Show("U are Using Vmware")
            Me.Close()
        ElseIf osInfo.Manufacturer = "innotek GmbH" Or osInfo.Model = "VirtualBox" Then
            MessageBox.Show("U are using VirtualBox")
            Me.Close()
        End If

    End Sub
End Class
FindOSInfo
source:
Option Strict Off
Imports System.Management
Public Class FindOSInfo
    Private objCS As ManagementObjectSearcher
    Private objMgmt As ManagementObject
    Private m_strManufacturer As String
	
    Public Sub New()
        objCS = New ManagementObjectSearcher("SELECT * FROM Win32_ComputerSystem")
        For Each objMgmt In objCS.Get
            m_strManufacturer = objMgmt("manufacturer").ToString()
        Next
    End Sub
    Public ReadOnly Property Manufacturer()
        Get
            Manufacturer = m_strManufacturer
        End Get
    End Property
End Class
OpenSC.ws
__________________
[B][COLOR="Red"][URL="https://hpc.name/showthread.php?t=26401#post284052"]Кейлогер актуален[/URL][/COLOR][/B]
Пользователь вне форума    
Наши Спонсоры
  , 20:00   #2
Местный
 
Регистрация: 07.04.2009
Сообщений: 373

Репутация: 93 / 1
По умолчанию

Код это конечно хорошо. Но что мешает место виртуальной использовать спец образ диска? И займет восстановление образа ненемного меньше чем загрузка виртуальной ОС.
__________________
Не надо учиться, жизнь научит...
Пользователь вне форума    
  , 20:12   #3
1nt
Постоянный
 
Аватар для 1nt
 
Регистрация: 19.11.2010
Сообщений: 733

Репутация: 141 / 2
По умолчанию

Имеется в виду live-сборка?
В данном случае можно просто создать коллекцию, которая бы содержала информацию о всех системах, на которых какие-то действия выполнять не нужно или наоборот.
__________________
[B][COLOR="Red"][URL="https://hpc.name/showthread.php?t=26401#post284052"]Кейлогер актуален[/URL][/COLOR][/B]
Пользователь вне форума    
  , 23:48   #4
Местный
 
Регистрация: 07.04.2009
Сообщений: 373

Репутация: 93 / 1
По умолчанию

Имел в виду обычную ОС из под Акроникса к примеру образ диска
__________________
Не надо учиться, жизнь научит...
Пользователь вне форума    
 

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
VMware Workstation defosa Софт для Windows 1 06.02.2010 18:03



Часовой пояс GMT +2
Powered by vBulletin® 3.x.x Copyright ©2000 - 2012, Jelsoft Enterprises Ltd.

Copyright © 2008 - 2013 «HPC» Реклама на сайте Правила Форума Пользовательское соглашение Работа на сайте
При копировании материалов ставьте ссылку на источник
Все материалы представлены только в ознакомительных целях, администрация за их использование ответственности не несет.