VC实现校正电脑时间

// TimeDlg.cpp : implementation file // #include "stdafx.h" #include "Time.h" #include "TimeDlg.h" #ifdef _DEBUG #define new DEBUG_NEW #undef THIS_FILE static char THIS_FILE[] = __FILE__; #endif ///////////////////////////////////////////////////////////////////////////// #include <winsock2.h> #pragma comment(lib, "wsock32") #define WM_SOCKET_NOTIFY (WM_USER + 11) char m_szIPAddr[32]={0}; SOCKET m_sock; ULONG m_ulTime ; class CAboutDlg : public CDialog { public: CAboutDlg(); // Dialog Data //{{AFX_DATA(CAboutDlg) enum { IDD = IDD_ABOUTBOX }; //}}AFX_DATA // ClassWizard generated virtual function overrides //{{AFX_VIRTUAL(CAboutDlg) protected: virtual void DoDataExchange(CDataExchange* pDX); // DDX/DDV support //}}AFX_VIRTUAL // Implementation protected: //{{AFX_MSG(CAboutDlg) //}}AFX_MSG DECLARE_MESSAGE_MAP() }; CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD) { //{{AFX_DATA_INIT(CAboutDlg) //}}AFX_DATA_INIT } void CAboutDlg::DoDataExchange(CDataExchange* pDX) { CDialog::DoDataExchange(pDX); //{{AFX_DATA_MAP(CAboutDlg) //}}AFX_DATA_MAP } BEGIN_MESSAGE_MAP(CAboutDlg, CDialog) //{{AFX_MSG_MAP(CAboutDlg) // No message handlers //}}AFX_MSG_MAP END_MESSAGE_MAP() ///////////////////////////////////////////////////////////////////////////// // CTimeDlg dialog CTimeDlg::CTimeDlg(CWnd* pParent /*=NULL*/) : CDialog(CTimeDlg::IDD, pParent) { //{{AFX_DATA_INIT(CTimeDlg) //}}AFX_DATA_INIT // Note that LoadIcon does not require a subsequent DestroyIcon in Win32 m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME); } void CTimeDlg::DoDataExchange(CDataExchange* pDX) { CDialog::DoDataExchange(pDX); //{{AFX_DATA_MAP(CTimeDlg) DDX_Control(pDX, IDC_TEXTOUT, m_edit); DDX_Control(pDX, IDC_LIST1, m_list); //}}AFX_DATA_MAP } BEGIN_MESSAGE_MAP(CTimeDlg, CDialog) //{{AFX_MSG_MAP(CTimeDlg) ON_WM_SYSCOMMAND() ON_WM_PAINT() ON_WM_QUERYDRAGICON() ON_MESSAGE(WM_SOCKET_NOTIFY,OnSocketNotify) ON_WM_TIMER() ON_LBN_DBLCLK(IDC_LIST1, OnDblclkList1) ON_WM_CTLCOLOR() ON_BN_CLICKED(IDC_BUTTON1, OnButton1) ON_NOTIFY(NM_DBLCLK, IDC_LIST1, OnDblclkList1) ON_WM_LBUTTONDOWN() //}}AFX_MSG_MAP END_MESSAGE_MAP() ///////////////////////////////////////////////////////////////////////////// // CTimeDlg message handlers BOOL CTimeDlg::OnInitDialog() { CDialog::OnInitDialog(); // Add "About..." menu item to system menu. // IDM_ABOUTBOX must be in the system command range. ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX); ASSERT(IDM_ABOUTBOX < 0xF000); CMenu* pSysMenu = GetSystemMenu(FALSE); if (pSysMenu != NULL) { CString strAboutMenu; strAboutMenu.LoadString(IDS_ABOUTBOX); if (!strAboutMenu.IsEmpty()) { pSysMenu->AppendMenu(MF_SEPARATOR); pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu); } } // Set the icon for this dialog. The framework does this automatically // when the application's main window is not a dialog SetIcon(m_hIcon, TRUE); // Set big icon SetIcon(m_hIcon, FALSE); // Set small icon SetDlgItemText(IDC_TEXTOUT,"\r\n\r\n\r\n\r\n\t请选择时间服务器\r\n\r\n\t然后单击校正时间\r\n\r\n\r\n"); m_list.SetExtendedStyle(LVS_EX_FULLROWSELECT | LVS_EX_GRIDLINES); m_list.InsertColumn(0,"时间服务器域名",LVCFMT_LEFT,150); m_list.InsertColumn(1,"IP地址",LVCFMT_CENTER,120); m_list.InsertItem(0,"time-a.nist.gov"); m_list.InsertItem(1,"time-b.nist.gov"); m_list.InsertItem(2,"time-a.timefreq.bldrdoc.gov"); m_list.InsertItem(3,"time-b.timefreq.bldrdoc"); m_list.InsertItem(4,"time-c.timefreq.bldrdoc.gov"); m_list.InsertItem(5,"utcnist.colorado.edu"); m_list.InsertItem(6,"time.nist.gov"); m_list.InsertItem(7,"time-nw.nist.gov"); m_list.InsertItem(8,"nist1.datum.com"); m_list.InsertItem(9,"nist1-dc.glassey.com"); m_list.InsertItem(10,"nist1-ny.glassey.com"); m_list.InsertItem(11,"nist1-sj.glassey.com"); m_list.InsertItem(12,"nist1.aol-ca.truetime.com"); m_list.InsertItem(13,"nist1.aol-va.truetime.com"); m_list.SetItemText(0,1,"129.6.15.28"); m_list.SetItemText(1,1,"129.6.15.29"); m_list.SetItemText(2,1,"132.163.4.101"); m_list.SetItemText(3,1,"132.163.4.102"); m_list.SetItemText(4,1,"132.163.4.103"); m_list.SetItemText(5,1,"128.138.140.44"); m_list.SetItemText(6,1,"192.43.244.18"); m_list.SetItemText(7,1,"131.107.1.10"); m_list.SetItemText(8,1,"66.243.43.21"); m_list.SetItemText(9,1,"216.200.93.8"); m_list.SetItemText(10,1,"208.184.49.9"); m_list.SetItemText(11,1,"207.126.98.204"); m_list.SetItemText(12,1,"207.200.81.113"); m_list.SetItemText(13,1,"205.188.185.33"); return TRUE; // return TRUE unless you set the focus to a control } void CTimeDlg::OnSysCommand(UINT nID, LPARAM lParam) { if ((nID & 0xFFF0) == IDM_ABOUTBOX) { CAboutDlg dlgAbout; dlgAbout.DoModal(); } else { CDialog::OnSysCommand(nID, lParam); } } // If you add a minimize button to your dialog, you will need the code below // to draw the icon. For MFC applications using the document/view model, // this is automatically done for you by the framework. void CTimeDlg::OnPaint() { if (IsIconic()) { CPaintDC dc(this); // device context for painting SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0); // Center icon in client rectangle int cxIcon = GetSystemMetrics(SM_CXICON); int cyIcon = GetSystemMetrics(SM_CYICON); CRect rect; GetClientRect(&rect); int x = (rect.Width() - cxIcon + 1) / 2; int y = (rect.Height() - cyIcon + 1) / 2; // Draw the icon dc.DrawIcon(x, y, m_hIcon); } else { CDialog::OnPaint(); } } // The system calls this to obtain the cursor to display while the user drags // the minimized window. HCURSOR CTimeDlg::OnQueryDragIcon() { return (HCURSOR) m_hIcon; } void CTimeDlg::OnOK() { POSITION pos = m_list.GetFirstSelectedItemPosition(); if(pos) { int nItem = m_list.GetNextSelectedItem(pos); strcpy(m_szIPAddr,m_list.GetItemText(nItem,1) ); } //从列表框中获取所选择的时间服务器的IP地址 CString str; str=m_szIPAddr; //判断是否选择了IP地址 if(str.IsEmpty()) { MessageBox("请选择时间服务器!","时间校正",MB_ICONEXCLAMATION); return; } SetDlgItemText(IDC_TEXTOUT,""); WSADATA WSAData; ::WSAStartup (MAKEWORD(2,0), &WSAData); // Call "WSAStartup"显示szDescription字串，并简要提供了一些版本资讯。MAKEWORD(2,0)将第一个参数设定为0x0200（表示2.0版本） EditPrintf ("\r\nStarted up %hs\r\n\r\n", WSAData.szDescription); /* 第一个参数AF_INET是一个位址种类，表示此处是某种Internet位址。 第二个参数表示资料以资料流的形式传回，而不是以资料封包的形式传回 （我们需要的资料只有4个位元组长，而资料封包适用于较大的资料块）。 最后一个参数是一个协定，我们指定使用的Internet协定是TCP。它是RFC-868所定义的两个协定之一。 socket函数的传回值储存在SOCKET型态的变数中，以便后面的Socket函数的调用。 */ m_sock = ::socket (AF_INET, SOCK_STREAM, IPPROTO_TCP) ; if (m_sock == INVALID_SOCKET) { EditPrintf ( "Socket 创建失败! #%i\r\n\r\n", ::WSAGetLastError ()) ; ::WSACleanup () ; return ; } EditPrintf ("Socket %i 已经成功创建!\r\n\r\n", m_sock) ; /* Call "WSAAsyncSelect" WSAAsynchSelect是另一个Windows特有的Socket函数。此函数用于避免因Internet回应过慢而造成应用程序当住。 在WinSock文件中，有些函数与「阻碍性（blocking）」有关。也就是说，它们不能保证立即把控制项权传回给程序。 WSAAsyncSelect函数强制阻碍性的函数转为非阻碍性的，即在函数执行完之前把控制项传回给程序。 函数的结果以讯息的形式报告给应用程序。WSAAsyncSelect函数让应用程序指定讯息和接收讯息的视窗的数值。 使用程序定义的一个讯息，该讯息称为WM_SOCKET_NOTIFY,最后一个参数来指定讯息发送的条件， 特别在连结和接收资料时（FD_CONNECT | FD_READ） */ if (SOCKET_ERROR== ::WSAAsyncSelect(m_sock,GetSafeHwnd(),WM_SOCKET_NOTIFY,FD_CONNECT|FD_READ)) { EditPrintf ("WSAAsyncSelect 错误： #%i.\r\n\r\n",: