macro5.txt

VC++和ACCESS使用ADO连接

Selection.MoveDown Unit:=wdLine, Count:=2
    Selection.MoveRight Unit:=wdCharacter, Count:=14
    Selection.TypeText Text:="25"
    Selection.MoveDown Unit:=wdLine, Count:=1
    Selection.TypeText Text:="左边的原部门"
    Selection.HomeKey Unit:=wdLine
    Selection.MoveDown Unit:=wdLine, Count:=2
    Selection.MoveRight Unit:=wdCharacter, Count:=5
    Selection.TypeText Text:="陈玮陈玮"
    Selection.MoveDown Unit:=wdLine, Count:=4
    Selection.EndKey Unit:=wdLine
    Selection.TypeText Text:="2008年11月11日"
    Selection.MoveDown Unit:=wdLine, Count:=2
    Selection.EndKey Unit:=wdLine
    Selection.TypeText Text:="2008年11月33日"
    Selection.MoveRight Unit:=wdCharacter, Count:=2
    Selection.MoveUp Unit:=wdLine, Count:=9
    Selection.MoveRight Unit:=wdCharacter, Count:=14
    Selection.TypeText Text:="25"
    Selection.MoveDown Unit:=wdLine, Count:=1
    Selection.TypeText Text:="右边的原部门"
    Selection.HomeKey Unit:=wdLine
    Selection.MoveDown Unit:=wdLine, Count:=2
    Selection.MoveRight Unit:=wdCharacter, Count:=5
    Selection.TypeText Text:="陈玮陈玮"
    Selection.MoveDown Unit:=wdLine, Count:=4
    Selection.EndKey Unit:=wdLine
    Selection.TypeText Text:="2008年11月11日"
    Selection.MoveDown Unit:=wdLine, Count:=2
    Selection.EndKey Unit:=wdLine
    Selection.TypeText Text:="2008年11月11日"