做了大半天的多文档编程,大部分是ok了,但是打开excel文件只能读取数据,无法显示表格!查找功能呢也只能从第一个开始找找到第二个就结束了!
oracle看了触发器可是没敲代码啊!我用其他的帐号建立的表还是属于sys的,崩溃了……
ps:
首先要添加引用Microsoft word 12.0 library
word
//调用打开文件对话框获取要打开的文件WORD文件,RTF文件,文本文件路径名称
OpenFileDialog of = new OpenFileDialog();
of.InitialDirectory = "D:\\";
of.Filter = "Word文档(*.doc)|*.doc|文本文档(*.txt)|*.txt|RTF文档(*.rtf)|*.rtf|所有文档(*.*)|*.*";
of.FilterIndex = 1;
MDIChild child = new MDIChild();
child.Text = of.FileName;
child.MdiParent = this;
child.Show();
if (of.ShowDialog() == DialogResult.OK && of.FileName.Length > 0)
{
//建立Word类的实例,缺点:不能正确读取表格,图片等等的显示
Word.Application app = new Word.Application();
Word.Document doc = null;
object missing = System.Reflection.Missing.Value;
object FileName = of.FileName;
object readOnly = false;
object isVisible = true;
object index = 0;
try
{
doc = app.Documents.Open(ref FileName, ref missing, ref readOnly,
ref missing, ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref isVisible, ref missing,
ref missing, ref missing, ref missing);
doc.ActiveWindow.Selection.WholeStory();
doc.ActiveWindow.Selection.Copy();
//从剪切板获取数据
IDataObject data = Clipboard.GetDataObject();
child.richTextBox1.Text = data.GetData(DataFormats.Text).ToString();
}
finally
{
if (doc != null)
{
doc.Close(ref missing, ref missing, ref missing);
doc = null;
}
if (app != null)
{
app.Quit(ref missing, ref missing, ref missing);
app = null;
}
}
}
excel只能读取数据,无法显示表格
if (of.ShowDialog() == DialogResult.OK && of.FileName.Length > 0)
{
//打不开excel,只能把excel中的内容加载出来
if(openFiledialog.FilterIndex==3)
{//创建Application对象
Excel.Application xApp = new Excel.Application();
Excel.Workbook xBook = xApp.Workbooks.Open(of.FileName);
//指定要操作的Sheet
//Excel.Sheets Sheets = xBook.Worksheets;
Excel.Worksheet ws = (Excel.Worksheet)xApp.ActiveSheet;
ws.UsedRange.Copy();
//从剪切板获取数据
IDataObject data = Clipboard.GetDataObject();
((MDIChild)activeMDIChild.richTextBox1.Text = data.GetData(DataFormats.Text).ToString();
}
279

被折叠的 条评论
为什么被折叠?



