Set cloner = CreateObject("WScript.Shell")
cloner.run"cmd"
WScript.Sleep 500

cloner.SendKeys"telnet 192.168.254.1"
cloner.SendKeys("{Enter}")
WScript.Sleep 500

cloner.SendKeys"Firefly"
cloner.SendKeys("{Enter}")
WScript.Sleep 500

cloner.SendKeys"$P4mb1h1r4N4m4nT0!!"
cloner.SendKeys("{Enter}")
WScript.Sleep 500

cloner.SendKeys"diag display macaddr"
cloner.SendKeys("{Enter}")
WScript.Sleep 500

cloner.SendKeys"xiugai macdizhi"
cloner.SendKeys("{Enter}")
WScript.Sleep 500


cloner.SendKeys"xiugai macdizhi 20:10:7A:F2:AC:41"
cloner.SendKeys("{Enter}")
WScript.Sleep 500


cloner.SendKeys"diag reboot"
cloner.SendKeys("{Enter}")
WScript.Sleep 500