亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 編程 > C# > 正文

C# Word 類庫的深入理解

2020-01-24 03:15:34
字體:
來源:轉載
供稿:網友

代碼如下所示:

復制代碼 代碼如下:

using System;
using System.Collections.Generic;
using System.Text;
using Microsoft.Office.Interop.Word;
using System.IO;
using System.Web;
using System.Data;
using System.Reflection;
using Microsoft.Win32;
using System.Text.RegularExpressions;
using System.Net;
namespace OfficeOperate
{
    public class WordOperate
    {
        #region 動態生成Word文檔并填充數據
        /**//// <summary>
        /// 動態生成Word文檔并填充數據
        /// </summary>
        /// <returns>返回自定義信息</returns>
        public static string CreateWordFile()
        {
            string message = "";
            try
            {
                Object oMissing = System.Reflection.Missing.Value;
                string dir = System.Web.HttpContext.Current.Server.MapPath( "" );//首先在類庫添加using System.web的引用
                if( !Directory.Exists( dir + "http://file" ) )
                {
                    Directory.CreateDirectory( dir + "http://file" );  //創建文件所在目錄
                }
                string name = DateTime.Now.ToLongDateString() + ".doc";
                object filename = dir + "http://file//" + name;  //文件保存路徑
                //創建Word文檔
                Microsoft.Office.Interop.Word.Application WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
                Microsoft.Office.Interop.Word.Document WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
                /**/////添加頁眉方法一:
                //WordApp.ActiveWindow.View.Type = WdViewType.wdOutlineView;
                //WordApp.ActiveWindow.View.SeekView = WdSeekView.wdSeekPrimaryHeader;
                //WordApp.ActiveWindow.ActivePane.Selection.InsertAfter( "無錫全真通科技有限公司" );//頁眉內容
                //添加頁眉方法二:
                if( WordApp.ActiveWindow.ActivePane.View.Type == Microsoft.Office.Interop.Word.WdViewType.wdNormalView || WordApp.ActiveWindow.ActivePane.View.Type == Microsoft.Office.Interop.Word.WdViewType.wdOutlineView )
                {
                    WordApp.ActiveWindow.ActivePane.View.Type = Microsoft.Office.Interop.Word.WdViewType.wdPrintView;
                }
                WordApp.ActiveWindow.View.SeekView = Microsoft.Office.Interop.Word.WdSeekView.wdSeekCurrentPageHeader;
                string sHeader = "頁眉內容";
                WordApp.Selection.HeaderFooter.LinkToPrevious = false;
                WordApp.Selection.HeaderFooter.Range.Text = sHeader;
                WordApp.ActiveWindow.View.SeekView = Microsoft.Office.Interop.Word.WdSeekView.wdSeekMainDocument;

                //WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphRight;//設置右對齊
                WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphLeft;//設置左對齊 
                WordApp.ActiveWindow.View.SeekView = WdSeekView.wdSeekMainDocument;//跳出頁眉設置
                WordApp.Selection.ParagraphFormat.LineSpacing = 15f;//設置文檔的行間距
                //移動焦點并換行
                object count = 14;
                object WdLine = Microsoft.Office.Interop.Word.WdUnits.wdLine;//換一行;
                WordApp.Selection.MoveDown( ref WdLine, ref count, ref oMissing );//移動焦點
                WordApp.Selection.TypeParagraph();//插入段落
                //文檔中創建表格
                Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables.Add( WordApp.Selection.Range, 12, 3, ref oMissing, ref oMissing );
                //設置表格樣式
                newTable.Borders.OutsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleThickThinLargeGap;
                newTable.Borders.InsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleSingle;
                newTable.Columns[1].Width = 100f;
                newTable.Columns[2].Width = 220f;
                newTable.Columns[3].Width = 105f;
                //填充表格內容
                newTable.Cell( 1, 1 ).Range.Text = "產品詳細信息表";
                newTable.Cell( 1, 1 ).Range.Bold = 2;//設置單元格中字體為粗體
                //合并單元格
                newTable.Cell( 1, 1 ).Merge( newTable.Cell( 1, 3 ) );
                WordApp.Selection.Cells.VerticalAlignment = Microsoft.Office.Interop.Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter;//垂直居中
                WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter;//水平居中
                //填充表格內容
                newTable.Cell( 2, 1 ).Range.Text = "產品基本信息";
                newTable.Cell( 2, 1 ).Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorDarkBlue;//設置單元格內字體顏色
                //合并單元格
                newTable.Cell( 2, 1 ).Merge( newTable.Cell( 2, 3 ) );
                WordApp.Selection.Cells.VerticalAlignment = Microsoft.Office.Interop.Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter;
                //填充表格內容
                newTable.Cell( 3, 1 ).Range.Text = "品牌名稱:";
                newTable.Cell( 3, 2 ).Range.Text = "BrandName";
                //縱向合并單元格
                newTable.Cell( 3, 3 ).Select();//選中一行
                object moveUnit = Microsoft.Office.Interop.Word.WdUnits.wdLine;
                object moveCount = 5;
                object moveExtend = Microsoft.Office.Interop.Word.WdMovementType.wdExtend;
                WordApp.Selection.MoveDown( ref moveUnit, ref moveCount, ref moveExtend );
                WordApp.Selection.Cells.Merge();
                //插入圖片
                if( File.Exists( System.Web.HttpContext.Current.Server.MapPath( "images//picture.jpg" ) ) )
                {
                    string FileName = System.Web.HttpContext.Current.Server.MapPath( "images//picture.jpg" );//圖片所在路徑
                    object LinkToFile = false;
                    object SaveWithDocument = true;
                    object Anchor = WordDoc.Application.Selection.Range;
                    WordDoc.Application.ActiveDocument.InlineShapes.AddPicture( FileName, ref LinkToFile, ref SaveWithDocument, ref Anchor );
                    WordDoc.Application.ActiveDocument.InlineShapes[1].Width = 100f;//圖片寬度
                    WordDoc.Application.ActiveDocument.InlineShapes[1].Height = 100f;//圖片高度
                }
                //將圖片設置為四周環繞型
                Microsoft.Office.Interop.Word.Shape s = WordDoc.Application.ActiveDocument.InlineShapes[1].ConvertToShape();
                s.WrapFormat.Type = Microsoft.Office.Interop.Word.WdWrapType.wdWrapSquare;
                newTable.Cell( 12, 1 ).Range.Text = "產品特殊屬性";
                newTable.Cell( 12, 1 ).Merge( newTable.Cell( 12, 3 ) );
                //在表格中增加行
                WordDoc.Content.Tables[1].Rows.Add( ref oMissing );
                WordDoc.Paragraphs.Last.Range.Text = "文檔創建時間:" + DateTime.Now.ToString();//“落款”
                WordDoc.Paragraphs.Last.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphRight;
                //文件保存
                WordDoc.SaveAs( ref filename, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
                WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
                WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
                message = name + "文檔生成成功";
            }
            catch
            {
                message = "文件導出異常!";
            }
            return message;
        }
        #endregion      
        #region 創建并打開一個空的word文檔進行編輯
        /**//// <summary>
        /// 創建并打開一個空的word文檔進行編輯
        /// </summary>
        public static void OpenNewWordFileToEdit()
        {
            object oMissing = System.Reflection.Missing.Value;
            Microsoft.Office.Interop.Word.Application WordApp;
            Microsoft.Office.Interop.Word.Document WordDoc;
            WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
            WordApp.Visible = true;
            WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
        }
        #endregion
        #region 創建word文檔
        /**//// <summary>
        /// 創建word文檔
        /// </summary>
        /// <returns></returns>
        public static string createWord()
        {
            Microsoft.Office.Interop.Word.Application WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
            Document WordDoc;
            string strContent = "";
            object strFileName = System.Web.HttpContext.Current.Server.MapPath( "test.doc " );
            if( System.IO.File.Exists( (string)strFileName ) )
                System.IO.File.Delete( (string)strFileName );
            Object oMissing = System.Reflection.Missing.Value;
            WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
            #region   將數據庫中讀取得數據寫入到word文件中
            strContent = "你好/n/n/r ";
            WordDoc.Paragraphs.Last.Range.Text = strContent;
            strContent = "這是測試程序 ";
            WordDoc.Paragraphs.Last.Range.Text = strContent;
            #endregion
            //將WordDoc文檔對象的內容保存為DOC文檔 
            WordDoc.SaveAs( ref strFileName, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref   oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
            //關閉WordDoc文檔對象 
            WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
            //關閉WordApp組件對象 
            WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
            string message = strFileName + "/r/n " + "創建成功 ";
            return message;
        }
        #endregion
        #region 把Word文檔裝化為Html文件
        /**//// <summary>
        /// 把Word文檔裝化為Html文件
        /// </summary>
        /// <param name="strFileName">要轉換的Word文檔</param>
        public static void WordToHtml( string strFileName )
        {
            string saveFileName = strFileName + DateTime.Now.ToString( "yyyy-MM-dd-HH-mm-ss" ) + ".html";
            WordToHtml( strFileName, saveFileName );
        }
        /**//// <summary>
        /// 把Word文檔裝化為Html文件
        /// </summary>
        /// <param name="strFileName">要轉換的Word文檔</param>
        /// <param name="strSaveFileName">要生成的具體的Html頁面</param>
        public static void WordToHtml( string strFileName, string strSaveFileName )
        {
            Microsoft.Office.Interop.Word.ApplicationClass WordApp;
            Microsoft.Office.Interop.Word.Document WordDoc;
            Object oMissing = System.Reflection.Missing.Value;
            WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
            object fileName = strFileName;

            WordDoc = WordApp.Documents.Open( ref fileName,
               ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
               ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing,
               ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing );
            Type wordType = WordApp.GetType();
            // 打開文件
            Type docsType = WordApp.Documents.GetType();
            // 轉換格式,另存為
            Type docType = WordDoc.GetType();
            object saveFileName = strSaveFileName;
            docType.InvokeMember( "SaveAs", System.Reflection.BindingFlags.InvokeMethod, null, WordDoc, new object[] { saveFileName, Microsoft.Office.Interop.Word.WdSaveFormat.wdFormatHTML } );
            #region 其它格式:
            /**//**/
            /**////wdFormatHTML
            ///wdFormatDocument
            ///wdFormatDOSText
            ///wdFormatDOSTextLineBreaks
            ///wdFormatEncodedText
            ///wdFormatRTF
            ///wdFormatTemplate
            ///wdFormatText
            ///wdFormatTextLineBreaks
            ///wdFormatUnicodeText
            //--------------------------------------------------------------------------            //            docType.InvokeMember( "SaveAs", System.Reflection.BindingFlags.InvokeMethod,
            //                null, WordDoc, new object[]{saveFileName, Word.WdSaveFormat.wdFormatHTML} );
            // 退出 Word
            //wordType.InvokeMember( "Quit", System.Reflection.BindingFlags.InvokeMethod,
            //    null, WordApp, null );
            #endregion
            WordDoc.Close( ref oMissing, ref oMissing, ref oMissing );
            WordApp.Quit( ref oMissing, ref oMissing, ref oMissing );
        }
        #endregion
        #region 導入模板
        /**//// <summary>
        /// 導入模板
        /// </summary>
        /// <param name="filePath">模板文檔路徑</param>
        public static void ImportTemplate( string filePath )
        {
            object oMissing = System.Reflection.Missing.Value;
            Microsoft.Office.Interop.Word.Application WordApp;
            Microsoft.Office.Interop.Word.Document WordDoc;
            WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
            WordApp.Visible = true;
            object fileName = filePath;
            WordDoc = WordApp.Documents.Add( ref fileName, ref oMissing, ref oMissing, ref oMissing );
        }
        #endregion
        #region word中添加新表
        /**//// <summary>
        /// word中添加新表
        /// </summary>
        public static void AddTable()
        {
            object oMissing = System.Reflection.Missing.Value;
            Microsoft.Office.Interop.Word.Application WordApp;
            Microsoft.Office.Interop.Word.Document WordDoc;
            WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
            WordApp.Visible = true;
            WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
            object start = 0;
            object end = 0;
            Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
            WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );//3行4列的表
        }
        #endregion
        #region 在表中插入新行
        /**//// <summary>
        /// 在表中插入新的1行
        /// </summary>
        public static void AddRow()
        {
            object oMissing = System.Reflection.Missing.Value;
            Microsoft.Office.Interop.Word.Application WordApp;
            Microsoft.Office.Interop.Word.Document WordDoc;
            WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
            WordApp.Visible = true;
            WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
            object start = 0;
            object end = 0;
            Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
            WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
            Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
            object beforeRow = newTable.Rows[1];
            newTable.Rows.Add( ref beforeRow );
        }
        #endregion
        #region 分離單元格
        /**//// <summary>
        /// 合并單元格
        /// </summary>
        public static void CombinationCell()
        {
            object oMissing = System.Reflection.Missing.Value;
            Microsoft.Office.Interop.Word.Application WordApp;
            Microsoft.Office.Interop.Word.Document WordDoc;
            WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
            WordApp.Visible = true;
            WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
            object start = 0;
            object end = 0;
            Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
            WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
            Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
            object beforeRow = newTable.Rows[1];
            newTable.Rows.Add( ref beforeRow );
            Microsoft.Office.Interop.Word.Cell cell = newTable.Cell( 2, 1 );//2行1列合并2行2列為一起
            cell.Merge( newTable.Cell( 2, 2 ) );
            //cell.Merge( newTable.Cell( 1, 3 ) );
        }
        #endregion
        #region 分離單元格
        /**//// <summary>
        /// 分離單元格
        /// </summary>
        public static void SeparateCell()
        {
            object oMissing = System.Reflection.Missing.Value;
            Microsoft.Office.Interop.Word.Application WordApp;
            Microsoft.Office.Interop.Word.Document WordDoc;
            WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
            WordApp.Visible = true;
            WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
            object start = 0;
            object end = 0;
            Microsoft.Office.Interop.Word.Range tableLocation = WordDoc.Range( ref start, ref end );
            WordDoc.Tables.Add( tableLocation, 3, 4, ref oMissing, ref oMissing );
            Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables[1];
            object beforeRow = newTable.Rows[1];
            newTable.Rows.Add( ref beforeRow );
            Microsoft.Office.Interop.Word.Cell cell = newTable.Cell( 1, 1 );
            cell.Merge( newTable.Cell( 1, 2 ) );
            object Rownum = 2;
            object Columnnum = 2;
            cell.Split( ref Rownum, ref  Columnnum );
        }
        #endregion

        #region 通過段落控制插入Insert a paragraph at the beginning of the document.
        /**//// <summary>
        /// 通過段落控制插入Insert a paragraph at the beginning of the document.
        /// </summary>
        public static void Insert()
        {
            object oMissing = System.Reflection.Missing.Value;
            //object oEndOfDoc = "http://endofdoc"; /**//* /endofdoc is a predefined bookmark */
            //Start Word and create a new document.
            Microsoft.Office.Interop.Word.Application WordApp;
            Microsoft.Office.Interop.Word.Document WordDoc;
            WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
            WordApp.Visible = true;
            WordDoc = WordApp.Documents.Add( ref oMissing, ref oMissing, ref oMissing, ref oMissing );
            //Insert a paragraph at the beginning of the document.
            Microsoft.Office.Interop.Word.Paragraph oPara1;
            oPara1 = WordDoc.Content.Paragraphs.Add( ref oMissing );
            oPara1.Range.Text = "Heading 1";
            oPara1.Range.Font.Bold = 1;
            oPara1.Format.SpaceAfter = 24;    //24 pt spacing after paragraph.
            oPara1.Range.InsertParagraphAfter();
        }
        #endregion

        #region word文檔設置及獲取光標位置
        /**//// <summary>
        /// word文檔設置及獲取光標位置
        /// </summary>
        public static void WordSet()
        {
            object oMissing = System.Reflection.Missing.Value;
            Microsoft.Office.Interop.Word.Application WordApp;
            Microsoft.Office.Interop.Word.Document WordDoc;
            WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
            #region 文檔格式設置
            WordApp.ActiveDocument.PageSetup.LineNumbering.Active = 0;//行編號
            WordApp.ActiveDocument.PageSetup.Orientation = Microsoft.Office.Interop.Word.WdOrientation.wdOrientPortrait;//頁面方向
            WordApp.ActiveDocument.PageSetup.TopMargin = WordApp.CentimetersToPoints( float.Parse( "2.54" ) );//上頁邊距
            WordApp.ActiveDocument.PageSetup.BottomMargin = WordApp.CentimetersToPoints( float.Parse( "2.54" ) );//下頁邊距
            WordApp.ActiveDocument.PageSetup.LeftMargin = WordApp.CentimetersToPoints( float.Parse( "3.17" ) );//左頁邊距
            WordApp.ActiveDocument.PageSetup.RightMargin = WordApp.CentimetersToPoints( float.Parse( "3.17" ) );//右頁邊距
            WordApp.ActiveDocument.PageSetup.Gutter = WordApp.CentimetersToPoints( float.Parse( "0" ) );//裝訂線位置
            WordApp.ActiveDocument.PageSetup.HeaderDistance = WordApp.CentimetersToPoints( float.Parse( "1.5" ) );//頁眉
            WordApp.ActiveDocument.PageSetup.FooterDistance = WordApp.CentimetersToPoints( float.Parse( "1.75" ) );//頁腳
            WordApp.ActiveDocument.PageSetup.PageWidth = WordApp.CentimetersToPoints( float.Parse( "21" ) );//紙張寬度
            WordApp.ActiveDocument.PageSetup.PageHeight = WordApp.CentimetersToPoints( float.Parse( "29.7" ) );//紙張高度
            WordApp.ActiveDocument.PageSetup.FirstPageTray = Microsoft.Office.Interop.Word.WdPaperTray.wdPrinterDefaultBin;//紙張來源
            WordApp.ActiveDocument.PageSetup.OtherPagesTray = Microsoft.Office.Interop.Word.WdPaperTray.wdPrinterDefaultBin;//紙張來源
            WordApp.ActiveDocument.PageSetup.SectionStart = Microsoft.Office.Interop.Word.WdSectionStart.wdSectionNewPage;//節的起始位置:新建頁
            WordApp.ActiveDocument.PageSetup.OddAndEvenPagesHeaderFooter = 0;//頁眉頁腳-奇偶頁不同
            WordApp.ActiveDocument.PageSetup.DifferentFirstPageHeaderFooter = 0;//頁眉頁腳-首頁不同
            WordApp.ActiveDocument.PageSetup.VerticalAlignment = Microsoft.Office.Interop.Word.WdVerticalAlignment.wdAlignVerticalTop;//頁面垂直對齊方式
            WordApp.ActiveDocument.PageSetup.SuppressEndnotes = 0;//不隱藏尾注
            WordApp.ActiveDocument.PageSetup.MirrorMargins = 0;//不設置首頁的內外邊距
            WordApp.ActiveDocument.PageSetup.TwoPagesOnOne = false;//不雙面打印
            WordApp.ActiveDocument.PageSetup.BookFoldPrinting = false;//不設置手動雙面正面打印
            WordApp.ActiveDocument.PageSetup.BookFoldRevPrinting = false;//不設置手動雙面背面打印
            WordApp.ActiveDocument.PageSetup.BookFoldPrintingSheets = 1;//打印默認份數
            WordApp.ActiveDocument.PageSetup.GutterPos = Microsoft.Office.Interop.Word.WdGutterStyle.wdGutterPosLeft;//裝訂線位于左側
            WordApp.ActiveDocument.PageSetup.LinesPage = 40;//默認頁行數量
            WordApp.ActiveDocument.PageSetup.LayoutMode = Microsoft.Office.Interop.Word.WdLayoutMode.wdLayoutModeLineGrid;//版式模式為“只指定行網格”
            #endregion
            #region 段落格式設定
            WordApp.Selection.ParagraphFormat.LeftIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//左縮進
            WordApp.Selection.ParagraphFormat.RightIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//右縮進
            WordApp.Selection.ParagraphFormat.SpaceBefore = float.Parse( "0" );//段前間距
            WordApp.Selection.ParagraphFormat.SpaceBeforeAuto = 0;//
            WordApp.Selection.ParagraphFormat.SpaceAfter = float.Parse( "0" );//段后間距
            WordApp.Selection.ParagraphFormat.SpaceAfterAuto = 0;//
            WordApp.Selection.ParagraphFormat.LineSpacingRule = Microsoft.Office.Interop.Word.WdLineSpacing.wdLineSpaceSingle;//單倍行距
            WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphJustify;//段落2端對齊
            WordApp.Selection.ParagraphFormat.WidowControl = 0;//孤行控制
            WordApp.Selection.ParagraphFormat.KeepWithNext = 0;//與下段同頁
            WordApp.Selection.ParagraphFormat.KeepTogether = 0;//段中不分頁
            WordApp.Selection.ParagraphFormat.PageBreakBefore = 0;//段前分頁
            WordApp.Selection.ParagraphFormat.NoLineNumber = 0;//取消行號
            WordApp.Selection.ParagraphFormat.Hyphenation = 1;//取消段字
            WordApp.Selection.ParagraphFormat.FirstLineIndent = WordApp.CentimetersToPoints( float.Parse( "0" ) );//首行縮進
            WordApp.Selection.ParagraphFormat.OutlineLevel = Microsoft.Office.Interop.Word.WdOutlineLevel.wdOutlineLevelBodyText;
            WordApp.Selection.ParagraphFormat.CharacterUnitLeftIndent = float.Parse( "0" );
            WordApp.Selection.ParagraphFormat.CharacterUnitRightIndent = float.Parse( "0" );
            WordApp.Selection.ParagraphFormat.CharacterUnitFirstLineIndent = float.Parse( "0" );
            WordApp.Selection.ParagraphFormat.LineUnitBefore = float.Parse( "0" );
            WordApp.Selection.ParagraphFormat.LineUnitAfter = float.Parse( "0" );
            WordApp.Selection.ParagraphFormat.AutoAdjustRightIndent = 1;
            WordApp.Selection.ParagraphFormat.DisableLineHeightGrid = 0;
            WordApp.Selection.ParagraphFormat.FarEastLineBreakControl = 1;
            WordApp.Selection.ParagraphFormat.WordWrap = 1;
            WordApp.Selection.ParagraphFormat.HangingPunctuation = 1;
            WordApp.Selection.ParagraphFormat.HalfWidthPunctuationOnTopOfLine = 0;
            WordApp.Selection.ParagraphFormat.AddSpaceBetweenFarEastAndAlpha = 1;
            WordApp.Selection.ParagraphFormat.AddSpaceBetweenFarEastAndDigit = 1;
            WordApp.Selection.ParagraphFormat.BaseLineAlignment = Microsoft.Office.Interop.Word.WdBaselineAlignment.wdBaselineAlignAuto;
            #endregion
            #region 字體格式設定
            WordApp.Selection.Font.NameFarEast = "華文中宋";
            WordApp.Selection.Font.NameAscii = "Times New Roman";
            WordApp.Selection.Font.NameOther = "Times New Roman";
            WordApp.Selection.Font.Name = "宋體";
            WordApp.Selection.Font.Size = float.Parse( "14" );
            WordApp.Selection.Font.Bold = 0;
            WordApp.Selection.Font.Italic = 0;
            WordApp.Selection.Font.Underline = Microsoft.Office.Interop.Word.WdUnderline.wdUnderlineNone;
            WordApp.Selection.Font.UnderlineColor = Microsoft.Office.Interop.Word.WdColor.wdColorAutomatic;
            WordApp.Selection.Font.StrikeThrough = 0;//刪除線
            WordApp.Selection.Font.DoubleStrikeThrough = 0;//雙刪除線
            WordApp.Selection.Font.Outline = 0;//空心
            WordApp.Selection.Font.Emboss = 0;//陽文
            WordApp.Selection.Font.Shadow = 0;//陰影
            WordApp.Selection.Font.Hidden = 0;//隱藏文字
            WordApp.Selection.Font.SmallCaps = 0;//小型大寫字母
            WordApp.Selection.Font.AllCaps = 0;//全部大寫字母
            WordApp.Selection.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorAutomatic;
            WordApp.Selection.Font.Engrave = 0;//陰文
            WordApp.Selection.Font.Superscript = 0;//上標
            WordApp.Selection.Font.Subscript = 0;//下標
            WordApp.Selection.Font.Spacing = float.Parse( "0" );//字符間距
            WordApp.Selection.Font.Scaling = 100;//字符縮放
            WordApp.Selection.Font.Position = 0;//位置
            WordApp.Selection.Font.Kerning = float.Parse( "1" );//字體間距調整
            WordApp.Selection.Font.Animation = Microsoft.Office.Interop.Word.WdAnimation.wdAnimationNone;//文字效果
            WordApp.Selection.Font.DisableCharacterSpaceGrid = false;
            WordApp.Selection.Font.EmphasisMark = Microsoft.Office.Interop.Word.WdEmphasisMark.wdEmphasisMarkNone;
            #endregion
            #region 獲取光標位置
            /**/////get_Information
            WordApp.Selection.get_Information( WdInformation.wdActiveEndPageNumber );
            //關于行號-頁號-列號-位置
            //information 屬性
            //返回有關指定的所選內容或區域的信息。variant 類型,只讀。
            //expression.information(type)
            //expression 必需。該表達式返回一個 range 或 selection 對象。
            //type long 類型,必需。需要返回的信息。可取下列 wdinformation 常量之一:
            //wdactiveendadjustedpagenumber 返回頁碼,在該頁中包含指定的所選內容或區域的活動結尾。如果設置了一個起始頁碼,并對頁碼進行了手工調整,則返回調整過的頁碼。
            //wdactiveendpagenumber 返回頁碼,在該頁中包含指定的所選內容或區域的活動結尾,頁碼從文檔的開頭開始計算而不考慮對頁碼的任何手工調整。
            //wdactiveendsectionnumber 返回節號,在該節中包含了指定的所選內容或區域的活動結尾。
            //wdatendofrowmarker 如果指定的所選內容或區域位于表格的行結尾標記處,則本參數返回 true。
            //wdcapslock 如果大寫字母鎖定模式有效,則本參數返回 true。
            //wdendofrangecolumnnumber 返回表格列號,在該表格列中包含了指定的所選內容或區域的活動結尾。
            //wdendofrangerownumber 返回表格行號,在該表格行包含了指定的所選內容或區域的活動結尾。
            //wdfirstcharactercolumnnumber 返回指定的所選內容或區域中第一個字符的位置。如果所選內容或區域是折疊的,則返回所選內容或區域右側緊接著的字符編號。
            //wdfirstcharacterlinenumber 返回所選內容中第一個字符的行號。如果 pagination 屬性為 false,或 draft 屬性為 true,則返回 - 1。
            //wdframeisselected 如果所選內容或區域是一個完整的圖文框文本框,則本參數返回 true。
            //wdheaderfootertype 返回一個值,該值表明包含了指定的所選內容或區域的頁眉或頁腳的類型,如下表所示。 值 頁眉或頁腳的類型
            //- 1 無
            //0 偶數頁頁眉
            //1 奇數頁頁眉
            //2 偶數頁頁腳
            //3 奇數頁頁腳
            //4 第一個頁眉
            //5 第一個頁腳
            //wdhorizontalpositionrelativetopage 返回指定的所選內容或區域的水平位置。該位置是所選內容或區域的左邊與頁面的左邊之間的距離,以磅為單位。如果所選內容或區域不可見,則返回 - 1。
            //wdhorizontalpositionrelativetotextboundary 返回指定的所選內容或區域相對于周圍最近的正文邊界的左邊的水平位置,以磅為單位。如果所選內容或區域沒有顯示在當前屏幕,則本參數返回 - 1。
            //wdinclipboard 有關此常量的詳細內容,請參閱 microsoft office 98 macintosh 版的語言參考幫助。
            //wdincommentpane 如果指定的所選內容或區域位于批注窗格,則返回 true。
            //wdinendnote 如果指定的所選內容或區域位于頁面視圖的尾注區內,或者位于普通視圖的尾注窗格中,則本參數返回 true。
            //wdinfootnote 如果指定的所選內容或區域位于頁面視圖的腳注區內,或者位于普通視圖的腳注窗格中,則本參數返回 true。
            //wdinfootnoteendnotepane 如果指定的所選內容或區域位于頁面視圖的腳注或尾注區內,或者位于普通視圖的腳注或尾注窗格中,則本參數返回 true。詳細內容,請參閱前面的 wdinfootnote 和 wdinendnote 的說明。
            //wdinheaderfooter 如果指定的所選內容或區域位于頁眉或頁腳窗格中,或者位于頁面視圖的頁眉或頁腳中,則本參數返回 true。
            //wdinmasterdocument 如果指定的所選內容或區域位于主控文檔中,則本參數返回 true。
            //wdinwordmail 返回一個值,該值表明了所選內容或區域的的位置,如下表所示。值 位置
            //0 所選內容或區域不在一條電子郵件消息中。
            //1 所選內容或區域位于正在發送的電子郵件中。
            //2 所選內容或區域位于正在閱讀的電子郵件中。
            //wdmaximumnumberofcolumns 返回所選內容或區域中任何行的最大表格列數。
            //wdmaximumnumberofrows 返回指定的所選內容或區域中表格的最大行數。
            //wdnumberofpagesindocument 返回與所選內容或區域相關聯的文檔的頁數。
            //wdnumlock 如果 num lock 有效,則本參數返回 true。
            //wdovertype 如果改寫模式有效,則本參數返回 true??捎?overtype 屬性改變改寫模式的狀態。
            //wdreferenceoftype 返回一個值,該值表明所選內容相對于腳注、尾注或批注引用的位置,如下表所示。 值 描述
            //― 1 所選內容或區域包含、但不只限定于腳注、尾注或批注引用中。
            //0 所選內容或區域不在腳注、尾注或批注引用之前。
            //1 所選內容或區域位于腳注引用之前。
            //2 所選內容或區域位于尾注引用之前。
            //3 所選內容或區域位于批注引用之前。
            //wdrevisionmarking 如果修訂功能處于活動狀態,則本參數返回 true。
            //wdselectionmode 返回一個值,該值表明當前的選定模式,如下表所示。 值 選定模式
            //0 常規選定
            //1 擴展選定
            //2 列選定
            //wdstartofrangecolumnnumber 返回所選內容或區域的起點所在的表格的列號。
            //wdstartofrangerownumber 返回所選內容或區域的起點所在的表格的行號。
            //wdverticalpositionrelativetopage 返回所選內容或區域的垂直位置,即所選內容的上邊與頁面的上邊之間的距離,以磅為單位。如果所選內容或區域沒有顯示在屏幕上,則本參數返回 - 1。
            //wdverticalpositionrelativetotextboundary 返回所選內容或區域相對于周圍最近的正文邊界的上邊的垂直位置,以磅為單位。如果所選內容或區域沒有顯示在屏幕上,則本參數返回 - 1。
            //wdwithintable 如果所選內容位于一個表格中,則本參數返回 true。
            //wdzoompercentage 返回由 percentage 屬性設置的當前的放大百分比。
            #endregion
            #region 光標移動
            //移動光標
            //光標下移3行 上移3行
            object unit = Microsoft.Office.Interop.Word.WdUnits.wdLine;
            object count = 3;
            WordApp.Selection.MoveEnd( ref unit, ref count );
            WordApp.Selection.MoveUp( ref unit, ref count, ref oMissing );
            //Microsoft.Office.Interop.Word.WdUnits說明
            //wdCell                  A cell.
            //wdCharacter             A character.
            //wdCharacterFormatting   Character formatting.
            //wdColumn                A column.
            //wdItem                  The selected item.
            //wdLine                  A line. //行
            //wdParagraph             A paragraph.
            //wdParagraphFormatting   Paragraph formatting.
            //wdRow                   A row.
            //wdScreen                The screen dimensions.
            //wdSection               A section.
            //wdSentence              A sentence.
            //wdStory                 A story.
            //wdTable                 A table.
            //wdWindow                A window.
            //wdWord                  A word.
            //錄制的vb宏
            //     ,移動光標至當前行首
            //    Selection.HomeKey unit:=wdLine
            //    '移動光標至當前行尾
            //    Selection.EndKey unit:=wdLine
            //    '選擇從光標至當前行首的內容
            //    Selection.HomeKey unit:=wdLine, Extend:=wdExtend
            //    '選擇從光標至當前行尾的內容
            //    Selection.EndKey unit:=wdLine, Extend:=wdExtend
            //    '選擇當前行
            //    Selection.HomeKey unit:=wdLine
            //    Selection.EndKey unit:=wdLine, Extend:=wdExtend
            //    '移動光標至文檔開始
            //    Selection.HomeKey unit:=wdStory
            //    '移動光標至文檔結尾
            //    Selection.EndKey unit:=wdStory
            //    '選擇從光標至文檔開始的內容
            //    Selection.HomeKey unit:=wdStory, Extend:=wdExtend
            //    '選擇從光標至文檔結尾的內容
            //    Selection.EndKey unit:=wdStory, Extend:=wdExtend
            //    '選擇文檔全部內容(從WholeStory可猜出Story應是當前文檔的意思)
            //    Selection.WholeStory
            //    '移動光標至當前段落的開始
            //    Selection.MoveUp unit:=wdParagraph
            //    '移動光標至當前段落的結尾
            //    Selection.MoveDown unit:=wdParagraph
            //    '選擇從光標至當前段落開始的內容
            //    Selection.MoveUp unit:=wdParagraph, Extend:=wdExtend
            //    '選擇從光標至當前段落結尾的內容
            //    Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
            //    '選擇光標所在段落的內容
            //    Selection.MoveUp unit:=wdParagraph
            //    Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
            //    '顯示選擇區的開始與結束的位置,注意:文檔第1個字符的位置是0
            //    MsgBox ("第" & Selection.Start & "個字符至第" & Selection.End & "個字符")
            //    '刪除當前行
            //    Selection.HomeKey unit:=wdLine
            //    Selection.EndKey unit:=wdLine, Extend:=wdExtend
            //    Selection.Delete
            //    '刪除當前段落
            //    Selection.MoveUp unit:=wdParagraph
            //    Selection.MoveDown unit:=wdParagraph, Extend:=wdExtend
            //    Selection.Delete

            //表格的光標移動
            //光標到當前光標所在表格的地單元格
            WordApp.Selection.Tables[1].Cell( 1, 1 ).Select();
            //unit對象定義
            object unith = Microsoft.Office.Interop.Word.WdUnits.wdRow;//表格行方式
            object extend = Microsoft.Office.Interop.Word.WdMovementType.wdExtend;/**//**//**////extend對光標移動區域進行擴展選擇
            object unitu = Microsoft.Office.Interop.Word.WdUnits.wdLine;//文檔行方式,可以看成表格一行.不過和wdRow有區別
            object unitp = Microsoft.Office.Interop.Word.WdUnits.wdParagraph;//段落方式,對于表格可以選擇到表格行后的換車符,對于跨行合并的行選擇,我能找到的最簡單方式
            //object count = 1;//光標移動量
            #endregion
        }
        #endregion

        #region 讀取Word表格中某個單元格的數據。其中的參數分別為文件名(包括路徑),行號,列號。
        /**//// <summary>
        /// 讀取Word表格中某個單元格的數據。其中的參數分別為文件名(包括路徑),行號,列號。
        /// </summary>
        /// <param name="fileName">word文檔</param>
        /// <param name="rowIndex">行</param>
        /// <param name="colIndex">列</param>
        /// <returns>返回數據</returns>
        public static string ReadWord_tableContentByCell( string fileName, int rowIndex, int colIndex )
        {
            ApplicationClass cls = null;
            Document doc = null;
            Table table = null;
            object missing = Missing.Value;
            object path = fileName;
            cls = new ApplicationClass();
            try
            {
                doc = cls.Documents.Open
                  ( ref path, ref missing, ref missing, ref missing,
                  ref missing, ref missing, ref missing, ref missing,
                  ref missing, ref missing, ref missing, ref missing,
                  ref missing, ref missing, ref missing, ref missing );
                table = doc.Tables[1];
                string text = table.Cell( rowIndex, colIndex ).Range.Text.ToString();
                text = text.Substring( 0, text.Length - 2 );  //去除尾部的mark
                return text;
            }
            catch( Exception ex )
            {
                return ex.Message;
            }
            finally
            {
                if( doc != null )
                    doc.Close( ref missing, ref missing, ref missing );
                cls.Quit( ref missing, ref missing, ref missing );
            }
        }
        #endregion

        #region 修改word表格中指定單元格的數據
        /**//// <summary>
        /// 修改word表格中指定單元格的數據
        /// </summary>
        /// <param name="fileName">word文檔包括路徑</param>
        /// <param name="rowIndex">行</param>
        /// <param name="colIndex">列</param>
        /// <param name="content"></param>
        /// <returns></returns>
        public static bool UpdateWordTableByCell( string fileName, int rowIndex, int colIndex, string content )
        {
            ApplicationClass cls = null;
            Document doc = null;
            Table table = null;
            object missing = Missing.Value;
            object path = fileName;
            cls = new ApplicationClass();
            try
            {
                doc = cls.Documents.Open
                    ( ref path, ref missing, ref missing, ref missing,
                  ref missing, ref missing, ref missing, ref missing,
                  ref missing, ref missing, ref missing, ref missing,
                  ref missing, ref missing, ref missing, ref missing );
                table = doc.Tables[1];
                //doc.Range( ref 0, ref 0 ).InsertParagraphAfter();//插入回車
                table.Cell( rowIndex, colIndex ).Range.InsertParagraphAfter();//.Text = content;
                return true;
            }
            catch
            {
                return false;
            }
            finally
            {
                if( doc != null )
                {
                    doc.Close( ref missing, ref missing, ref missing );
                    cls.Quit( ref missing, ref missing, ref missing );
                }
            }
        }
        #endregion

        #region 清楚word進程
        /**//// <summary>
        /// 清楚word進程
        /// </summary>
        public static void KillWordProcess()
        {
            System.Diagnostics.Process[] myPs;
            myPs = System.Diagnostics.Process.GetProcesses();
            foreach( System.Diagnostics.Process p in myPs )
            {
                if( p.Id != 0 )
                {
                    string myS = "WINWORD.EXE" + p.ProcessName + "  ID:" + p.Id.ToString();
                    try
                    {
                        if( p.Modules != null )
                            if( p.Modules.Count > 0 )
                            {
                                System.Diagnostics.ProcessModule pm = p.Modules[0];
                                myS += "/n Modules[0].FileName:" + pm.FileName;
                                myS += "/n Modules[0].ModuleName:" + pm.ModuleName;
                                myS += "/n Modules[0].FileVersionInfo:/n" + pm.FileVersionInfo.ToString();
                                if( pm.ModuleName.ToLower() == "winword.exe" )
                                    p.Kill();
                            }
                    }
                    catch
                    { }
                    finally
                    {

                    }
                }
            }
        }
        #endregion

        #region 清楚excel進程
        /**//// <summary>
        /// 清楚excel進程
        /// </summary>
        public static void KillExcelProcess()
        {
            System.Diagnostics.Process[] myPs;
            myPs = System.Diagnostics.Process.GetProcesses();
            foreach( System.Diagnostics.Process p in myPs )
            {
                if( p.Id != 0 )
                {
                    string myS = "excel.EXE" + p.ProcessName + "  ID:" + p.Id.ToString();
                    try
                    {
                        if( p.Modules != null )
                            if( p.Modules.Count > 0 )
                            {
                                System.Diagnostics.ProcessModule pm = p.Modules[0];
                                myS += "/n Modules[0].FileName:" + pm.FileName;
                                myS += "/n Modules[0].ModuleName:" + pm.ModuleName;
                                myS += "/n Modules[0].FileVersionInfo:/n" + pm.FileVersionInfo.ToString();
                                if( pm.ModuleName.ToLower() == "excel.exe" )
                                    p.Kill();
                            }
                    }
                    catch
                    { }
                    finally
                    {

                    }
                }
            }
        }
        #endregion

        #region 網頁內容或導入word或excel
        /**//// <summary>
        /// 網頁內容保存或導出為word或excel
        /// </summary>
        /// <param name="url">網頁地址</param>
        /// <param name="num">0為導出word,1為導出excel</param>
        public static void SaveOrOutData( string url, int num )//導出數據的函數0為word,1為Excel
        {
            WebRequest req = WebRequest.Create( url );
            WebResponse resp = req.GetResponse();
            StreamReader sr = new StreamReader( resp.GetResponseStream(), System.Text.Encoding.UTF8 );
            string x = sr.ReadToEnd();
            System.Web.HttpContext.Current.Response.Clear();
            System.Web.HttpContext.Current.Response.ContentEncoding = System.Text.Encoding.GetEncoding( "gb2312" );
            string fName = DateTime.Now.ToString( "yyyy-MM-dd-ss" );
            if( num == 0 )
            {
                fName = HttpUtility.UrlEncode( fName, System.Text.Encoding.GetEncoding( "gb2312" ) ) + ".doc";
                System.Web.HttpContext.Current.Response.ContentType = "application/ms-word";
            }
            else
            {
                fName = HttpUtility.UrlEncode( fName, System.Text.Encoding.GetEncoding( "gb2312" ) ) + ".xls";
                System.Web.HttpContext.Current.Response.ContentType = "application nd.xls";
            }
            System.Web.HttpContext.Current.Response.AddHeader( "content-disposition", "attachment;filename=" + fName );
            System.Web.HttpContext.Current.Response.Write( getBodyContent( x ) );//獲取table標簽
            System.Web.HttpContext.Current.Response.Flush();
            System.Web.HttpContext.Current.Response.End();
        }
        /**//// <summary>
        /// 獲取網頁table標簽的內容
        /// </summary>
        /// <param name="input">html代碼</param>
        /// <returns></returns>
        private static string getBodyContent( string input )
        {
            string pattern = @"<table.*?</table>";
            Regex reg = new Regex( pattern, RegexOptions.Singleline | RegexOptions.Compiled | RegexOptions.IgnoreCase );
            Match mc = reg.Match( input );
            string bodyContent = "";
            if( mc.Success )
            {
                bodyContent = mc.Value;
            }
            return bodyContent;
        }
        #endregion

        #region 判斷系統是否裝excel
        /**//// <summary>
        /// 判斷系統是否裝excel
        /// </summary>
        /// <returns></returns>
        public static bool IsInstallExcel()
        {
            RegistryKey machineKey = Registry.LocalMachine;
            if( IsInstallExcelByVersion( "12.0", machineKey ) )
            {
                return true;
            }
            if( IsInstallExcelByVersion( "11.0", machineKey ) )
            {
                return true;
            }
            return false;
        }
        /**//// <summary>
        /// 判斷系統是否裝某版本的excel
        /// </summary>
        /// <param name="strVersion">版本號</param>
        /// <param name="machineKey"></param>
        /// <returns></returns>
        private static bool IsInstallExcelByVersion( string strVersion, RegistryKey machineKey )
        {
            try
            {
                RegistryKey installKey = machineKey.OpenSubKey( "Software" ).OpenSubKey( "Microsoft" ).OpenSubKey( "Office" ).OpenSubKey( strVersion ).OpenSubKey( "Excel" ).OpenSubKey( "InstallRoot" );
                if( installKey == null )
                {
                    return false;
                }
                return true;
            }
            catch
            {
                return false;
            }
        }
        #endregion

        #region 判斷系統是否裝word
        /**//// <summary>
        /// 判斷系統是否裝word
        /// </summary>
        /// <returns></returns>
        public static bool IsInstallWord()
        {
            RegistryKey machineKey = Registry.LocalMachine;
            if( IsInstallExcelByVersion( "12.0", machineKey ) )
            {
                return true;
            }
            if( IsInstallExcelByVersion( "11.0", machineKey ) )
            {
                return true;
            }
            return false;
        }
        /**//// <summary>
        /// 判斷系統是否裝某版本的word
        /// </summary>
        /// <param name="strVersion">版本號</param>
        /// <param name="machineKey"></param>
        /// <returns></returns>
        private static bool IsInstallWordByVersion( string strVersion, RegistryKey machineKey )
        {
            try
            {
                RegistryKey installKey = machineKey.OpenSubKey( "Software" ).OpenSubKey( "Microsoft" ).OpenSubKey( "Office" ).OpenSubKey( strVersion ).OpenSubKey( "Word" ).OpenSubKey( "InstallRoot" );
                if( installKey == null )
                {
                    return false;
                }
                return true;
            }
            catch
            {
                return false;
            }
        }
        #endregion             
    }
}

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
色yeye香蕉凹凸一区二区av| 国产suv精品一区二区三区88区| 不卡av日日日| 久久青草福利网站| 亚洲小视频在线| 亚洲成人黄色网| 国产精品99久久99久久久二8| 欧美成人免费小视频| 亚洲tv在线观看| 久久精品小视频| 成人妇女免费播放久久久| 久久亚洲影音av资源网| 国产精品久久久久不卡| 超碰精品一区二区三区乱码| 日韩精品一二三四区| 久久九九精品99国产精品| 91精品国产综合久久男男| 国产免费一区二区三区在线能观看| 性欧美长视频免费观看不卡| 日韩av影片在线观看| 日韩电影免费观看在线观看| 日本欧美在线视频| 欧美一区亚洲一区| 精品久久久国产| 亚洲国产精彩中文乱码av在线播放| 国产精品免费视频xxxx| 久久久久国产精品www| 欧美制服第一页| 欧美性猛交xxxxx水多| 欧美一级淫片videoshd| 亚洲成色777777在线观看影院| 日韩不卡在线观看| 精品视频—区二区三区免费| 中文字幕亚洲综合| 黄网站色欧美视频| 亚洲视频第一页| 日韩精品极品在线观看| 欧美成年人视频网站欧美| 日韩精品在线播放| 久久久国产影院| 国产精品视频男人的天堂| 欧美激情综合亚洲一二区| 91精品国产自产在线观看永久| 欧美成人全部免费| 77777亚洲午夜久久多人| 久久精品国产99国产精品澳门| 91精品国产色综合久久不卡98口| 久久久精品美女| 欧美精品久久一区二区| 国产亚洲精品综合一区91| 亚洲欧美综合v| 欧美成人激情视频| 久久精品国产成人| 92福利视频午夜1000合集在线观看| 国产原创欧美精品| 91精品国产91| 成人淫片在线看| 国产伦精品免费视频| 少妇高潮久久77777| 91久久在线观看| 一本大道久久加勒比香蕉| 欧美激情一二三| 97超级碰碰碰久久久| 欧美日韩在线一区| 97香蕉超级碰碰久久免费软件| 精品国产区一区二区三区在线观看| 亚洲图片在线综合| 亚洲精品国产免费| 国产97在线亚洲| 久久久久一本一区二区青青蜜月| 456国产精品| 日韩免费在线观看视频| 亚洲国产一区自拍| 久久av中文字幕| 亚洲人成在线观看| 中文字幕最新精品| 中文字幕久热精品视频在线| 国产成+人+综合+亚洲欧洲| 亚洲精品永久免费| 青青草一区二区| 国产suv精品一区二区| 一区二区福利视频| 久久91精品国产91久久久| 日韩中文在线不卡| 久久综合伊人77777蜜臀| 狠狠色狠色综合曰曰| 一本色道久久综合狠狠躁篇的优点| 国产精品久久久久久av福利| 午夜精品一区二区三区在线视| 久久国产精品影视| 亚洲aa中文字幕| 亚洲综合精品一区二区| 国内精品在线一区| 国产精品久久久久久久久久三级| 992tv成人免费视频| 日韩精品视频免费| 黑人巨大精品欧美一区免费视频| 日韩在线中文字| 亚洲www在线观看| 亚洲永久免费观看| 久久影视免费观看| 久久久国产精彩视频美女艺术照福利| 亚洲一级片在线看| 亚洲免费小视频| 最近2019年中文视频免费在线观看| 久久精品中文字幕免费mv| 中文字幕亚洲天堂| 亚洲精品98久久久久久中文字幕| 777午夜精品福利在线观看| 欧美在线视频免费| 色综合影院在线| 日韩中文字幕视频| 秋霞成人午夜鲁丝一区二区三区| 欧美日韩中文在线观看| 欧美一区二区三区……| 欧美成人四级hd版| 欧美精品福利视频| 中文字幕日韩欧美| 色综合久久88色综合天天看泰| 国产成人综合久久| 成人国产精品久久久久久亚洲| 正在播放国产一区| 国产女精品视频网站免费| 在线看国产精品| 亚洲精品一区二区三区不| 日本欧美精品在线| 日韩视频免费看| 黑人精品xxx一区| 久久久国产影院| 亚洲v日韩v综合v精品v| 日本成人精品在线| 91日本视频在线| 色偷偷综合社区| 日韩欧美在线看| 中文字幕日韩免费视频| 欧美性受xxxx黑人猛交| 欧美日韩亚洲天堂| 欧美一区二区三区……| 亚洲天堂成人在线| 欧美多人乱p欧美4p久久| 欧美怡红院视频一区二区三区| 日本免费一区二区三区视频观看| 国产精品无码专区在线观看| 亚洲精品国产福利| 欧美一区二区三区……| 日韩中文字幕免费视频| 国产精品视频久久久久| 久久久免费精品视频| 日本中文字幕成人| 亚州欧美日韩中文视频| 97免费视频在线播放| 97视频免费在线看| 狠狠色狠色综合曰曰| 中文字幕日韩综合av| 成人a视频在线观看| 久久久久国产视频| 欧美午夜视频在线观看| 国产日韩av在线| 国产欧美日韩中文字幕| 亚洲欧美日韩国产中文| 亚洲第一区中文99精品| 亚洲第一在线视频| 国内成人精品一区| 91美女福利视频高清|