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

Вниз

Как определить расшаренные ресурсы человека по IP?   Найти похожие ветки 

 
SkySpeed   (2007-06-19 22:04) [0]

Как определить расшаренные ресурсы человека по IP?
(включая вложенные файлы, папки...........)

P.S.: пример от Rouse содержит только определение локально расшаренных ресурсов

Заранее спасибо за помощь!


 
Kolan ©   (2007-06-19 22:07) [1]

> ресурсы человека по IP

Гхххмм, интересно как ты IP человека определять будешь? У меня какой например?


 
SkySpeed   (2007-06-19 23:02) [2]


> Kolan ©   (19.06.07 22:07) [1]
> > ресурсы человека по IPГхххмм, интересно как ты IP человека
> определять будешь? У меня какой например?

Имел в виду по локальной сети


 
Плохиш ©   (2007-06-20 00:57) [3]


> Как определить расшаренные ресурсы человека по IP?


> Имел в виду по локальной сети

Матрица, однако...


 
iXT ©   (2007-06-20 09:38) [4]

> [1] Kolan ©   (19.06.07 22:07)
> У меня какой например?

А у тебя есть расшаренные ресурсы? :)


 
raptoridze   (2007-06-20 13:28) [5]

ппц, такое впечатление что только и можете гнать, еще скажите что вы не поняли что SkySpeed   хочет?

function Get_shares(IP: String):string;
var
hNetEnum: THandle;
NetContainerToOpen: NETRESOURCE;
ResourceBuffer: array[1..2000] of TNetResource;
i, ResourceBuf, EntiriesToGet: DWORD;
begin
NetContainerToOpen.dwScope:=RESOURCE_GLOBALNET;
NetContainerToOpen.dwType:=RESOURCETYPE_ANY;
NetContainerToOpen.lpLocalName:=nil;

NetContainerToOpen.lpRemoteName:=PChar("\\"+IP);
NetContainerToOpen.lpProvider:=nil;
WNetOpenEnum(RESOURCE_GLOBALNET, RESOURCETYPE_ANY, RESOURCEUSAGE_CONNECTABLE or RESOURCEUSAGE_CONTAINER, @NetContainerToOpen, hNetEnum);
while TRUE do
begin
RESOURCEBUF:= sizeof(ResourceBuffer);
EntiriesToGet:=2000;
if (NO_ERROR<> WNetEnumResource(hNetEnum, EntiriesToGet, @ResourceBuffer, ResourceBuf)) then
begin
WNetCloseEnum(hNetEnum);
exit;
end;
for i:=1 to EntiriesToGet do
result:=result+ResourceBuffer[i].lpRemoteName+#13#10;
end;
end;


 
Rouse_ ©   (2007-06-21 09:30) [6]


> пример от Rouse содержит только определение локально расшаренных
> ресурсов

Да? О как...
Это ты просто не разобрался :)
Смотри на эти примеры:
http://rouse.drkb.ru/network.php#fastscan
http://rouse.drkb.ru/network.php#netscan
http://rouse.drkb.ru/network.php#infofromip



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

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

Наверх




Память: 0.45 MB
Время: 0.006 c
3-1193343940
dik
2007-10-26 00:25
2008.03.16
Работа с Blob


2-1203279731
Jimmy
2008-02-17 23:22
2008.03.16
Печать на принтере


10-1144054706
alol
2006-04-03 12:58
2008.03.16
колонтитулы в Word


2-1202928676
savyhinst
2008-02-13 21:51
2008.03.16
HOWTO_ISAPI


15-1202232366
Thumbs.db
2008-02-05 20:26
2008.03.16
Thumbs.db





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