| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1535 人关注过本帖
标题:[求助]请教一个打开EXCEL表的问题...
只看楼主 加入收藏
蓝星海
Rank: 1
等 级:新手上路
帖 子:50
专家分:0
注 册:2007-6-18
收藏
 问题点数:0 回复次数:5 
[求助]请教一个打开EXCEL表的问题...

本人是VB.NET的编程初学者,第一次编这种WEB应用程序,想在浏览器中打开EXCEL文件在按钮中写了如下代码:
excel2 = "d:\temp\gcdtemp.xls"
Dim xlapp As Microsoft.Office.Interop.Excel.Application
Dim xlbook As Microsoft.Office.Interop.Excel.Workbook
Dim xlsheet As Microsoft.Office.Interop.Excel.Worksheet
xlbook = xlapp.Workbooks.Open(excel2)
xlsheet = xlbook.Worksheets(1)
......


在浏览器中找开后出现以下错误代码,请大家帮忙看看错在哪里,要如何修改:

未将对象引用设置到对象的实例。
说明: 执行当前 Web 请求期间,出现未处理的异常。请检查堆栈跟踪信息,以了解有关该错误以及代码中导致错误的出处的详细信息。

异常详细信息: System.NullReferenceException: 未将对象引用设置到对象的实例。

源错误:

行 320: xlbook = xlapp.Workbooks.Open(excel2)

源文件: D:\Inetpub\wwwroot\jgdm\dmkd.aspx.vb 行: 320


搜索更多相关主题的帖子: EXCEL Microsoft 浏览器 Excel Dim 
2007-07-22 12:04
bygg
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:乖乖的心中
等 级:版主
威 望:241
帖 子:13555
专家分:3076
注 册:2006-10-23
收藏
得分:0 
dim excel2 as string = "d:\temp\gcdtemp.xls"
dim xlapp as new Excel.Application
dim xlsheet as Excel.Workbook = xlapp.workbooks.open(eccel2)
..........

飘过~~
2007-07-22 15:03
蓝星海
Rank: 1
等 级:新手上路
帖 子:50
专家分:0
注 册:2007-6-18
收藏
得分:0 
回复:(蓝星海)[求助]请教一个打开EXCEL表的问题......

我的用
dim xlapp as new Excel.Application
dim xlsheet as Excel.Workbook = xlapp.workbooks.open(eccel2)
不行啊,只能用
Dim xlapp As Microsoft.Office.Interop.Excel.Application
Dim xlbook As Microsoft.Office.Interop.Excel.Workbook
Dim xlsheet As Microsoft.Office.Interop.Excel.Worksheet
是不是跟我机上的EXCEL版本有关?我的是OFFICE 2007的.
我程序中的祥细代码如下:
Private Sub Button5_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button5.Click
Dim excel1, excel2 As String
excel1 = "d:\gcd.xls"
'gcd.xls是一个模版文件
excel2 = "d:\temp\gcdtemp.xls"
FileCopy(excel1, excel2)
Dim xlapp As Microsoft.Office.Interop.Excel.Application
Dim xlbook As Microsoft.Office.Interop.Excel.Workbook
Dim xlsheet As Microsoft.Office.Interop.Excel.Worksheet
xlbook = xlapp.Workbooks.Open(excel2)
xlsheet = xlbook.Worksheets(1)
xlapp.Visible = True

xlsheet.Range("a1").Value = "工程表单:"
......
End Sub

[此贴子已经被作者于2007-7-23 11:53:34编辑过]

2007-07-23 07:23
蓝星海
Rank: 1
等 级:新手上路
帖 子:50
专家分:0
注 册:2007-6-18
收藏
得分:0 
老大,我装了OFFICE 2003可以用你说的方法了,可是一运行还是出现上面的情况,
就是这句:Dim xlbook As Excel.Workbook = xlapp.Workbooks.Open(excel2)
是什么原因啊???
2007-07-23 11:52
蓝星海
Rank: 1
等 级:新手上路
帖 子:50
专家分:0
注 册:2007-6-18
收藏
得分:0 
回复:(蓝星海)[求助]请教一个打开EXCEL表的问题......
请各位老大帮忙再看看啊.急啊
2007-07-26 07:11
Joncol
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2007-7-28
收藏
得分:0 
添加了office excel 引用了吗?
2007-07-28 16:07
快速回复:[求助]请教一个打开EXCEL表的问题...
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021440 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved