Статьи по программированию
примеры программного кода
Delphi, Kylix, C, C++, SQL, Visual Basic, Bash, Assembler, 1С
Qt, KOL, MFC, Rx Library, Windows, Linux, Mac OS
Работа в сети (21)
-->Как узнать, кто в данный момент присоединен через Сеть к машине?
Опубликовано codeLocker в 08.08.2008 в 11:48.
ОС: Windows Язык: C++ • Visual C++ Раздел: Сеть, Интернет, протоколы • Работа в сети
Это можно узнать по сессиям:
NET_API_STATUS Result;
wchar_t wcServerName[MAX_COMPUTERNAME_LENGTH + 1];
DWORD prefmaxlen = MAX_PREFERRED_LENGTH;
DWORD entriesread;
DWORD totalentries;
StringToWideChar( name, wcServerName, MAX_COMPUTERNAME_LENGTH );
Result = NetSessionEnum( (LPTSTR) wcServerName, NULL, NULL, 2,
(unsigned char**) &psi2, prefmaxlen, &entriesread, &totalentries, NULL );
if( Result != NERR_Success )
Как скачать некоторый файл из интернета "вручную" ?
Опубликовано codeLocker в 08.08.2008 в 10:09.
ОС: Windows Язык: C++ • Visual C++ Раздел: Сеть, Интернет, протоколы • Работа в сети
#define RBC_ADDR "127.0.0.1"
SOCKET SendSocket;
int rc;
WSADATA WSAData;
rc = WSAStartup(MAKEWORD(1, 1), &WSAData);
if(rc != 0) return FALSE;
struct sockaddr_in srv_address;
int namelen;
SendSocket = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
if(SendSocket != INVALID_SOCKET) {
memset(&srv_address,0,sizeof(SOCKADDR_IN));
srv_address.sin_addr.S_un.S_addr=INADDR_ANY;
srv_address.sin_family = AF_INET;
srv_address.sin_port = 0;
}
if(bind(SendSocket, (SOCKADDR *) &srv_address, sizeof(SOCKADDR_IN)) == SOCKET_ERROR) {
Пример простейшего сниффера для W2K/XP
Опубликовано codeLocker в 06.08.2008 в 10:32.
ОС: Windows Язык: C++ • Visual C++ Раздел: Сеть, Интернет, протоколы • Работа в сети
Ниже приведён полный код программы. Данный код не претендует на звание крутого снифера, однако при желании его можно доработать, чтобы можно было просматривать содержимое пакетов. Так же на его основе можно легко сделать простой анализатор трафика. А главное - не надо делать всяких драйверов; всё просто и понятно.
-->Как сделать PING?
Опубликовано codeLocker в 19.07.2008 в 12:33.
ОС: Windows Язык: Delphi/Kylix Раздел: Сеть, Интернет, протоколы • Работа в сети
Протокол Ping предназначен для тестирования компьютерных соединений в Интернете путём посылки через протокол Internet Protocol (IP) по обределённому адресу сообщения и ожидания от него ответа.
-->Сканирование доменов локальной сети
Опубликовано codeLocker в 19.07.2008 в 12:32.
ОС: Windows Язык: Delphi/Kylix Раздел: Сеть, Интернет, протоколы • Работа в сети
Переменная List заполняется списком доменов. Функция возвращает код ошибки обращения к сети.
Type
PNRArr = ^TNRArr;
TNRArr = array[0..59] of TNetResource;
Var
x: PNRArr;
tnr: TNetResource;
I : integer;
EntrReq,
SizeReq,
twx: Integer;
WSName: string;
begin
Result := WNetOpenEnum(RESOURCE_GLOBALNET, RESOURCETYPE_ANY,
Метки
Спонсоры проекта: