BOOL IsPortOpen(char *hostip, WORD dport)
{
	WSADATA wsd;
	WSAStartup(0x202, &wsd);

	SOCKET sck;
	SOCKADDR_IN addr;
	int rc;

	addr.sin_family = AF_INET;
	addr.sin_port = htons(dport);
	addr.sin_addr.S_un.S_addr = inet_addr(hostip);

	sck = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
	rc = connect(sck, (LPSOCKADDR)&addr, sizeof(addr));

	if(rc == 0){
		closesocket(sck);
		return TRUE;
	}


	return FALSE;
}