Sample Code to Install MS Y2K Product Analyzer

Keywords: 	  Microsoft Y2K Product Analyzer y2kscan.exe

---

This sample code installs the Microsoft Y2K Product Analyzer (y2kscan.exe):

;Program to execute the Microsoft Y2K Product Analyzer
username=ASKLINE("MS Y2K Scan","Please enter your Username","")
mswind="Microsoft Year 2000 Product Analyzer"

run("c:\y2kscan\y2kscan.exe", "")


Sendkeysto(mswind, "!n")
TimeDelay(0.5)

Sendkeysto(mswind, "!u") ;custom config
TimeDelay(0.5)

Sendkeysto(mswind, "!n")  ;hit next
TimeDelay(0.5)

Sendkeysto(mswind, "!n")  ;hit next
TimeDelay(0.5)

Sendkeysto(mswind, "!n")  ;hit next
TimeDelay(0.5)

Sendkeysto(mswind, "c:\temp\y2kresults\y2kdbEN.txt")  ;hit next
TimeDelay(0.5)

Sendkeysto(mswind, "!n")  ;hit next
TimeDelay(0.5)

Sendkeysto(mswind, "!n")  ;choose Microsoft products
TimeDelay(0.5)

Sendkeysto(mswind, "!n")  ;choose htm
TimeDelay(0.5)

Sendkeysto(mswind, "c:\temp\y2kresults\%username%.htm")  ;specify output file
TimeDelay(0.5)

Sendkeysto(mswind, "!n")  ;specify output file
TimeDelay(0.5)

Sendkeysto(mswind, "!n")  ;confirm settings
TimeDelay(0.5)

while @true
childlist=WinItemChild(mswind)
findit=ItemLocate("Completing the Microsoft Year 2000 Product Analyzer Wizard",childlist,@tab)
if findit!=0
 Sendkeysto(mswind, "!v")  ;confirm settings
 break
else
 TimeDelay(0.5)
endif
endwhile

TimeDelay(0.5)
WinClose(mswind)
exit

---

Article ID:   W14371

Filename:   Script to Install MS Y2K Product Analyzer.txt