解决方法:
1.首先，是不是从来都是这种情况，如果只是偶尔的，一会儿是，一会儿不是，问题就不好办。如果是本身就有问题，那就是“scrrun.dll”文件未注册。使用regsvr32 scrrun.dll就可以
2.VB里用set fso=CreateObject("Scripting.FileSystemObject")
asp里边用 set fso=Server.CreateObject("Scripting.FileSystemObject")
3.看一下你的浏览器，是不是禁用了ActiveX
4.服务器不支持fso
5.禁fso，很多是改的Progid,出这样的错误：
服务器对象 错误 'ASP 0177 : 800401f3'
Server.CreateObject 失败
/asp/test.asp, 行3
---------------------
你可以猜测这个改变的数值来破解：
Set Fs=Server.CreateObject("Scripting.FileSystemObject8")----这个8就是，你可以慢慢的测试了
6.
应该是FSO给关闭了，但运行 regsvr32 scrrun.dll 然后重启一下 IIS 的服务
都不行，系统 是win2003的，重装系统后就出现这个问题了
----------------------------------------------------------------------
创建fso对象，语法要规范：
set fso=Server.CreateObject("Scripting.FileSystemObject")
如果仍然不行，用阿江探针查过服务器是支持FSO。
程序如下：
<%@ LANGUAGE = VBScript.Encode %>
<%set conn=server.createobject("adodb.connection")
conn.open "filedsn=d:\test\file.dsn;dbq=d:\test\test.mdb;" '注意改下路径
set rs=server.createobject("adodb.recordset")
sql="select * from test"
rs.open sql,conn,1,1
%><html>
<head>
<meta content="Microsoft FrontPage 5.0">
<meta content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新建网页 1</title>
<script Language=VBScript>
function print_onclick() //打印函数
dim label
label=document.printinfo.label.value //获得HTML页面的数据
set objfs=CreateObject("Scripting.FileSystemObject") //创建FileSystem组件对象的实例
set objprinter=objfs.CreateTextFile ("LPT1:",true) //建立与打印机的连接
objprinter.Writeline("__________________________________") //输出打印的内容
objprinter.Writeline("| |")
objprinter.Writeline("| 您打印的数据是："&label& " |")
objprinter.Writeline("| |")
objprinter.Writeline("|_________________________________|")
objprinter.close() //断开与打印机的连接
set objprinter=nothing
set objfs=nothing // 关闭FileSystem组件对象
end function
</script>
</head>
<body>
<FORM >
<INPUT type="button" value="打印>>" > //调用打印函数
<INPUT type=hidden value=<%=rs("name")%>> //保存服务器端传来的数据
<% rs.close
set rs=nothing
conn.close
set conn=nothing
%></form>
</body></html>
7.我的机器用了上面的方法没有解决问题，用下面的方法解决了问题，大家不妨可以试试：打开Internet Explorer “工具”菜单栏中的“选项”一栏，单击“安全”栏中的“自定义级别”选项卡，将第三项“对没有标记为安全的activex控件进行初始化和脚本运行”设置成“启用”即可。
分享到：
相关推荐
今天遇到个问题，一个ASP网站生成静态页面时报错： Microsoft VBScript 运行时错误 错误 ‘800a01ad’ ActiveX 部件不能创建对象: ‘Scripting.FileSystemObject’ 其实这个问题比较常见，报错原因是服务器不支持FSO...
ActiveX部件不能创建对象是许多IT专业人士在使用脚本语言调用ActiveX插件时可能遇到的问题。ActiveX是一种由微软公司提出的技术，用于在使用Internet Explorer浏览器或类似环境下，通过网页或其他应用软件与本地...
创建对象(“Scripting.FileSystemObject”)`是用来创建FSO对象的，`.目录尺寸`是我们存储目录大小的变量，`.FSO.GetFolder(“C:\目标目录\”).Size`则是使用FSO对象的`GetFolder`方法获取指定目录，并读取其`Size`...
在Windows脚本编程中，`Scripting.FileSystemObject`（简称FSO）是一个非常重要的对象，它允许程序员在没有用户交互的情况下访问和操作文件系统。这个对象是Microsoft的ActiveX组件，通常用于批处理脚本、VBS...
### Scripting.FileSystemObject对象的详细技巧指南 #### 一、概述 `Scripting.FileSystemObject`对象是脚本运行时库中的一个重要组成部分，主要用于提供对计算机文件系统的访问能力。这一对象适用于服务器端的ASP...
此外，还可以通过`Server.CreateObject("Scripting.FileSystemObject")`创建对象实例，或使用`<OBJECT>`标签在服务器端预实例化。 总之，Scripting.FileSystemObject对象是VBScript和JScript编程中的一个强大工具，...
在易语言中，这通常通过调用`创建对象`命令来实现，传入相应的类名，即"Scripting.FileSystemObject"。代码可能如下所示： ```易语言 .创建对象 (0, "Scripting.FileSystemObject") ``` 然后，使用这个对象的`...
○组件：Scripting.FileSystemObject(简称：FSO) ○组件：Adodb.Stream ○组件：Persits.Jpeg ○组件：JMail.Message ○浏览器：IE5.5以上版本，开启Cookies 推荐环境 ○Internet信息服务6.0 ○Scripting....
CreateObject("Scripting.FileSystemObject").GetDrive(盘符 & ":").DriveLetter & " " & 类型 & " " & _ CreateObject("Scripting.FileSystemObject").GetDrive(盘符 & ":").SerialNumber & " " & _ ...
1. **创建和初始化**：在VB中，可以通过`CreateObject("Scripting.Dictionary")`来创建一个Dictionary对象。无需预定义大小，Dictionary会自动扩展以容纳更多的键值对。 2. **添加元素**：使用`Add`方法向...
Microsoft.Scripting.dll提供了动态语言的基本构造和运行时环境，包括动态操作、元对象协议（Meta Object Protocol, MOP）以及语言间的互操作性。它允许不同的动态语言共享相同的运行时，从而降低了跨语言集成的...
其他现代浏览器不支持ActiveX，这意味着FSO不能在这些环境中使用。 3. **权限限制**：即使在支持FSO的环境中，也可能会受到用户权限的限制，尤其是涉及到对关键文件或系统的操作时。 #### 五、应用场景 - **自动化...
Set fso = CreateObject("Scripting.FileSystemObject") If Not fso.FolderExists(path) Then On Error GoTo ErrorHandler fso.CreateFolder path End If Exit Sub ErrorHandler: MsgBox "无法创建目录:...
Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.CreateTextFile("C:\FSO\ScriptLog.txt") 检察文件是否存在 Set objFSO = CreateObject("Scripting.FileSystemObject") If objFSO...
Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.CreateTextFile("C:\FSO\ScriptLog.txt") 检察文件是否存在 Set objFSO = CreateObject("Scripting.FileSystemObject") If objFSO...
2、组 件：Scripting.FileSystemObject (简称：FSO,通常都支持) 3、组 件：Adodb.Stream (通常都支持) 4、组 件：Microsoft.Xml (通常都支持) 5、组 件：Scripting.Dictionary (通常都支持) 6、浏览器：IE...
《DOMscripting》是关于使用JavaScript操作文档对象模型（Document Object Model，简称DOM）的一份重要资源。DOM是Web页面的结构化表示，允许我们通过编程方式访问和修改页面元素。DOMscripting则是将JavaScript与...