💎一站式轻松地调用各大LLM模型接口,支持GPT4、智谱、星火、月之暗面及文生图 广告
在本篇开始前,首先感谢每一位留下反馈评论的朋友,在我看来,博客不仅仅是简单的分享,同时也是一个学习和发现的过程。在阅读完一篇文章能对其有所评论和提问,也是一种思考的表现。 在上篇“[Silverlight实例教程 - Out of Browser与COM的交互基础](http://www.cnblogs.com/jv9/archive/2010/07/23/1783379.html)”中,我们讨论了Silverlight的OOB应用访问COM组件基础知识,在大家的反馈中,有不少朋友提出疑问,Silverlight对于COM的支持,使其失去跨平台的优越性,另外,Silverlight仅有Out of Browser模式能支持COM,是否仍旧存在较大的局限性? 对此在本篇我们不进行长篇分析和讨论,只是简单的把我的看法说一下。 Silverlight Out of Browser从Silverlight 3 到现在Silverlight 4,一直遵循跨平台的原则,在微软官方有相关的解释, Linux,Moonlight从第一个版本发布,就已经有了高级权限模型,在GtkWidget中Moonlight具有full-trust的能力。 也就是说,Silverlight具有信任权限提升,而Mono具有full-trust模式。 Mac, 由于Mac没有Com的概念,所以,Silverlight的COM无法在Mac中运行,但是微软官方也正在寻找一种方式,尝试使用一种模拟的方式来实现在Mac上运行COM的效果,例如,运行AppleScript ![](https://box.kancloud.cn/2016-03-18_56eb67c66abd2.jpg) 在上面的脚本中可以看出,Mac如何通过AppleScript来调用Office Word的,而这样的方式其实也就是Mac对COM的调用,在以后Silverlight的版本中,如果加入对AppleScripts的支持即可在Mac上支持COM的运行; 从上面的描述来看,Silverlight的OOB应用跨平台,并非不能解决,只是时间的问题。作为技术人员,经常对一门技术的前景进行展望,而需要注意的是,尽量不要使用其短处与其他技术的长处进行相比较,这样的对比结果,只会干扰自己的视线和思路。一门能挣钱的技术,就已经算是一门好技术了。 **Out of Browser与Office的互操作** 言归正传,本篇将继续介绍Silverlight的Out of Browser应用与Office COM组件的交互。相信大家对微软的Office系列并不陌生了,Office在企业项目中使用频率较高,例如在日常项目中经常与遇到导出列表到Excel,或者发送邮件等功能需求,所以微软将其许多功能封装成COM组件,供开发人员使用,增强其应用的灵活性。本篇,我将演示在Silverlight的OOB应用中,如何使用Office Outlook,Word,Excel组件。 我们仍旧使用上篇的项目代码,对其进行扩展,大家可以到上篇下载演示项目代码。   在开始功能代码前,首先需要在UI界面ToolBar中添加三个Button来响应其事件。 ![](https://box.kancloud.cn/2016-03-18_56eb67c67b0d8.jpg) ~~~   <Border BorderBrush="{StaticResource GlossyBlack_StrokeGradient}" BorderThickness="1" CornerRadius="2" Margin="1" Padding="0,1,1,1">         <StackPanel>               <StackPanel Orientation="Horizontal">                    <Button IsTabStop="False" Width="56" Height="80" Style="{StaticResource BlackGlossyButton}" Margin="1,0,0,0" Foreground="White"  x:Name="sendemailBtn" Click="sendemailBtn_Click">                          <StackPanel>                                <Image VerticalAlignment="Top" HorizontalAlignment="Center" Source="/SilverlightOOBDemo;component/Images/SendEmail.png" Margin="0,-5,0,0" Stretch="None" />                                <TextBlock VerticalAlignment="Bottom" HorizontalAlignment="Center" Margin="0,3,0,0" Text="发邮件" TextWrapping="Wrap"/>                           </StackPanel>                     </Button>                    <Button IsTabStop="False" Width="56" Height="80" Style="{StaticResource BlackGlossyButton}" Margin="1,0,0,0" Foreground="White"  x:Name="excelBtn" Click="excelBtn_Click">                          <StackPanel>                              <Image VerticalAlignment="Top" HorizontalAlignment="Center" Source="/SilverlightOOBDemo;component/Images/Excel.png" Margin="0,-5,0,0" Stretch="None" />                              <TextBlock VerticalAlignment="Bottom" HorizontalAlignment="Center" Margin="0,3,0,0" Text="Excel" TextWrapping="Wrap"/>                          </StackPanel>                    </Button>                    <Button IsTabStop="False" Width="56" Height="80" Style="{StaticResource BlackGlossyButton}" Margin="1,0,0,0" Foreground="White"  x:Name="wordBtn" Click="wordBtn_Click">                          <StackPanel>                              <Image VerticalAlignment="Top" HorizontalAlignment="Center" Source="/SilverlightOOBDemo;component/Images/Word.png" Margin="0,-5,0,0" Stretch="None" />                              <TextBlock VerticalAlignment="Bottom" HorizontalAlignment="Center" Margin="0,3,0,0" Text="Word" TextWrapping="Wrap"/>                          </StackPanel>                    </Button>       </StackPanel>       <TextBlock Foreground="#8FFFFFFF" Text="Office操作" HorizontalAlignment="Center" VerticalAlignment="Bottom" Margin="2" />       </StackPanel>  </Border> ~~~ 对与三个应用分别添加其Click事件代码。首先,我们先看看OutLook的COM调用, ~~~   private void sendemailBtn_Click(object sender, RoutedEventArgs e)   {               using (dynamic outlook = AutomationFactory.CreateObject("Outlook.Application"))               {                   dynamic mail = outlook.CreateItem(0);                   mail.To = "qq34506@hotmail.com";                   mail.Subject = "来自jv9的问候";                   mail.HTMLBody = "这封邮件是通过Silverlight发送的.";                   mail.Send();                  //mail.Display();  这里是显示出发送邮件的Outlook窗口              }  } ~~~ 在建立Outlook实例后,我们可以使用Outlook.CreateItem来创建新的邮件实例,其中可以简单的设置发送目的邮箱,标题,内容等。在代码后面有mail.Send和Display两个方法。其中如果调用Display,Silverlight会激活Outlook创建邮件窗口,然后用户确认后发送邮件到目的邮箱。例如: ![](https://box.kancloud.cn/2016-03-18_56eb67c6894a4.jpg) 而调用mail.Send则会直接发送邮件到目的邮箱。而通常来说,我们建议使用mail.Display,让用户确认后再发送。 ![](https://box.kancloud.cn/2016-03-18_56eb67c69a6d2.jpg) ![](https://box.kancloud.cn/2016-03-18_56eb67c6aedef.jpg) **Silverlight操作Office Word** Silverlight操作Office Word比较简单,首先我们添加Word的相应事件: ~~~   private void wordBtn_Click(object sender, RoutedEventArgs e)   {               dynamic word = AutomationFactory.CreateObject("Word.Application");               word.Visible = true;               dynamic doc = word.Documents.Add();                 string Insertxt = "这是Silverlight操作Office Word测试。欢迎大家访问我的博客 http://jv9.cnblogs.com";               dynamic range = doc.Range(0, 0);                 range.Text = Insertxt; } ~~~ 在创建Word实例后,使用Documents.Add创建一个新的空文档,然后,添加相关文档或者图片到Word中。其运行效果如下: ![](https://box.kancloud.cn/2016-03-18_56eb67c6bf8c3.jpg) **Silverlight操作Office Excel** 相对上面两个Office组件来讲,Excel的使用较为复杂一点,这里我们来详细演示Silverlight导出Excel的实例。 操作Excel不可缺少的是数据库,作为演示实例,我使用Blend 4创建简单的数据集合,使用Blend创建例程数据集合,我曾经在[Blend实例系列](http://www.cnblogs.com/jv9/archive/2010/03/26/1696594.html)中讲过,这里我将简单的演示, 首先使用Blend 4打开当前SilverlightOOBDemo项目,然后在右边属性栏,选择Data, ![](https://box.kancloud.cn/2016-03-18_56eb67c6d1e28.jpg) 这时会提示输入SampleDataSource名称: ![](https://box.kancloud.cn/2016-03-18_56eb67c6e1465.jpg) 点击OK后,Blend 4将自动生成一个数据集合。 ![](https://box.kancloud.cn/2016-03-18_56eb67c70ff92.jpg) 由于是Blend 4自动生成的,其中的String和Number都是随机生成的,这些对于演示实例已经足够了。 ![](https://box.kancloud.cn/2016-03-18_56eb67c720be5.jpg) 当SampleDataSource创建完成后,在SliverlightOOBDemo项目中,会创建一个SampleData目录,其中包含了我们定义的数据源, ![](https://box.kancloud.cn/2016-03-18_56eb67c73ad3c.jpg) 现在,需要在UI中创建一个Datagrid的控件,然后拖动右边Data下SampleDataSource1下的Collection到Datagrid,进行数据绑定,这里我仍旧使用了Blend 4,所有控件和数据绑定,都是简单的拖动即可实现。 ~~~  <sdk:DataGrid x:Name="dgDemo" Margin="10" AutoGenerateColumns="False" ItemsSource="{Binding Collection}" DataContext="{Binding Source={StaticResource SampleDataSource1}}" >       <sdk:DataGrid.Columns>              <sdk:DataGridTextColumn Binding="{Binding Property1}" Header="Property1"/>              <sdk:DataGridTextColumn Binding="{Binding Property2}" Header="Property2"/>              <sdk:DataGridTextColumn Binding="{Binding Property3}" Header="Property3"/>       </sdk:DataGrid.Columns>                                </sdk:DataGrid> ~~~ ![](https://box.kancloud.cn/2016-03-18_56eb67c74a76e.jpg) 以上设置,我们添加了Sample数据源,并且绑定数据到指定datagrid中,现在,可以设计Excel组件调用代码, ~~~   bool firstTime = true;   public ObservableCollection<Item> itemCollection = new ObservableCollection<Item>();   private void excelBtn_Click(object sender, RoutedEventArgs e)   {               dynamic excel = AutomationFactory.CreateObject("Excel.Application");               excel.Visible = true;                 dynamic workbook = excel.workbooks;               workbook.Add();               dynamic sheet = excel.ActiveSheet;               dynamic cell = null;              int i = 1;              // 将数据传输到Excel              foreach (Item item in dgDemo.ItemsSource)              {                  itemCollection.Add(item);                  cell = sheet.Cells[i, 1]; // 列和行                  cell.Value = item.Property1;                  cell.ColumnWidth = 25;                  cell = sheet.Cells[i, 2];                  cell.Value = item.Property3;                  i++;              }  } ~~~ 在上面代码中,声明一个Excel实例,然后通过循环输入数据源到Excel实例Sheet中,从代码中我们可以看出,输出Excel是通过Cell进行操作的。 这里,我仅输出了Property1和Property3两列。这样就简单的实现了输出Datagrid的数据到Excel了。 ![](https://box.kancloud.cn/2016-03-18_56eb67c764207.jpg) 现在我们对当前的输出Excel进行一些强化,输入一个图表功能。 对我们当前的代码进行简单的修改,添加如下代码: ~~~   bool firstTime = true;   public ObservableCollection<Item> itemCollection = new ObservableCollection<Item>();   private void excelBtn_Click(object sender, RoutedEventArgs e)   {               dynamic excel = AutomationFactory.CreateObject("Excel.Application");               excel.Visible = true;                 dynamic workbook = excel.workbooks;               workbook.Add();               dynamic sheet = excel.ActiveSheet;               dynamic cell = null;              int i = 1;              // 将数据传输到Excel              foreach (Item item in dgDemo.ItemsSource)              {                  itemCollection.Add(item);                  cell = sheet.Cells[i, 1]; // 列和行                  cell.Value = item.Property1;                  cell.ColumnWidth = 25;                  cell = sheet.Cells[i, 2];                  cell.Value = item.Property3;                  i++;              }              // 创建一个例程图表              dynamic sheetShapes = sheet.Shapes;              sheetShapes.AddChart(-4100, 200, 2, 400, 300);  } ~~~ sheepShapes.AddChart创建一个新的图表效果,其数据是绑定的dynamic sheet = excel.ActiveSheet   这样当我们再次运行输出Excel时,即可得到如下结果: ![](https://box.kancloud.cn/2016-03-18_56eb67c7903cf.jpg) 这些功能的实现,完全是调用了Excel中提供的组件功能。 下面我们更进一步的完善Excel输入功能,添加自动绑定更新事件。其目的是为了实现,当用户输出Excel后,修改Excel中数据,Silverlight的OOB应用中Datagrid同时也更新修改对应数据。 实现该需求,需要用到Excel的SheetChange事件。当用户修改Excel中内容时,即激活该事件。首先,我们需要修改以上代码, ~~~   bool firstTime = true;   public ObservableCollection<Item> itemCollection = new ObservableCollection<Item>();   private void excelBtn_Click(object sender, RoutedEventArgs e)   {               dynamic excel = AutomationFactory.CreateObject("Excel.Application");               excel.Visible = true;                 dynamic workbook = excel.workbooks;               workbook.Add();               dynamic sheet = excel.ActiveSheet;               dynamic cell = null;              int i = 1;              // 将数据传输到Excel              foreach (Item item in dgDemo.ItemsSource)              {                  itemCollection.Add(item);                  cell = sheet.Cells[i, 1]; // 列和行                  cell.Value = item.Property1;                  cell.ColumnWidth = 25;                  cell = sheet.Cells[i, 2];                  cell.Value = item.Property3;                  i++;              }              // 创建一个例程图表              dynamic sheetShapes = sheet.Shapes;              sheetShapes.AddChart(-4100, 200, 2, 400, 300);              // 更新事件              if (firstTime)              {                  excel.SheetChange += new SheetChangedDelegate(SheetChangedEventHandler);                 string sheetName = sheet.Name;                  firstTime = false;              } } ~~~ 为了完成SheetChange,我们需要添加相关事件委托。 ~~~ delegate void SheetChangedDelegate(dynamic excelSheet, dynamic rangeArgs); ~~~ 其具体事件响应Handler为: ~~~           private void SheetChangedEventHandler(dynamic excelSheet, dynamic rangeArgs)           {               dynamic sheet = excelSheet;               string sheetName = sheet.Name;               dynamic range = rangeArgs;               dynamic rowValue = range.Row;               ObservableCollection<Item> entities = itemCollection;               Item[] newEntities = new Item[10];              dynamic col2range = sheet.Range("B1:B10");              for (int i = 0; i < 10; i++)              {                  Item newEntity = new Item();                 newEntity.Property1 = entities[i].Property1;                  newEntity.Property2 = entities[i].Property2;                  dynamic item = col2range.Item(i + 1);                  newEntity.Property3 = Convert.ToInt32(item.Value);                  newEntities[i] = newEntity;              }              dgDemo.ItemsSource = newEntities;              dgDemo.SelectedIndex = Convert.ToInt32(rowValue) - 1;          } ~~~ 这里,我设置操作sheet范围为B1:B10,仅处理这个区域表格中数据绑定,而当excel中数据变化,则会查找对应表格到Datagrid的表格中进行更新。 其运行效果,当用户修改Excel中的B1-B10中的数据,同时Datagrid会产生更新,并且Excel图表也会产生更新效果。 ![](https://box.kancloud.cn/2016-03-18_56eb67c7a6941.jpg) 上述介绍了Silverlight 4调用Office COM的具体方法,以及常用功能,大家可以在这个基础上进行扩展,将其应用于自己的应用中。 [本篇源代码下载](http://www.silverlightchina.net/resource/code/SilverlightOOBDemo0723.zip) 欢迎大家加入"专注Silverlight" 技术讨论群: 32679955(六群) 23413513(五群) 32679922(四群) 100844510(三群) 37891947(二群) 22308706(一群)