automation自动化 和com和ActiveX控件是什么 他们什么关系

自动化是一项技术，就象OLE是一项技术一样。凡是支持IDispatch的COM组件都称为自动化组件

之所以叫做自动化是说使用方（使用自动化组件）可以不用从新编程就能使用这些组件，即给它个组件，它就能自动让其运作（不是运行，而是等待被作用，作用方式不定，一般是运行）。

比如自动化加工中心，里面有很多加工用的刀具，自动化组件就好象里面的刀握敬具，至于怎样用刀具，由编程决定。

COM

最常见的使用自动化的程序就是脚本翻译器，vbscript、javascript等

COM，即组件对象模型，是关于如何建立组件以及如何通过组件建立应用程序的一个规范，说明了如何可动态交替更新组件。

ActiveX 控件

以前称为 OLE 控件或渗燃 OCX 控件, ActiveX, 是组件 （或对象） 打包， 别人编程功能， 以便您可以重用 Web页或其他程序中插入。 例如, 随 InternetExplorer 一起提供 ActiveX 控件可用于增强 Web页具有复杂格式功能和动画。

简单的说 自动化侧重技术，com侧重规范，activeX侧重应用

它们都可以段喊慎说是一种编程规范

ll文件等丢失、损坏，一些包括游戏在内的应用程序无法启动。

解决方法有：

1、用Windows系统盘功能进行文件修复

2、若在此之前有一键备份过，可以重新还原

3、从网上下载系统文件然后覆盖到原文件夹里

4、由于从网上下载系统文件，可能会因为系统历改文件版本与 *** 作系统不相符造成系统文件不兼容的情况，明轮修复系统文件最好使用专业的工具进行一键修复。

5、可以用腾讯电脑管家修复下。打开电脑管家——电脑诊所——软件肢槐判问题——缺少dll文件。

Sub Openfile()

 Dim fileToOpen As Variant, texts As String, lines() As String

 fileToOpen = Application.GetOpenFilename(FileFilter:="Microsoft Office Excel 文件(*.txt),*.txt", _

         孙老    MultiSelect:=False) '("Text Files (*.txt), *.txt")

 If fileToOpen <>False Then

    Debug.Print fileToOpen

    MsgBox "选中缓凯派了" &fileToOpen &"文件"

 Else

   MsgBox "没有选中文件"

 扰贺  Exit Sub

 End If

 

 Open fileToOpen For Input As #1

 Do While Not EOF(1)

   Line Input #1, texts

     i = i + 1

     ReDim Preserve lines(i)

     lines(i) = texts

 Loop

 

 Close #1

 

 r = UBound(lines)

 Range("A1:" &"A" &r) = WorksheetFunction.Transpose(lines)

 

End Sub

---