MyIE_V1.0_最终版源代码

C#实现的一个Ie浏览器

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using System.IO;
using System.Diagnostics;
using System.Reflection;
using SHDocVw;
using AxSHDocVw;
using System.Web;

namespace MyIE
{
    public partial class MainForm : Form
    {
        public MainForm（）
        {
            InitializeComponent（）;
        }

        private void btnGo_Click（object sender EventArgs e）
        {
            Go（cmbAddress.Text）;
        }

        AxWebBrowser CurrentBrowser
        {
            get
            {
                return （CurrentTab.Tag as BrowserData）.Browser;
            }
        }

        TabPage CurrentTab
        {
            get
            {
                if （tab.SelectedTab == null）
                {
                    AddTab（）;
                }

                return tab.SelectedTab;
            }
        }

        private void Go（string url）
        {
            url = url.Trim（）;

            if （url.Length > 0）
            {
                CurrentTab.Text = “正在加载...“;
                CurrentTab.ToolTipText = “正在加载 “ + url + “...“;

                BrowserData data = CurrentTab.Tag as BrowserData;
                data.Address = string.Empty;
                data.IsDownloading = true;

                cmbAddress.Text = url;
                data.Browser.Focus（）;
                Application.DoEvents（）;

                ShowProgress（100 10）;

                data.Browser.Navigate（url）;
                InsertHistory（url）;
            }
        }

        private void ShowProgress（int max int val）
        {
            progressState.Minimum = 0;
            progressState.Maximum = max;
            progressState.Value = val;
            progressState.Visible = （CurrentTab.Tag as BrowserData）.IsDownloading && val < max;
        }

        private void InsertHistory（string url）
        {
            bool found = false;

            foreach （string s in cmbAddress.Items）
            {
                if （string.Compare（s url true） == 0）
                {
                    found = true;
                    break;
                }
            }

            if （found == false）
            {
                cmbAddress.Items.Insert（0 url）;
                SaveHistory（）;
            }
        }

        private void InsertSearchHistory（string keyword）
        {
            bool found = false;

            foreach （string s in cmbSearch.Items）
            {
                if （s == keyword）
                {
                    found = true;
                    break;
                }
            }

            if （found == false）
            {
                cmbSearch.Items.Insert（0 keyword）;
                SaveSearchHistory（）;
            }
        }

        private void SaveHistory（）
       

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     目录          0  2008-01-17 00:39  MyIE_V1.0_最终版

     目录          0  2008-01-17 00:39  MyIE_V1.0_最终版\Lib

     文件      45056  2008-01-15 16:46  MyIE_V1.0_最终版\Lib\AxInterop.SHDocVw.dll

     文件     131072  2008-01-15 16:46  MyIE_V1.0_最终版\Lib\Interop.SHDocVw.dll

     文件      78848  2005-05-04 14:45  MyIE_V1.0_最终版\Lib\msiexec.exe

     文件        766  2005-11-30 15:56  MyIE_V1.0_最终版\Lib\remove.ico

     目录          0  2008-01-17 00:39  MyIE_V1.0_最终版\MyIE

     目录          0  2008-01-17 00:39  MyIE_V1.0_最终版\MyIE\bin

     文件      35943  2008-01-17 00:09  MyIE_V1.0_最终版\MyIE\MainForm.cs

     文件      37438  2008-01-16 23:00  MyIE_V1.0_最终版\MyIE\MainForm.Designer.cs

     文件      60539  2008-01-16 23:00  MyIE_V1.0_最终版\MyIE\MainForm.resx

     文件       4261  2008-01-16 23:03  MyIE_V1.0_最终版\MyIE\MyIE.csproj

     目录          0  2008-01-17 00:39  MyIE_V1.0_最终版\MyIE\obj

     目录          0  2008-01-17 00:39  MyIE_V1.0_最终版\MyIE\obj\Debug

     文件        845  2008-01-16 23:03  MyIE_V1.0_最终版\MyIE\obj\Debug\MyIE.csproj.GenerateResource.Cache

     文件        542  2008-01-15 17:54  MyIE_V1.0_最终版\MyIE\obj\Debug\MyIE.csproj.ResolveComReference.cache

     文件     110592  2008-01-17 00:09  MyIE_V1.0_最终版\MyIE\obj\Debug\MyIE.exe

     文件      36940  2008-01-16 23:03  MyIE_V1.0_最终版\MyIE\obj\Debug\MyIE.MainForm.resources

     文件      67072  2008-01-17 00:09  MyIE_V1.0_最终版\MyIE\obj\Debug\MyIE.pdb

     文件        180  2008-01-15 16:47  MyIE_V1.0_最终版\MyIE\obj\Debug\MyIE.Properties.Resources.resources

     目录          0  2008-01-17 00:39  MyIE_V1.0_最终版\MyIE\obj\Debug\Refactor

     文件       9366  2008-01-16 23:03  MyIE_V1.0_最终版\MyIE\obj\Debug\ResolveAssemblyReference.cache

     目录          0  2008-01-17 00:39  MyIE_V1.0_最终版\MyIE\obj\Debug\TempPE

     文件       4608  2008-01-15 17:11  MyIE_V1.0_最终版\MyIE\obj\Debug\TempPE\Properties.Resources.Designer.cs.dll

     文件        842  2008-01-15 12:04  MyIE_V1.0_最终版\MyIE\obj\Debug\WindowsApplication2.csproj.GenerateResource.Cache

     文件      20480  2008-01-15 12:04  MyIE_V1.0_最终版\MyIE\obj\Debug\WindowsApplication2.exe

     文件       1343  2008-01-15 12:04  MyIE_V1.0_最终版\MyIE\obj\Debug\WindowsApplication2.Form1.resources

     文件      24064  2008-01-15 12:04  MyIE_V1.0_最终版\MyIE\obj\Debug\WindowsApplication2.pdb

     文件        180  2008-01-15 11:54  MyIE_V1.0_最终版\MyIE\obj\Debug\WindowsApplication2.Properties.Resources.resources

     文件        250  2008-01-15 13:03  MyIE_V1.0_最终版\MyIE\obj\MyIE.csproj.FileList.txt

............此处省略17个文件信息