winWord2.rar_生成文档

#coding=utf-8 import time import win32com from win32com.client import Dispatch, constants currenttime=time.localtime() year=str(currenttime.tm_year) month=str(currenttime.tm_mon) day=str(currenttime.tm_mday) hour=str(currenttime.tm_hour) minute=str(currenttime.tm_min) second=str(currenttime.tm_sec) weekend=str(currenttime.tm_wday) timestr=year+'_'+month+'_'+day+'#'+hour+'_'+minute+'_'+second w = win32com.client.Dispatch('Word.Application') # 或者使用下面的方法，使用启动独立的进程： w = win32com.client.DispatchEx('Word.Application') # 后台运行，不显示，不警告 w.Visible = 0 w.DisplayAlerts = 0 # 打开新的文件 #doc = w.Documents.Open( FileName ="E:\st111.doc") doc = w.Documents.Add() # 创建新的文档 # 插入文字 myRange = doc.Range(0,0) myRange.InsertBefore('Hello from Python!') # 使用样式 wordSel = myRange.Select() #wordSel.Style = constants.wdStyleHeading1 # 正文文字替换 w.Selection.Find.ClearFormatting() w.Selection.Find.Replacement.ClearFormatting() #w.Selection.Find.Execute(OldStr,False,False,False,False,False,True,1,True,NewStr,2) # 页眉文字替换 w.ActiveDocument.Sections[0].Headers[0].Range.Find.ClearFormatting() w.ActiveDocument.Sections[0].Headers[0].Range.Find.Replacement.ClearFormatting() #w.ActiveDocument.Sections[0].Headers[0].Range.Find.Execute(OldStr,False,False,False,False,False,True,1,False,NewStr,2) # 表格操作 #doc.Tables[0].Rows[0].Cells[0].Range.Text ='123123' #worddoc.Tables[0].Rows.Add() # 增加一行 # 转换为html wc = win32com.client.constants w.ActiveDocument.WebOptions.RelyOnCSS = 1 w.ActiveDocument.WebOptions.OptimizeForBrowser = 1 w.ActiveDocument.WebOptions.BrowserLevel = 0 # constants.wdBrowserLevelV4 w.ActiveDocument.WebOptions.OrganizeInFolder = 0 w.ActiveDocument.WebOptions.UseLongFileNames = 1 w.ActiveDocument.WebOptions.RelyOnVML = 0 w.ActiveDocument.WebOptions.AllowPNG = 1 #help(w.ActiveDocument.Save) name=('E:\\'+timestr+'.doc') w.ActiveDocument.SaveAs(name) # 打印 #doc.PrintOut() # 关闭 doc.Close() #w.Documents.Close(wc.wdDoNotSaveChanges) w.Quit() print(name) b=name (DDD,aaa)=b.split('#') print(DDD) raw_input ("Please Enter:")