求:ASP.NET 对EXCEL控制在Windows2000、XP、2003 不同系统上的区别 在做.NET WEB开发时,用XP系统,但CT时发现对EXCEL的操作在2000上运行存在问题,主要是m_objExApp.Workbooks.Open(strFileName)运行异常抛错,求解决办法!!不知到2003会不会还有异常! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 这段代码在2000下能正确执行,但是在2003下就不执行 , 到xlsBook.Save()这步就不执行了怎么回事,应该和楼上的差不多,请指教!!Dim xlsApp As New Excel.Application Dim xlsBook As Excel.Workbook Dim xlsSheet As Excel.Worksheet Dim rowIndex As Integer = 1 Dim colIndex As Integer = 0 Dim i As Integer Try GC.Collect() xlsBook = xlsApp.Workbooks.Open("C:\Book1.xls") 'xlsApp.Visible = True xlsSheet = xlsBook.Worksheets("表1") xlsApp.Range("C7").Value = "25" ' xlsApp.Cells(11, 6) = "222" ' xlsApp.Range(xlsApp.Cells(1, 1), xlsApp.Cells(1, 18)).Value = "油田主要地面设施全年建设工作量及现状表(2005年度)" xlsBook.Save() Catch ex As Exception Response.Write(ex.Message) Finally ' xlsSheet = Nothing ' System.Runtime.InteropServices.Marshal.ReleaseComObject(xlsBook) 'xlsBook = Nothing ' xlsBook.Close(False, Type.Missing, Type.Missing) xlsApp.Workbooks.Close() xlsApp.Quit() System.Runtime.InteropServices.Marshal.ReleaseComObject(xlsSheet) xlsSheet = Nothing System.Runtime.InteropServices.Marshal.ReleaseComObject(xlsApp) System.Runtime.InteropServices.Marshal.ReleaseComObject(xlsBook) ' System.Runtime.InteropServices.Marshal.ReleaseComObject(xlsSheet) GC.Collect() End Try 我也遇到同样的问题把xlsBook.Save()改成xlsBook.SaveAs试试看 急急急,跪求JS高人指点。。。 前台数据的显示 怎么设置Gridview的标头 我只想打印某页其中的一部分,怎么办呀 求一sql语句 写了一个彩色的ASP.NET验证码组件 想用存储过程不容易 DataSet用没有像Delphi中的的locate 方法啊! mvc数据验证的问题 MVC3 Model写验证 弹出新窗口问题,望指教。 动态创建多个控件关于名称问题!!
怎么回事,应该和楼上的差不多,请指教!!Dim xlsApp As New Excel.Application
Dim xlsBook As Excel.Workbook
Dim xlsSheet As Excel.Worksheet
Dim rowIndex As Integer = 1
Dim colIndex As Integer = 0
Dim i As Integer Try
GC.Collect()
xlsBook = xlsApp.Workbooks.Open("C:\Book1.xls")
'xlsApp.Visible = True
xlsSheet = xlsBook.Worksheets("表1")
xlsApp.Range("C7").Value = "25"
' xlsApp.Cells(11, 6) = "222"
' xlsApp.Range(xlsApp.Cells(1, 1), xlsApp.Cells(1, 18)).Value = "油田主要地面设施全年建设工作量及现状表(2005年度)"
xlsBook.Save()
Catch ex As Exception
Response.Write(ex.Message)
Finally
' xlsSheet = Nothing ' System.Runtime.InteropServices.Marshal.ReleaseComObject(xlsBook)
'xlsBook = Nothing
' xlsBook.Close(False, Type.Missing, Type.Missing) xlsApp.Workbooks.Close()
xlsApp.Quit()
System.Runtime.InteropServices.Marshal.ReleaseComObject(xlsSheet)
xlsSheet = Nothing
System.Runtime.InteropServices.Marshal.ReleaseComObject(xlsApp)
System.Runtime.InteropServices.Marshal.ReleaseComObject(xlsBook) ' System.Runtime.InteropServices.Marshal.ReleaseComObject(xlsSheet) GC.Collect()
End Try