A. 求大神指点。。。怎么用js新建word文档。。。。。。谢谢
用jscript实现新建和保存一个word文档
Demonstration script that retrieves network adapter data from a computer,
displays that data in a Microsoft Word document, and then saves the
document as C:\Scripts\Word\Testdoc.doc.
复制代码 代码如下:
Set objWord = CreateObject("Word.Application")
objWord.Caption = "Test Caption"
objWord.Visible = True
Set objDoc = objWord.Documents.Add()
Set objSelection = objWord.Selection
objSelection.Font.Name = "Arial"
objSelection.Font.Size = "18"
objSelection.TypeText "Network Adapter Report"
objSelection.TypeParagraph()
objSelection.Font.Size = "14"
objSelection.TypeText "" & Date()
objSelection.TypeParagraph()
objSelection.TypeParagraph()
objSelection.Font.Size = "10"
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration")
For Each objItem in colItems
objSelection.Font.Bold = True
objSelection.TypeText "ARP Always Source Route: "
objSelection.Font.Bold = False
objSelection.TypeText "" & objItem.ArpAlwaysSourceRoute
objSelection.TypeParagraph()
objSelection.Font.Bold = True
objSelection.TypeText "ARP Use EtherSNAP: "
objSelection.Font.Bold = False
objSelection.TypeText "" & objItem.ArpUseEtherSNAP
objSelection.TypeParagraph()
objSelection.Font.Bold = True
objSelection.TypeText "Caption: "
objSelection.Font.Bold = False
objSelection.TypeText "" & objItem.Caption
objSelection.TypeParagraph()
objSelection.Font.Bold = True
objSelection.TypeText "Database Path: "
objSelection.Font.Bold = False
objSelection.TypeText "" & objItem.DatabasePath
objSelection.TypeParagraph()
objSelection.Font.Bold = True
objSelection.TypeText "Dead GW Detection Enabled: "
objSelection.Font.Bold = False
objSelection.TypeText "" & objItem.DeadGWDetectEnabled
objSelection.TypeParagraph()
objSelection.Font.Bold = True
objSelection.TypeText "Default IP Gateway: "
objSelection.Font.Bold = False
objSelection.TypeText "" & objItem.DefaultIPGateway
objSelection.TypeParagraph()
objSelection.Font.Bold = True
objSelection.TypeText "Default TOS: "
objSelection.Font.Bold = False
objSelection.TypeText "" & objItem.DefaultTOS
objSelection.TypeParagraph()
objSelection.Font.Bold = True
objSelection.TypeText "Default TTL: "
objSelection.Font.Bold = False
objSelection.TypeText "" & objItem.DefaultTTL
objSelection.TypeParagraph()
objSelection.Font.Bold = True
objSelection.TypeText "Description: "
objSelection.Font.Bold = True
objSelection.Font.Bold = False
objSelection.TypeText "" & objItem.Description
objSelection.TypeParagraph()
objSelection.TypeParagraph()
Next
objDoc.SaveAs("C:\Scripts\Word\testdoc.doc")
objWord.Quit
B. 批量修改JS文件名称.
for i=1089914 to 1090026
Name cstr(i) & ".js" as format(i-1089913,"000") & ".txt"
next
C. JS中获取表现的问题name和tagname
getElementsByName是根据标签的name属性来拿的
getElementsByTagName是根据标签名来拿
getElementsByName()
这个是通过NAME来获得元素,但不知大家注意没有,这个是GET ELEMENTS,复数ELEMENTS代表获得的不是一个元素,为什么呢?
因为DOCUMENT中每一个元素的ID是唯一的,但NAME却可以重复。打个比喻就像人的身份证号是唯一的(理论上,虽然现实中有重复),但名字
重复的却很多。如果一个文档中有两个以上的标签NAME相同,那么getElementsByName()就可以取得这些元素组成一个数组。
比如有两个DIV:
<div name="docname" id="docid1"></div>
<div name="docname" id="docid2"></div>
那么可以用getElementsByName("docname")获得这两个DIV,用getElementsByName("docname")[0]访问第一个DIV,用getElementsByName
getElementsByTagName()
这个呢就是通过TAGNAME(标签名称)来获得元素,一个DOCUMENT中当然会有相同的标签,所以这个方法也是取得一个数组。
下面这个例子有两个DIV,可以用getElementsByTagName("div")来访问它们,用getElementsByTagName("div")[0]访问第一个DIV,用
getElementsByTagName("div")[1]访问第二个DIV。
D. 如何更改word文件名
第步,打开Word2007文档窗口,右键单击链接对象。在打开的快捷菜单中指向“链接的…对象”级联菜单,并在打开的下一级菜单中选择“链接”命令。
第2步,打开“链接”对话框,在链接列表中选中需要更改链接地址或数据范围的链接,然后单击“更改源”按钮。
第3步,在打开的“更改源”对话框中,查找并选中更改后的文件链接地址或新文件,单击“打开”按钮。返回“链接”对话框,单击“确定”按钮即可。
更改Word模板保存时的默认文件名:
1、在Word中,点击文件。
2、点击新建,在弹出的新建文档窗口中。
3、选择本机上的模板,在选择其他文档,在选择转化向导,最后进行相关操作。
扩展
1.建立新文档
当启动Word 2003 之后,可以使用下列步骤建立一个新文档,具体操作如下:
①单击【文件】→【新建】命令,在任务窗格中选择“本机上的模版”,屏幕上出现“新建”对话框,
②单击“常用”选项卡,然后选中“空白文档”图标,并单击【确定】按钮;
③在屏幕空白区域内输入文档内容即可。
2.打开文档
要为以前建立的文档继续录入数据或对其内容进行修改时,可按下列步骤打开文档:
①单击【文件】→【打开】命令或直接单击“常用”工具栏上的【打开】按钮,屏幕上出现“打开”对话框,;
②在“查找范围”下拉列表中选中要打开文档所在驱动器和文件夹,双击该文件夹,要打开的文件就出现在“查找范围”下方的列表框中;
③双击要打开的文档,然后就在Word 2003窗口中打开了该文档;
④若要同时打开多个文档,则先选中它们(在按住【Ctrl】键时,逐个单击),再单击【打开】按钮。
3.文本的输入
当准备输入汉字时,必须先切换到中文输入法状态下。按【Ctrl】+【Space】键即可在中英文输入法之间转换。
特殊符号的输入操作如下:
例如,要插入符号“∑”:
① 单击【插入】→【符号】→【字体】→【Symbol】将出现的符号对话框;
② 可以用鼠标单击【∑】符号,然后单击【插入】按钮或者双击【∑】符号的方法来插入符号:
③ 单击【关闭】按钮,“∑”符号即可插入到文档中当前光标位置。
另外,Word还提供了插入特殊字符的方法,如版权符号、注册符号、节符号等。