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

Вниз

И снова про копирование файлов, правда теперь по сетке.   Найти похожие ветки 

 
Толик   (2002-05-07 14:19) [0]

Уважаемые мастера. Проблема в следующем:
исходный файл имеет путь, типа
const
Source: pchar = "\\server\host$\folder\file.exe",с доступом только для пользователей ADMIN, для доступа к этому пользователем USER файлу используется:
hSource := CreateFile(Source, GENERIC_READ, FILE_SHARE_READ, nil, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
в результате чего получается
hSource = INVALID_HANDLE_VALUE.
Подскажите пожалуйста, как обойти эту проблему без перелогинивания или подмапливания диска. Возможно ли такое вообще?


 
Song   (2002-05-07 14:33) [1]

Надо программно расшаривать диск. Пароль известен программе?


 
Толик   (2002-05-07 14:57) [2]

Да, пароль известен, но подмаппивать диск не хотелось бы. А есть какие-нибудь варианты без подмаппивания диска?


 
Reindeer Moss Eater   (2002-05-07 15:14) [3]

WnetAddConnection(PChar(RemoteName),PChar(Password),nil);


 
panov   (2002-05-07 15:15) [4]

var
fHandle: Integer;
fName: String;
begin
fName := "\\Panov\i\out.log";
fHandle := FileOpen(fName,fmOpenRead);
if fHandle = -1 then ShowMessage("Error")
else
begin
ShowMessage("Ok");
FileClose(fHandle);
end;


 
Reindeer Moss Eater   (2002-05-07 15:21) [5]

> panov ©
Если логон на ресурс уже был, этот код сработает, иначе надо делать логон


 
Толик   (2002-05-07 16:40) [6]

to Reindeer Moss Eater:
Не хотелось бы, чтобы пользователь USER имел доступ к ресурсу ADMIN"а даже на время копирования файлов. Никак иначе?

to panov ©:
как и ожидалось fHandle = -1

Вопрос скорее всего в использовании дескрипторов безопасности. Кто-нибудь с этими зверями работал?


 
Reindeer Moss Eater   (2002-05-07 16:46) [7]

Хочется файл, лежащий на админском ресурсе, но не хочется отдавать права на него.

Ну тогда отдавай юзеру этот файл не используя "клиента для сетей Майкрософт"



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

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

Наверх




Память: 0.45 MB
Время: 0.006 c
1-64715
kay
2002-05-06 23:04
2002.05.20
Edit


6-64763
kvcomp
2002-03-05 13:19
2002.05.20
Проблема с TWebBrowser.


1-64681
Марина
2002-05-06 10:45
2002.05.20
FastReport и строковые поля


3-64508
Programmer1
2002-04-23 08:53
2002.05.20
Свойства TDateEdit из RXLibs


3-64490
Vint
2002-04-22 23:43
2002.05.20
ODBC





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский