How to Make a VBScript Timer -

-

i need have timer appear in message box, coded in vbs. message box needs in bottom left corner of screen, above start menu. needs not able exit, meaning cannot listed on task bar (hopefully) , have no minimise/exit buttons. needs stay on top of other windows. needs start @ 20 minutes, counting down in seconds. hope can me - it's computer lab.

thanks, matthew

try :

option explicit dim title,ws,nminutes,nseconds,smessage title = "counting down shutdown" set ws = createobject("wscript.shell") nminutes = 20 nseconds = 0 smessage = "<font color=red size=2><b>counting down shutdown" 'open chromeless window message htabox("lightblue",100,250,0,630)     .document.title = "counting down notification shutdown"     .msg.innerhtml = smessage     until .done.value or (nminutes + nseconds < 1)         .msg.innerhtml = smessage & "<br>" & nminutes & ":" & right("0"&nseconds, 2) _         & " remaining</b></font><br>"         wsh.sleep 1000 ' milliseconds         nseconds = nseconds - 1         if nseconds < 0              if nminutes > 0                 nminutes = nminutes - 1                 nseconds = 59             end if         end if     loop     .done.value = true     .close end ws.popup "time on !","5",title,0+48 'afficher un popup durant 5 secondes puis on quitte le script 'command="cmd /c shutdown.exe -s -t 30 -c " & dblquote("sauvegarder votre travail car l'ordinateur va rebooter dans 30 secondes") 'executer = ws.run(command,0,false)  '***************************************************************** function htabox(sbgcolor, h, w, l, t)     dim ie, hta, scmd, nrnd     randomize : nrnd = int(1000000 * rnd)     scmd = "mshta.exe ""javascript:{new " _     & "activexobject(""internetexplorer.application"")" _     & ".putproperty('" & nrnd & "',window);" _     & "window.resizeto(" & w & "," & h & ");" _     & "window.moveto(" & l & "," & t & ")}"""     createobject("wscript.shell")         .run scmd, 1, false         until .appactivate("javascript:{new ") : wsh.sleep 10 : loop         end  'wshshell         each ie in createobject("shell.application").windows             if isobject(ie.getproperty(nrnd))                 set htabox = ie.getproperty(nrnd)                 ie.quit                 htabox.document.title = "htabox"                 htabox.document.write _                 "<hta:application contextmenu=no border=thin " _                 & "minimizebutton=no maximizebutton=no sysmenu=no showintaskbar=no >" _                 & "<body scroll=no style='background-color:" _                 & sbgcolor & ";font:normal 10pt arial;" _                 & "border-style:inset;border-width:3px'" _                 & "onbeforeunload='vbscript:if not done.value " _                 & "window.event.cancelbubble=true:" _                 & "window.event.returnvalue=false:" _                 & "done.value=true:end if'>" _                 & "<input type=hidden id=done value=false>" _                 & "<center><span id=msg>&nbsp;</span><br>" _                 & "<input type=button id=btn1 value=' ok ' "_                 & "onclick=done.value=true><center></body>"                 htabox.btn1.focus                 exit function             end if         next         msgbox "hta window not found."         wsh.quit end function '*****************************************************************

Comments

Post a Comment

Popular posts from this blog

How to run C# code using mono without Xamarin in Android? -

-
i want create program uses mono runtime run c# code (binary not application). i copied libmono.so unity app , i'm write code using documentation: http://www.mono-project.com/docs/advanced/embedding/ and it's working have problems references can access classes mscorlib.dll , have problems system.reflection.assembly class throwing exception, when print console see: system.missingmethodexception: method not found: 'system.reflection.assembly.op_inequality' can fix it? can use mono runtime in c binary on android? ps. i'm using android tests. edit: found solution loading libraries, need set environment variable mono_path libraries path. but have still problems assembly class. the system.missingmethodexception error have seems .net profile mismatch error, 1 explained here . can use mono runtime in c binary on android? yes, using ndk guess. there alternatives can use instead of rolling own, such xmadevlab .
Read more

html - grunt SVG to webfont -

-
i'm trying generate webfont svgs using grunt-webfont . the issue need task valid on windows , linux machines. in order achieve need use node engines doesn’t work svg files . i know if there way convert svgs proper svg format supported grunt plugin or alternatively there better grunt plugin/s achieve this i have task able take svgs (created in illustrator) , output webfont files (.eot,.svg,.svg,...) , css file (like icomoon export) thanks. perhaps artboard small. recommend checking have 512pt x 512pt artboard each icon. stumbled upon gem ( https://www.fourdigits.nl/blog/using-a-webfont-to-display-icons ) when grunt-webfont documentation left me alone in forest.
Read more

c# - SharpSsh Command Execution -

-
Image
i trying create ssh client using c#. using tamir.sharpssh library. having issues sending command , getting appropriate response server. the way have been testing sending on ls command, followed cd.. command, followed ls command again -- see whether or not cd.. command being executed properly. however, there no difference between first ls command , second ls command. not entirely sure doing wrong. perhaps using wrong ssh type. have provided code , output getting. have added output expect. using tamir.sharpssh; namespace sshnetexample { class program { static void main(string[] args) { sshexec ssh = null; try { console.write("-connecting..."); ssh = new sshexec(host, username, password); ssh.connect(); console.writeline("ok ({0}/{1})", ssh.cipher, ssh.mac); console.writeline("server version={0}, client versio...
Read more