Хочу изменить доступ к шаре!

Программирование на 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
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
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
Член-корреспондент академии 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
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 31.07.2008 (Чт) 11:05

Троян, сцуко пишет?
I don't understand. Sorry.

Proxy
Профессор VB наук
Профессор VB наук
Аватара пользователя
 
Сообщения: 2941
Зарегистрирован: 31.08.2007 (Пт) 4:41

Сообщение Proxy » 31.07.2008 (Чт) 18:08

Троян, сцуко пишет?
Я тоже первое о чём подумал.

Добрый день.
Я написал маленький скрипт, который подключается по WMI к удаленному компьютеру и получает последовательно имя каждой шары. Я хочу изменить права доступа к этой шаре. Как это сделать?

А что, вынь уже позволяет на машине расшаривать чего управляя с удалённой машины? Это ж глупо тогда.
Follow the white rabbit.

RayShade
Scarmarked
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, SemrushBot и гости: 39

    TopList