Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Опрос конфигурации компов по сети Добавлено: 10.09.06 13:53  

Автор вопроса:  Zing
Всем привет! Если такая тема была, то извиняйте, весь форум нет времени прочитать)

Так вот, есть доменная сеть фирмы с использованием VPN. Нужно сделать программу, желательно без клиентских частей, которая бы опрашивала компы по сети и получала бы их аппаратную и программную конфигуацию. Да, и по некоторым причинам нигде не стоит .NET и не будет стоять.

Если знаете, подскажите какие какие библиотки и элементы управления нужно подробнее изучить для решеня данной задачи.

Заранее спасибо!

Ответить

  Ответы Всего ответов: 14  

Номер ответа: 1
Автор ответа:
 ZoomerSD



ICQ: 148640473 

Вопросов: 135
Ответов: 270
 Профиль | | #1 Добавлено: 11.09.06 19:47
без клиентских частей ты не обойдёшся т.к. иначе любой человек смог бы просто и без проблем получить информацию о большинстве компьютеров в сети. если ты нехочеш использовать НЕТ технологию возми ВБ для реализации твоей задачи вполне подойдёт. тебе нужно будет научиться как минимум обращаться с winsock. статьи по этому поводу есть на этом сайте. В библиотеке кодов ты сможеш найти информацию о том как собрать сведения о программной и аппаратной части. так что дерзай.. будут вопросы, стучись в аську.. чем смогу помогу..

Ответить

Номер ответа: 2
Автор ответа:
 sne



Разработчик Offline Client

ICQ: 233286456 

Вопросов: 34
Ответов: 5445
 Web-сайт: hw.t-k.ru
 Профиль | | #2
Добавлено: 11.09.06 22:38
соглашусь что без клиенствой части можно определить лишь операционку, далее, причем тут .НЕТ, есть множество всего хорошего что эту пакость не использует, VB6, PowerBasic, assembler, Delphi, C/C++, по-моему мнению в порядке удобства :) и привычности ВБ-шника, имхо.

Ответить

Номер ответа: 3
Автор ответа:
 Zing



Вопросов: 1
Ответов: 2
 Профиль | | #3 Добавлено: 12.09.06 00:31
Спасибо за ответы, но всё же вопросы остались. Про отсутсвие клиентской части, это я погорячился) Писать на ВБ 6 - не проблема, да и передавать данные на сервер тоже. А вот покопавшись в библиотеке кодов, я обнаружил коды лишь для получения некоторой интересующей информации(((

Если быть точным, то необходимо организовать автоматизированную "инвентаризацию" компов, т.е. получать информацию о названии видеокарты, звуковой карты, процессоре, материки и т.д.
Тут сразу же возник вопрос: а нет ли файла, из которого эту инфу можно получить?
И такая же ситуация с получением данных об установленных приложениях.

Ответить

Номер ответа: 4
Автор ответа:
 Pashenko



ICQ: 176176951 

Вопросов: 14
Ответов: 655
 Профиль | | #4 Добавлено: 12.09.06 09:44
Может, проще АIDA32 (она же EVEREST) развести?

Ответить

Номер ответа: 5
Автор ответа:
 Zing



Вопросов: 1
Ответов: 2
 Профиль | | #5 Добавлено: 12.09.06 16:19
Хм, и правда хорошая прога! Спасибо, надо будет проверить её в работе по сети.

Ответить

Номер ответа: 6
Автор ответа:
 HACKER


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #6 Добавлено: 12.09.06 21:43
мона слубу удалённый реестр по правам разрулить, в реестре почти всё что надо вроде есть о системе...

Ответить

Номер ответа: 7
Автор ответа:
 JMP



Вопросов: 6
Ответов: 171
 Профиль | | #7 Добавлено: 13.09.06 06:22
  На сисинтерналс.ком есть програмка, называеться PSEXEC.exe - запускает на удаленном компе любые программы. ( можно написать WMI-собрать нужную инфу.vbs и запустить его. С его же помощью, отослать на мыло или напрямую тому кто запустил вбску)
  На повербасиковском сайте поискать можно сырок rCMD, расширенный PSEXEC (не помню точно, но там кажеться клиентская часть сама сгужаеться клиенту).



Ответить

Номер ответа: 8
Автор ответа:
 LamerOnLine



ICQ: 334781088 

Вопросов: 108
Ответов: 2822
 Профиль | | #8 Добавлено: 13.09.06 10:11
2HACKER вот в правах то и вся фишка :)
2JMP Не знаю, не глядел, но то что ты говоришь - это уязвимость Windows, а мелкософт не дремлет...
Без клиента нормально не написать.

Ответить

Номер ответа: 9
Автор ответа:
 Bombardier



ICQ: 42305746 

Вопросов: 2
Ответов: 67
 Web-сайт: alexander.tsioka.ru
 Профиль | | #9
Добавлено: 13.09.06 13:07
Тут все достаточно просто, раз домен, то есть пользователь который администратор для всех машин ) значит запросто будет работать WMI ))) проверено, вот как пример:
если не задать имя компьютера, то коннект будет к локальной станции, имя пользователя и пароль у мкеня пустые, но можно тоже задавать, а так коннект идет под текущим пользователем, единственно, лучше сначала проверять его на наличие административных прав...
если такой вариант заинтересует - напишу подробнее что и как

