试图覆盖文件时引发JavaScript错误

试图覆盖文件时引发JavaScript错误,javascript,hta,Javascript,Hta,我已经创建了从HTA调用的Java和javascript代码。第一次执行时,覆盖文件的代码部分工作正常。但当我尝试在同一HTA线程上再次运行它时,它会抛出一个错误 “拒绝许可”。第二次覆盖同一文件失败。这是因为代码将文件用作对象而没有释放它吗?如果是的话,有没有办法将对象设置为null或其他 var objFSO = new ActiveXObject("Scripting.FileSystemObject"); if(objFSO.FileExists(MyPath)){ var objFil

我已经创建了从HTA调用的Java和javascript代码。第一次执行时,覆盖文件的代码部分工作正常。但当我尝试在同一HTA线程上再次运行它时,它会抛出一个错误 “拒绝许可”。第二次覆盖同一文件失败。这是因为代码将文件用作对象而没有释放它吗?如果是的话,有没有办法将对象设置为null或其他

var objFSO = new ActiveXObject("Scripting.FileSystemObject");
if(objFSO.FileExists(MyPath)){
var objFile = objFSO.CreateTextFile(MyPath);
}
这是我正在执行的代码块

谢谢, Anand

试试这个HTA

<html>
<head>
<script language="javascript">
function CreateMyFile() {
try {
var fso,MyPath,s,my_time;
var my_time = new Date()
fso = new ActiveXObject("Scripting.FileSystemObject");
MyPath = "C:\\TestFile.txt";
s = fso.CreateTextFile(MyPath,2);
s.Close();
alert('The File ' + MyPath + ' is Created ' + my_time);
}
catch(err){
var strErr = 'Error:';
strErr += '\nNumber:' + err.number;
strErr += '\nDescription:' + err.description;
document.write(strErr);
}
}
</script>
</head>
<body>
<table>
<tr>
<td><input type="submit" onclick="CreateMyFile()" value="Create File Test"></td>
</tr>
</table>
</body>
</html>

函数CreateMyFile(){
试一试{
var fso、MyPath、s、my_时间;
var my_time=新日期()
fso=新的ActiveXObject(“Scripting.FileSystemObject”);
MyPath=“C:\\TestFile.txt”;
s=fso.CreateTextFile(MyPath,2);
s、 Close();
警报('文件'+MyPath+'已创建'+myu时间]);
}
捕捉(错误){
var strErr='错误:';
strErr+='\n编号:'+err.number;
strErr+='\n说明:'+err.description;
文件编写(strErr);
}
}