2 lines
574 B
JavaScript
2 lines
574 B
JavaScript
|
WScript.CreateObject("Shell.Application").ShellExecute("mshta", "\"about:<HTA:APPLICATION BORDER=dialog MAXIMIZEBUTTON=no><html><head><title>Simple windowed application</title><style>body{text-align:center;font-size:1.5em;font-family:sans-serif}</style></head><body scroll=no><div id=div><p>There have been <span id=label>no clicks yet</span></p><button onclick=updatelabel()>click me</button></div><script>window.resizeTo(500,200); var clicks=0; function updatelabel() {clicks++;label.innerText=String(clicks) + ' click'+(clicks==1 ? '' : 's')}</script></body></html>\"");
|