求助 求助电脑高手,脚本高手,制作自动输入数据脚本

求助 求助电脑高手,脚本高手,自动输入数据到软件的输入框上

求助,因有一款软件,用起来非常死板,软件界面上有十一个输入的框,每次用软件,都得输入同样的一组(十一组数字),详细操作得如下:
鼠标点击第一个输入框 输入2001
按TAB键 跳下一个框 输1
再按TAB键 跳下一个框 输2009
再按TAB键 跳下一个框 输41
再按TAB键 跳下一个框 输01
再按TAB键 跳下一个框 输03
再按TAB键 跳下一个框 输08
再按TAB键 跳下一个框 输17
再按TAB键 跳下一个框 输19
再按TAB键 跳下一个框 输49
再按TAB键 跳下一个框 输45

最后才点 "确定"
即是在软件的界面上有十一个输入框 输入框依次得输入以下数据
2001 1 2009 41 01 03 08 17 19 49 45

而且每一次输入的这一组数字,都要输入十八次以上,非常麻烦苦恼!

即每次打开软件 用软件的时候 都得输入这十一组数字 非常烦恼,求助高手 写一自动输入数据的脚本给我,谢谢!!!

Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "标题" '把这里的“标题”改为你的那个程序标题栏上显示的名称
WshShell.SendKeys "2001"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "1"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "2009"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "41"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "01"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "03"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "08"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "17"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "19"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "49"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "45"