初探WinInet网络api

//必须的头文件,而且要链接wininet.lib
#include <WinInet.h>
#define UM_SOCKET (WM_USER + 1)

void CNetTimeDlg::OnBnClickedOk()
{
	// TODO:  在此添加控件通知处理程序代码
	// CDialogEx::OnOK();
	// 使用winsocket,获取国际标准时间并设置系统时间
	WSADATA WSAData = { 0 };
	int iError = 0;
	iError = WSAStartup(MAKEWORD(2, 2), &WSAData);//我这里成功了,但是加载的是2.0版本,WSAData.szDescription可以查看
	if (iError != 0)
	{
		MessageBoxA(m_hWnd, WSAData.szDescription, "WSAStartup", MB_OK);
		return;
	}
	SOCKET sock = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
	if (sock == INVALID_SOCKET)
	{
		MessageBoxA(m_hWnd, WSAData.szDescription, "socket", MB_OK);
		WSACleanup();
		return;
	}
	iError = WSAAsyncSelect(sock, m_hWnd, UM_SOCKET, FD_READ | FD_CONNECT);
	if (iError != 0)
	{
		MessageBoxA(m_hWnd, WSAData.szDescription, "WSAAsyncSelect", MB_OK);
		WSACleanup();
		return;
	}
	sockaddr_in sa = { 0 };
	sa.sin_family = AF_INET;
	sa.sin_port = htons(37);
	sa.sin_addr.S_un.S_addr = inet_addr("132.163.4.101");
	connect(sock, (SOCKADDR*)&sa, sizeof(sa));
	if (WSAEWOULDBLOCK != (iError = WSAGetLastError()))
	{
		MessageBoxA(m_hWnd, WSAData.szDescription, "WSAGetLastError", MB_OK);
		closesocket(sock);
		WSACleanup();
		return;
	}
}

LRESULT CNetTimeDlg::OnSocket(WPARAM wParam, LPARAM lParam)
{
	WORD wEvent = WSAGETSELECTEVENT(lParam);
	WORD wError = WSAGETSELECTERROR(lParam);
	SOCKET sock = wParam;
	SYSTEMTIME stNew = {1900,1,0,1,0,0,0,};
	FILETIME ftNew;//The FILETIME structure is a 64-bit value representing the number of 100-nanosecond intervals since January 1, 1601 (UTC). 
	unsigned long ultime = 0;
	int isize = 0;

	switch (wEvent)
	{
	case FD_CONNECT:
		//MSG_PEEK标记不删除缓冲区数据,所以下次recv仍可以读取这次读到的数据,这里是防止非阻塞下读不到完整的4字节数据
		isize = recv(sock, (char*)&ultime, 4, MSG_PEEK);
		break;
	case FD_READ:
		isize = recv(sock, (char*)&ultime, 4, 0);
		ultime = ntohl(ultime);
		SystemTimeToFileTime(&stNew, &ftNew);
		*(LONGLONG*)(&ftNew) += (LONGLONG)pow(10.0,9) / 100 * ultime;
		FileTimeToSystemTime(&ftNew, &stNew);
		SetSystemTime(&stNew);
		break;
	}
	return 0;
}

void CNetTimeDlg::OnBnClickedFtp()
{
	// TODO:  在此添加控件通知处理程序代码
	// 使用WinInet访问ftp服务器并下载文件
	char szError[64] = { 0 };
	char szDir[MAX_PATH] = { 0 };
	DWORD len = MAX_PATH;
	HINTERNET hInternet = InternetOpen(NULL, INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
	if (hInternet == NULL)
	{
		sprintf(szError, "InternetOpen error : %d", GetLastError());
		MessageBoxA(m_hWnd, szError, "error", MB_OK);
		return;
	}
	HINTERNET hFtpSession = InternetConnectA(hInternet, "192.168.3.95", INTERNET_DEFAULT_FTP_PORT, "admin", "admin", INTERNET_SERVICE_FTP, 0, 0);
	if (hFtpSession == NULL)
	{
		sprintf(szError, "InternetConnectA error : %d", GetLastError());
		MessageBoxA(m_hWnd, szError, "error", MB_OK);
		InternetCloseHandle(hInternet);
		return;
	}
	if (!FtpSetCurrentDirectoryA(hFtpSession, "/test"))
	{
		sprintf(szError, "FtpSetCurrentDirectoryA error : %d", GetLastError());
		MessageBoxA(m_hWnd, szError, "error", MB_OK);
		InternetCloseHandle(hFtpSession);
		InternetCloseHandle(hInternet);
		return;
	}
	WIN32_FIND_DATAA finddata;
	HINTERNET hFind = FtpFindFirstFileA(hFtpSession, "*.txt", &finddata, 0, 0);
	if (hFind == NULL)
	{
		MessageBoxA(m_hWnd, "no find file", "error", MB_OK);
		InternetCloseHandle(hFtpSession);
		InternetCloseHandle(hInternet);
		return;
	}
	do
	{
		FtpGetFileA(hFtpSession, finddata.cFileName, finddata.cFileName, TRUE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_BINARY, 0);
	} while (InternetFindNextFileA(hFind, &finddata));
	InternetCloseHandle(hFind);
	InternetCloseHandle(hFtpSession);
	InternetCloseHandle(hInternet);
}

github

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

发表于

我来说两句

0 条评论
登录 后参与评论

相关文章

来自专栏杨建荣的学习笔记

dataguard中需要注意的一些数据文件操作(r8笔记第21天)

因为最近需要做一个测试,就顺手搭建了一套简单的dg环境。不过碰到了一些小问题。 数据库环境是11gR2,备库是开在open状态,配置了dg broker,一切都...

36310
来自专栏xingoo, 一个梦想做发明家的程序员

IOCP模型TCP服务器

主线程创建监听套接字,创建额外工作线程,关联IOCP,负责等待和接受到来的连接。 调用GetQueuedCompletionStatus函数,函数返回: 1 调...

2047
来自专栏xingoo, 一个梦想做发明家的程序员

windows程序设计-第四章 system2.c 新增滚动条功能

新添加的滚动条功能,首先就是要在createWindow的时候,修改参数风格模式 hwnd = CreateWindow (szAppName, TE...

1989
来自专栏乐沙弥的世界

ORA-02409:超时:分布式事务处理等待锁定ORA-02063

ORA-02409:超时:分布式事务处理等待锁定ORA-02063 一、错误现象与环境     前端应用程序运行时出现下面的错误提示: 事件添加失败:O...

1042
来自专栏ShaoYL

iOS---iOS中SQLite的使用

3048
来自专栏10km的专栏

powershell:Join-Path连接多级子目录的方法

我们知道Join-Path可以用来创建路径,比如 Join-Path 'C:\Program Files' WindowsPowerShell 会把C:\Pr...

2117
来自专栏乐沙弥的世界

Oracle Scheduler Chain 的用法

      Oracle CHAIN,也就是链,是将一串需要完成的作业连在一起,根据每一个步骤完成的不同结果来确定下面的哪一个动作需要被完成。实际上也就是if ...

731
来自专栏Jerry的SAP技术分享

如何利用BAPI SD_SALESDOCUMENT_CHANGE修改一个Sales Order的字段

假设我想修改S/4HANA里Sales Order抬头的Service Date字段SERV_DATE:

593
来自专栏向治洪

android AlarmManager讲解

Android系统闹钟定时功能框架,总体来说就是用数据库存储定时数据,有一个状态管理器来统一管理这些定时状态的触发和更新。在Andriod系统中实现定时功能,...

5055
来自专栏tiane12

DB2备份恢复流程

1041

扫码关注云+社区