VC查找网页源码指定内容

//查找网页源码，这段代码也可以作为获取外网IP，不过获取外网IP只需要前面一部分就行了，把网页源码读到缓冲区就行了 

CString SiteInfo,SiteName=”http://www.ip138.com/ip2city.asp“;
 CInternetSession mySession(NULL,0);
 CHttpFile *myHttpFile=NULL;
 CString myData;
 myHttpFile=(CHttpFile *)mySession.OpenURL(SiteName);
 while(myHttpFile->ReadString(myData))
 {
  SiteInfo=SiteInfo+”\r\n”;
  SiteInfo+=myData;
 }

 myHttpFile->Close();
 mySession.Close();//前面是获取网页源代码

/* CFile file;
 file.Open(“file.tmp”,CFile::modeRead);
 CString data;
 while(file.ReadHuge(data.GetBuffer(1024),1024))
 {
     CString yourIP(“您的IP地址是：”);
  CString end(“<br/><br/></td>”);
  int index=data.Find(yourIP);
  if(index!=-1)
  {
   int length=data.Find(end)-index;
   GetDlgItem(IDC_EDIT1)->SetWindowText(data.Mid(index,length));
   GetDlgItem(IDC_EDIT2)->SetWindowText(“获取完毕”);
   break;
  }
  data.ReleaseBuffer(1024);
 }
 file.Close();//前面是在网页代码中查找IP
*/