Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.09;
Скачать: CL | DM;

Вниз

Как сделать вот такую вещь...   Найти похожие ветки 

 
cypher ©   (2002-02-11 12:08) [0]

Есть сеть, есть расшареные папки.. Получаем с помощью NEtFileEnum список открытых файлов. Вопрос в следующем, как теперь для этих файлов определить netname (имя, под которым расшарена папка)... Для Win9x это не проблема, так как там это имя возвращается в INFO_FILE_50 ... а вот как это реализовать в НТ (тама FILE_INFO_3) ?


 
cypher ©   (2002-02-16 16:07) [1]

=(


 
Elf(new)   (2002-02-20 12:29) [2]

Поробуй таким образом.. у меня все шевелится... 8)

var cou: integer;
MyResArray: array [0..127] of TNetResource;
count, size: DWord;
H: THandle;
ss: string;
begin
ListBox1.Items.Clear;
ss:="\\"+AddrEdit.Text+#0;
MyNetRes.lpRemoteName:=@ss[1];
if WNetOpenEnum(RESOURCE_GLOBALNET,RESOURCETYPE_ANY,0,@MyNetRes,H)=0 then
begin;
count:=128;
size:=SizeOf(MyResArray);
WNetEnumResource(H,count,@MyResArray,size);
for cou:=0 to count-1 do
begin
ListBox1.Items.Add(StrPas(myresarray[cou].lpRemoteName));
end;
WNetCloseEnum(H);
end;
end;


 
cypher ©   (2002-02-24 22:23) [3]

Вся фишка в том, что я не использую WNet... мне нада через NetFileEnum



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

Текущий архив: 2002.05.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
1-26185
AlexKniga
2002-04-24 16:26
2002.05.09
Разница м/у моим любимым TP7 и Delphi


1-26191
Ghost.
2002-04-24 11:06
2002.05.09
Если вопрос часто повторяется извиняюсь..


1-26184
MPro
2002-04-25 15:31
2002.05.09
comboboxex глючит?


3-25992
MaXie
2002-04-15 11:45
2002.05.09
Доступ к представлениям на MS SQL через ADO...


3-26011
_Виктор
2002-04-16 08:11
2002.05.09
Как положить картинку в базу Access?