filesystemobject.htm

来自「适用于一些有脚本基础的人学习javascript脚本语言」· HTM 代码 · 共 43 行

HTM
43
字号
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE></TITLE>
</HEAD>
<BODY>
<script language=jscript>
function SubstrDemo()
{
  var s, ss;
  var s = "The quick brown fox jumped over the lazy yellow dog.";
  ss = s.substr(16, 3);
  // Returns "fox".
  document.write(ss);
  return(ss);
  
}
var fso = new ActiveXObject("Scripting.FileSystemObject");
//for(i=0;i<=10;i++)
fso.CreateFolder("c:\\new folder1");
var a = fso.CreateTextFile("c:\\new folder1\\testfile.txt", true);
a.WriteLine("This is a test.");
a.WriteLine("Welcome");
a.Close();
var ExcelSheet;
ExcelSheet = new ActiveXObject("Excel.Sheet");
// 使 Excel 通过 Application 对象可见。
ExcelSheet.Application.Visible = true;	
// 将一些文本放置到表格的第一格中。
ExcelSheet.ActiveSheet.Cells(1,1).Value = "This is column A, row 1";	
// 保存表格。
ExcelSheet.SaveAs("C:\\TEST.XLS");	
// 用 Application 对象用 Quit 方法关闭 Excel。
ExcelSheet.Application.Quit();	
// 释放对象变量。
ExcelSheet = "";	
SubstrDemo();
</script>
<P>&nbsp;</P>

</BODY>
</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?