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還提供了插入特殊字元的方法,如版權符號、注冊符號、節符號等。