远程网页的查看

示例代码运行效果图如下：

图一 示例代码运行效果图


我们在进入网页时,常会遇到一些非法的脚本, 让我们的计算机蓝屏或者掉入窗口打开的死循环中.在上有一个软件,可是,代码却非公开,通过一段时间的试验,写了下面这小段程序,希望能和大家一起从中分享网络编程的乐趣.
程序运行效果如下:

本程序是基于对话框的应用程序,在使用下面代码之前,需要在stdafx.h中申明#include ,它的作用在于加入CIneternetSession的引用.
关键代码分析：

//让控件和对应的变量之间进行数据交换，现在将控件数据传给对应变量
UpdateData(true);

//m_SiteInfo为控件ID_EDIT_CONTENT读应的变量
m_SiteInfo="";

//将变量值传给对应控件
UpdateData(false);

//CDialog::OnOK();

CInternetSession mySession(NULL,0);//建立会话
CHttpFile* myHttpFile=NULL;
m_SiteInfo="连接到站点"+m_SiteName+"\r\n";
UpdateData(false);

//将网页内容的源代码读至编辑框
CString myData;
myHttpFile=(CHttpFile*)mySession.OpenURL(m_SiteName);

while(myHttpFile->ReadString(myData))
{
   m_SiteInfo=m_SiteInfo+"\r\n";
   m_SiteInfo+=myData;
}

myHttpFile->Close ;
mySession.Close ;
UpdateData(false);    

本程序在win 2k professional +vc6调试通过.
<全文完>