|
void CUpdateDlg::OnButtonDoupdate() { // 读取升级文件 CFileStatus rStatus; CString szIniData; CString inFile; CString tmp; inFile=m_szPath+"\\update.ini"; CFile UpdateFile; UpdateFile.Open( inFile, CFile::modeRead); UpdateFile.GetStatus(inFile,rStatus); UpdateFile.Read(szIniData.GetBuffer(rStatus.m_size),rStatus.m_size); UpdateFile.Close(); CStringArray arType; CStringArray arVersion; for(int i=1;i<=27;i+=2){ AfxExtractSubString(tmp,szIniData,i,'\n'); tmp.TrimRight(); tmp.TrimRight(); arType.Add(tmp); } for(int j=2;j<=28;j+=2){ AfxExtractSubString(tmp,szIniData,j,'\n'); tmp.TrimRight(); tmp.TrimRight(); arVersion.Add(tmp); } GetDlgItem(IDC_BUTTON_DOUPDATE)->EnableWindow(FALSE); CProgressCtrl* pBar = (CProgressCtrl*)GetDlgItem(IDC_PROGRESS_UPDATE); pBar->SetPos(5); m_szEditMessage = "\r\n取得网络升级地址\r\n"+ServerUrl; UpdateData(FALSE); CInternetSession mySession(NULL,0); CHttpFile* myHttpFile=NULL; BOOL bIsNewer = FALSE; CString myData; CString myUrl; CString m_SiteRec; myUrl = ServerUrl+"?pro=update"; myHttpFile=(CHttpFile*)mySession.OpenURL(myUrl); while(myHttpFile->ReadString(myData)){m_SiteRec = myData;} myHttpFile->Close(); mySession.Close(); if(m_SiteRec=="ok"){ pBar->SetPos(10); m_szEditMessage = "\r\n已经连通......\r\n"+m_szEditMessage; UpdateData(FALSE); for(int k=0;k<14;k++){ CInternetSession mySession(NULL,0); CHttpFile* myHttpFile=NULL; m_SiteRec.Empty(); myUrl = ServerUrl+"?pro=update&module="+arType[k]+"&version="+arVersion[k]; myHttpFile=(CHttpFile*)mySession.OpenURL(myUrl); while(myHttpFile->ReadString(myData)){m_SiteRec += myData;} if(m_SiteRec != "ok"){ CString inFile; inFile=m_szPath+"\\data\\"+arType[k]; CFile NetFile; NetFile.Open( inFile, CFile::modeCreate | CFile::modeWrite); NetFile.Write( m_SiteRec, m_SiteRec.GetLength()); NetFile.Close(); bIsNewer = TRUE; } pBar->SetPos((k+1)*(100-10)+10); m_szEditMessage = "\r\n检查"+arType[k]+"文件... 成功!\r\n"+m_szEditMessage; UpdateData(FALSE); myHttpFile->Close(); mySession.Close(); } if(bIsNewer){ ::MessageBox(NULL,"文件已经更新成功!",NULL,MB_ICONASTERISK); }else{ ::MessageBox(NULL,"您的数据文件已经是最新版本了!",NULL,MB_ICONASTERISK); } }else{ ::MessageBox(NULL,"没有连接网络或者找不到升级服务器,请检查",NULL,MB_ICONASTERISK); pBar->SetPos(100); } // 下面是完成了. GetDlgItem(IDCANCEL)->ShowWindow(SW_HIDE); GetDlgItem(IDOK)->ShowWindow(SW_SHOW); GetDlgItem(IDOK)->SetFocus(); } |