命名空间不对宽渣。
网站建设哪家好,找成都创新互联公司!专注于网页设计、网站建设、微信开发、微信小程序定制开发、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了仁布免费建站欢迎大家使用!
添加.NET引用“Microsoft Office Interop”,或者宏腔COM引用"Microsoft Office 12.0 Object Library "和"Microsoft Excel 14.0 Object Library"。
声明应该是这样的:
Dim xA As Microsoft.Office.Interop.Excel.Application
除非蔽巧衫你 Imports Microsoft.Office.Interop 过,才可以 Dim xA As Excel.Application。
第一处是第五行:sqlcmd.Connectext = 改毁漏为灶余团隐橘 sqlcmd.CommandText=
第二处是第七行:SqlConnection1.Close() '打开连接
改乘SqlConnection1.open()
1、需要定义的类型不存在,如:dim a as xx,而xx是没定义的(可能xx写错了),需要先定义xx类型。
2、工具:vb6
3、用户定义类型未定义错误分三类:
a)写错拦旦了默认变量类型名,如:dim a as intege,改成dim a as integer即可。
b)写错了自定义变量类型名,如自定义变量a1,写成了al,改正成a1即可。
c)定义了某种引用类型的变量类型,简猛扰而未引知冲用该对象,如:
dim conn as ADODB.Connection,
而未在工程中引用Microsoft ActiveX Data Objects 2.5 Library,工程中引ADO即可。
Dim APP_Excel As Object
Dim Excel_Workbook As Object '定义两个对象,这样的好处是避免了Excel的引用中御(如果你直接引用,在别的客户机上如果EXCEL版本较低吵培陆则会出错)
APP_Excel = CreateObject("Excel.Application") '创建Excel应用程序
Excel_Workbook =APP_Excel.workbooks.add() '生成新工升顷作簿
APP_Excel.visible = True
'如果你实在要坚持你的用法就在引用后:Imports Microsoft.Office.Interop