87,910
社区成员
发帖
与我相关
我的任务
分享ActiveX 部件不能创建对象??
程序如下:
运行时提示脚本发生错误:
ActiveX 部件不能创建对象'Scripting.FileSystemObject'! 是什么问题?
sub SaveFile(str,fName)
Dim fso, tf
Set fso = CreateObject("Scripting.FileSystemObject")
Set tf = fso.CreateTextFile(fName, True)
tf.Write str
tf.Close
exewin()
End sub
运行时提示脚本发生错误:
ActiveX 部件不能创建对象'Scripting.FileSystemObject'! 是什么问题?
sub SaveFile(str,fName)
Dim fso, tf
Set fso = CreateObject("Scripting.FileSystemObject")
Set tf = fso.CreateTextFile(fName, True)
tf.Write str
tf.Close
exewin()
End sub
...全文
请发表友善的回复…
发表回复
sportdog 2003-11-14
- 打赏
- 举报
<HTML><HEAD>
<SCRIPT>
function getFileSize (fileName)
{
var fso = new ActiveXObject('Scripting.FileSystemObject');
var file = fso.GetFile(fileName);
return file.Size;
}
</SCRIPT>
</HEAD>
<BODY>
<FORM NAME="formName"><INPUT TYPE="file" NAME="fileName"><BR>
<INPUT TYPE="button" VALUE="查看文件字节大小" ONCLICK="alert(getFileSize(this.form.fileName.value)+'字节')"><BR>
</FORM></BODY>
</HTML>
他妈的，和我的一样，你把他改成.htm的就行.asp就不行
和IE版本无关，5.0和6.0一样报错
我............
<SCRIPT>
function getFileSize (fileName)
{
var fso = new ActiveXObject('Scripting.FileSystemObject');
var file = fso.GetFile(fileName);
return file.Size;
}
</SCRIPT>
</HEAD>
<BODY>
<FORM NAME="formName"><INPUT TYPE="file" NAME="fileName"><BR>
<INPUT TYPE="button" VALUE="查看文件字节大小" ONCLICK="alert(getFileSize(this.form.fileName.value)+'字节')"><BR>
</FORM></BODY>
</HTML>
他妈的，和我的一样，你把他改成.htm的就行.asp就不行
和IE版本无关，5.0和6.0一样报错
我............
GageCSDN 2003-11-14
- 打赏
- 举报
确认你的机器上面有没有安装FSO，方法是：在注册表中找HKEY_CLASSES_ROOT\Scripting.FileSystemObject是否存在，如果有，就可能是权限的问题了。
zerochang 2003-11-14
- 打赏
- 举报
我猜是VBScript写的服务端脚本吧？ASP？如果是服务端脚本那和IE安权级别有什么关系？不懂。
同样的程序我这里没错，你查一下注册表，在你的服务端上有没有（Scripting.FileSystemObject）这个PROGID?
同样的程序我这里没错，你查一下注册表，在你的服务端上有没有（Scripting.FileSystemObject）这个PROGID?
longshenwang 2003-11-14
- 打赏
- 举报
UP 我也有同样的问题 降低IE级别好像也不行!