Public Function GetValue(WbemClass As String, ValueName As String, Optional Computer As String = "";) As result
Dim wbemObjectSet As SWbemObjectSet
Dim wbemObject As SWbemObject
Dim wbemProperty As SWbemProperty
Dim wbemService As SWbemServices
Dim wbemLocator As SWbemLocator
Dim TRes As result
Dim i As Integer
Dim TComp As String
    On Error Resume Next
    APP_NameSpace = "root\cimv2"
    APP_UserName = ""
    APP_Password = ""
    Set wbemLocator = CreateObject("WbemScripting.SWbemLocator";)
    Set wbemService = wbemLocator.ConnectServer(Computer, APP_NameSpace, APP_UserName, APP_Password)
    wbemService.Security_.ImpersonationLevel = 3
    Set wbemObjectSet = wbemService.InstancesOf(WbemClass)
    TRes.Num = 0
    For Each wbemObject In wbemObjectSet
        For Each wbemProperty In wbemObject.Properties_
            If ValueName = wbemProperty.Name Then
                TRes.Num = TRes.Num + 1
                ReDim Preserve TRes.Data(TRes.Num)
                TRes.Data(TRes.Num) = wbemProperty.Value
            End If
        Next
    Next
    GetValue = TRes
    Set wbemObject = Nothing
    Set wbemObjectSet = Nothing
    Set wbemProperty = Nothing
    Set wbemService = Nothing
    Set wbemLocator = Nothing
End Function

Ответить

Номер ответа: 10
Автор ответа:
 Bombardier



ICQ: 42305746 

Вопросов: 2
Ответов: 67
 Web-сайт: alexander.tsioka.ru
 Профиль | | #10
Добавлено: 13.09.06 13:18
а вообще года три назад я делал аналогичную софтинку, скрин должен лежать в инете, попробуй
www.alexander.tsioka.ru/screen.jpg
если функционал интересен расскажу подробнее ))) у меня еще даже исходники вроде остались

Ответить

Номер ответа: 11
Автор ответа:
 Fever



Вопросов: 60
Ответов: 808
 Профиль | | #11 Добавлено: 13.09.06 17:10
АIDA32 (она же EVEREST)

А я не знал. Кстати, чтоб она работала на сети машин, надо заплатить, и причем немало.

Ответить

Номер ответа: 12
Автор ответа:
 JMP



Вопросов: 6
Ответов: 171
 Профиль | | #12 Добавлено: 14.09.06 07:40
2JMP Не знаю, не глядел, но то что ты говоришь - это уязвимость Windows, а мелкософт не дремлет...


:D :)

а с каких пор remote login стал уязвимостью ?

Ну вы даёте....
Utilities like Telnet and remote control programs like Symantec's PC Anywhere let you execute programs on remote systems, but they can be a pain to set up and require that you install client software on the remote systems that you wish to access. PsExec is a light-weight telnet-replacement that lets you execute processes on other systems, complete with full interactivity for console applications, without having to manually install client software. PsExec's most powerful uses include launching interactive command-prompts on remote systems and remote-enabling tools like IpConfig that otherwise do not have the ability to show information about remote systems.

BTW, господин Руссинович теперь являеться оффициальным сотрудником M$ ;)

Пока.

Ответить

Номер ответа: 13
Автор ответа:
 Pashenko



ICQ: 176176951 

Вопросов: 14
Ответов: 655
 Профиль | | #13 Добавлено: 14.09.06 10:53
Если не ошибаюсь, аида всегда халявная была. Правда, в сетке её ни разу не разводил, но думаю, ничего военного там нет.

Ответить

Номер ответа: 14
Автор ответа:
 LamerOnLine



ICQ: 334781088 

Вопросов: 108
Ответов: 2822
 Профиль | | #14 Добавлено: 14.09.06 11:24
Ну да, поглядел я про эту штуку. Трабла все та же - чтобы запустить процесс на удаленной машине нужно иметь её админскую учетную запись, иначе лом. А если она есть - проще открыть удаленно реестр напрямую. Снова упор в права. Это раз.
На два - ни антивирь, не фаер эту шнягу не пропустят :) Но как вариант годится.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам