当前位置:编程学习 > C#/ASP.NET >>

智能设备编程环境中的excel问题

在一般vb.net项目编程中有“项目——添加引用——com——microsoft excel 11.0 object library ”,可以用一下代码来创建excel。 
但在用pocket智能设备项目中没有这个东西,那我应该如何创建excel文件呢? 
Dim Xls As Excel.Application = New Excel.Application '定义excel应用程序 
Dim Xlsbook As Excel.Workbook '定义工作簿 
Dim Xlssheet As Excel.Worksheet '定义工作表 
后来有网友提议下载一个Interop.Excel.dll,然后引到里面就可以了。
结果 在引用中添加Interop.Excel.dll 
但在调试时第一行就出现“由于以下错误: 类未注册 ,无法创建 CLSID 为“{00024500-0000-0000-C000-000000000046}”的 COM 对象。”的错误 
代码如下: 
        Dim Xls As Excel.Application = New Excel.Application '定义excel应用程序 
        Dim Xlsbook As Excel.Workbook '定义工作簿 
        Dim Xlssheet As Excel.Worksheet '定义工作表 

        Xls.Visible = True '显示excel 程序 
        Xlsbook = Xls.Application.Workbooks.Add '添加新工作簿 或exbook=exapp.workbooks.open("路径\文件名")'打开已存在工作薄 
        Xlssheet = Xlsbook.Sheets(1) '第1个工作表的控制句柄 

        MsgBox("EXCEL档案创建完毕!") 
        Xlssheet.Cells(1, 1) = "这是一个创建EXCEL的示例" 
        Dim Sdlg As SaveFileDialog = New SaveFileDialog '定义一个保存对话框 
        Sdlg.FileName = "*.xls" '保存对话框的默认文件名 
        Sdlg.Filter = "EXCEL档案(*.Xls)|*.Xls" '过滤器设置 
        If Sdlg.ShowDialog = Windows.Forms.DialogResult.OK Then '如果保存对话框的确认按钮被按下 
            Xlsbook.SaveAs(Sdlg.FileName) '保存文件 
        End If 
        Xlssheet = Nothing '释放资源 
        Xlsbook.Close() '关闭工作簿 
        Xlsbook = Nothing '释放资源 
        Xls.Quit() '退出excel应用程序 
        Xls = Nothing --------------------编程问答-------------------- 2008对智能设备的com支持才好。 --------------------编程问答-------------------- 看来楼主应该升级IDE了 --------------------编程问答-------------------- --------------------编程问答-------------------- 类未注册可能是动态链接库Fm20.dll引起的。只要重新注册此文件即可。即开始——运行——regsvr32.exe fm20.dll --------------------编程问答-------------------- 楼主应该升级IDE了
补充:.NET技术 ,  VB.NET
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,