Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут
закрыты.
Читайте
требования к создаваемым темам.
-
Dissonance
-
- Начинающий

-
-
- Сообщения: 2
- Зарегистрирован: 28.07.2008 (Пн) 13:13
Dissonance » 28.07.2008 (Пн) 13:18
Добрый день.
Я написал маленький скрипт, который подключается по WMI к удаленному компьютеру и получает последовательно имя каждой шары. Я хочу изменить права доступа к этой шаре. Как это сделать?
Поскольку пока только начинаю программировать на вижуал бэйские, может подскажите чего, вот скрипт исходный:
- Код: Выделить всё
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set LogFile = objFSO.OpenTextFile("test.log", 8, True)
Set objWMIService = GetObject("winmgmts://mycomp").InstancesOf("Win32_Share")
If Err.Number <> 0 Then
LogFile.WriteLine(Err.description)
End If
For Each whemObject In objWMIService
WScript.Echo whemObject.Name & ": " & whemObject.Name
Next
-
RayShade
-
- Scarmarked

-

-
- Сообщения: 5511
- Зарегистрирован: 02.12.2002 (Пн) 17:11
- Откуда: Russia, Saint-Petersburg
-
RayShade » 28.07.2008 (Пн) 14:48
Допустим ты спер этот скрипт в MSDN. Так отчего бы не посмотреть там же описание класса win32_share и узнать, что еще можно с ней сделать?
I don't understand. Sorry.
-
Dissonance
-
- Начинающий

-
-
- Сообщения: 2
- Зарегистрирован: 28.07.2008 (Пн) 13:13
Dissonance » 28.07.2008 (Пн) 19:41
Я спер пару строк, но в этом-то и проблема, что в мсдн я не нашел необходимых методов и свойства этого класса.
ЧенджСекурити не подходит, так как мне еще и узнать права нужно, перед тем, как менять.
-
RayShade
-
- Scarmarked

-

-
- Сообщения: 5511
- Зарегистрирован: 02.12.2002 (Пн) 17:11
- Откуда: Russia, Saint-Petersburg
-
RayShade » 29.07.2008 (Вт) 15:22
Тогда получай шару, резолви ее в локальную папку, и уже с ней работай на предмет прав.
I don't understand. Sorry.
-
Sebas
-
- Неуловимый Джо

-

-
- Сообщения: 3626
- Зарегистрирован: 12.02.2002 (Вт) 17:25
- Откуда: столько наглости такие вопросы задавать
-
Sebas » 30.07.2008 (Ср) 9:40
Тут только API ((( WMI не смогёт
- Я никогда не понимал, почему они приходят ко мне чтобы умирать?
sebas<-@->mail.ru
-
alibek
-
- Большой Человек

-
-
- Сообщения: 14205
- Зарегистрирован: 19.04.2002 (Пт) 11:40
- Откуда: Russia
alibek » 30.07.2008 (Ср) 10:08
Какие именно API, ядерные? Нафиг, нафиг
Лучше через ADSI.
Lasciate ogni speranza, voi ch'entrate.
-
Konst_One
-
- Член-корреспондент академии VBStreets

-

-
- Сообщения: 3041
- Зарегистрирован: 09.04.2004 (Пт) 13:47
- Откуда: Химки
-
Konst_One » 30.07.2008 (Ср) 12:21
Смотрите ключевые фразы! Я таким даже не отвечаю.
... подключается по WMI к удаленному компьютеру ...
Я хочу изменить права доступа...
-
Sebas
-
- Неуловимый Джо

-

-
- Сообщения: 3626
- Зарегистрирован: 12.02.2002 (Вт) 17:25
- Откуда: столько наглости такие вопросы задавать
-
Sebas » 30.07.2008 (Ср) 15:00
Konst_One
Дык и?
- Я никогда не понимал, почему они приходят ко мне чтобы умирать?
sebas<-@->mail.ru
-
RayShade
-
- Scarmarked

-

-
- Сообщения: 5511
- Зарегистрирован: 02.12.2002 (Пн) 17:11
- Откуда: Russia, Saint-Petersburg
-
RayShade » 31.07.2008 (Чт) 11:05
Троян, сцуко пишет?
I don't understand. Sorry.
-
Proxy
-
- Профессор VB наук

-

-
- Сообщения: 2941
- Зарегистрирован: 31.08.2007 (Пт) 4:41
Proxy » 31.07.2008 (Чт) 18:08
Троян, сцуко пишет?
Я тоже первое о чём подумал.
Добрый день.
Я написал маленький скрипт, который подключается по WMI к удаленному компьютеру и получает последовательно имя каждой шары. Я хочу изменить права доступа к этой шаре. Как это сделать?
А что, вынь уже позволяет на машине расшаривать чего управляя с удалённой машины? Это ж глупо тогда.
Follow the white rabbit.
-
RayShade
-
- Scarmarked

-

-
- Сообщения: 5511
- Зарегистрирован: 02.12.2002 (Пн) 17:11
- Откуда: Russia, Saint-Petersburg
-
RayShade » 31.07.2008 (Чт) 18:21
Ну это не совсем глупо. Чтобы этим воспользоваться, надо конектиться к удаленной машине с правами как минимум админа. Так что просто, взяв любую машину и присоединясь к ней по WMI мы ничего не получим.
I don't understand. Sorry.
Вернуться в Visual Basic 1–6
Кто сейчас на конференции
Сейчас этот форум просматривают: AhrefsBot, Google-бот, PetalBot, SemrushBot, Yandex-бот и гости: 5