Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2002.07.18;
Скачать: [xml.tar.bz2];

Вниз

Учетная запись   Найти похожие ветки 

 
Max   (2002-03-11 12:19) [0]

Мастера, помогите!
Как программно в Win2k разрешить или запретить удаленный доступ?


 
Max   (2002-03-12 09:10) [1]

Никто не знает?


 
Vogul   (2002-03-12 10:26) [2]

Удаленный доступ к чему?


 
Max   (2002-03-12 11:59) [3]

Разрешение на удаленный доступ!
Галочка есть такая в учетной записи пользователя!


 
Max   (2002-03-19 08:39) [4]

Видимо никто не знает!


 
[paHan]   (2002-03-19 09:49) [5]

всё просто, добавь юзера в политику безопастности, дай ему логин и пароль....разреши доступ к опр. дириктории , но незабудь сделать общий доступ на сам ДИСК ! Потом создай входящее подключение, настрой момед, внеси туда нужного юзера поставь галки где надо и всё.....элементарно Ватсон =)


 
Elshad   (2002-03-19 11:22) [6]

Удалено модератором


 
Doom   (2002-03-19 11:36) [7]

> Elshad
Вообще-то вопрос если так можно сказать немного не в эту тему.
Но все же. Не думаю что здесь дело в программировании. Сначала разберемся что такое комплексный корень и откуда он берется. Если подкоренное выражение имеет знак минус, то и в ответе получится дейтвительная и мнимая часть. Или я чего-то не понял в вашем вопросе?


 
Max   (2002-03-19 13:39) [8]

2[paHan] Это и так понятно, как программно!


 
Dmitry Sheenok   (2002-03-21 14:40) [9]

r:=TRegistry.Create;
r.RootKey:=HKEY_LOCAL_MACHINE;
r.OpenKey("SYSTEM\CurrentControlSet\Services\LanmanServer\Parameters",True);
r.WriteInteger("AutoShareServer",1)
r.ReadInteger("AutoShareWks",1)
r.CloseKey;

//1 это включаем 0 это вырубаем, если винды 2000 сервер то первая трочка записи если профессионал то вторая трочка


 
Max   (2002-03-22 08:26) [10]

>Dmitry Sheenok
Я задавал вопрос для конкретного юзверя, а не для всех!


 
Max   (2002-03-26 05:55) [11]

>Dmitry Sheenok
Я задавал вопрос для конкретного юзверя, а не для всех!


 
Anatoly Podgoretsky   (2002-03-27 22:53) [12]

Это функции администратора и нормально делаются средствами системы.


 
Max   (2002-04-23 07:16) [13]

Все понятно про администратора!
Но я спрашивал программно!
Идея состоит в том, что разрешение на подключение по умолчанию отключено для всех пользователей. При некоторых условиях пользователю необходимо разрешить/запретить подключатся к серверу с использованием удаленного доступа. Вопрос, как это реализовать программно ?


 
Derr   (2002-04-26 09:51) [14]

Функция определяющая запущен ли сервер удаленного доступа (RAS)

Function CheckRAS: boolean;
const MaxEntries = 100;
var BufSize : Integer;
NumEntries: Integer;
Entries : Array[1..MaxEntries] of TRasConn;
Begin
Entries[1].dwSize := SizeOf(TRasConn);
Bufsize:=SizeOf(TRasConn)*MaxEntries;
FillChar(Stat, Sizeof(TRasConnStatus), 0);
RasEnumConnections(@Entries[1], BufSize, NumEntries);
if numentries > 0 then
result:=true
else result:=false;
End;
Осталось только отключить...
Пустяк !


 
Max   (2002-04-27 08:56) [15]

Вопрос не в этом!
Что сервер запущен я и так знаю!
Вопрос как програмно запретить пользователю пользоваться сервером удаленного доступа.



Страницы: 1 вся ветка

Форум: "Система";
Текущий архив: 2002.07.18;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.006 c
1-58066
werr
2002-07-05 17:04
2002.07.18
Как узнать каким юзером занят файл?


3-57940
DenNNis
2002-06-25 15:16
2002.07.18
Чето забыл я , давно не делал помогите !!!


1-58086
Чайник2
2002-07-08 12:44
2002.07.18
CheckIt


3-57996
Даурен
2002-06-24 09:33
2002.07.18
Сохранение БД


3-57956
dimanew
2002-06-26 08:22
2002.07.18
Пытаюсь изменить тип поля с интеджер на нумерик





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский