ну сделал я
| Код |
NET_API_STATUS Result;
unsigned char *buff;
wchar_t wcServerName[MAX_COMPUTERNAME_LENGTH + 1];
DWORD prefmaxlen = MAX_PREFERRED_LENGTH;
DWORD entriesread;
DWORD totalentries;
name=LabeledEdit1->Text;
//name="PHILKA";
count=0;
StringToWideChar(name, wcServerName, MAX_COMPUTERNAME_LENGTH );
do {
Result = NetSessionEnum( wcServerName, NULL, NULL, 502,
(unsigned char**) &psi2, prefmaxlen, &entriesread, &totalentries, NULL );
if ( Result != ERROR_MORE_DATA ) {
for (int i = 0; i < entriesread; ++ i)
{
s=WideCharToString(psi2[i].sesi502_cname);
if (!list->Find(s,0)) {
++count;
list->Add(s);
item= lw->Items->Add();
item->Caption=DateTimeToStr(Now());
item->SubItems->Add(s);
ballon+="IP:"+s+" Name:"+WideCharToString(psi2[i].sesi502_username)+'\n';
item->SubItems->Add(WideCharToString(psi2[i].sesi502_username));
item->SubItems->Add(WideCharToString(psi2[i].sesi502_cltype_name));
item->SubItems->Add(WideCharToString(psi2[i].sesi502_transport));
item->SubItems->Add(psi2[i].sesi502_time);
break;
}
if (status) {
ballon+="IP:"+s+" Name:"+WideCharToString(psi2[i].sesi502_username)+'\n';
}
}
if ( psi2 != NULL )
NetApiBufferFree( psi2 );
} else { break;}
} while (Result == ERROR_MORE_DATA ) ;
// Form1->Caption="Число пользователей: "+IntToStr(count);
if (count!=0 || status) {
tray->BalloonTitle="Сейчас лазят по твоим папкам";
tray->BalloonHint=ballon;
tray->ShowBalloonHint();
ballon="";
}
|
а как узнать по каким ресурсам пользователь лазит |
)