Koha per te cilin kompjuteri juaj restartohet - Printable Version +- eSportsKosova - Gaming Community (https://esportskosova.com) +-- Forum: KOMUNITETI (https://esportskosova.com/forum-107.html) +--- Forum: IT Zone (https://esportskosova.com/forum-24.html) +---- Forum: PC - Tutoriale/Mesime (https://esportskosova.com/forum-76.html) +---- Thread: Koha per te cilin kompjuteri juaj restartohet (/thread-42691.html)

Koha per te cilin kompjuteri juaj restartohet - ̶H̶e̶n̶t̶a̶i̶ - 10-31-2023 Po i bie shkurt se titulli tregon edhe vet 1.Si fillim downladoni kete Restart-Time.vbs dhe ja beni extract ne desktop Download Restart-Time.vbs 2.Duhet ta zhbllokoni patjeter duke klikuar me te djathten properties pastaj unblock nese nuk ju del opcioni unblock atehere muni me punu sepse dmth qe esht e zhbllokume 3.E hapni Restart-Time.vbs Nese jeni kureshtar me dit qa ka apo nuk besoni [spoiler]Option Explicit On Error Resume Next Dim Wsh, Time1, Time2, Result, PathFile, MsgResult, MsgA, AppName, KeyA, KeyB, TimeDiff MsgA = "Please close all running applications and click on OK." KeyA = "HKEY_CURRENT_USER\Software\RestartTime\" KeyB = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\RestartTime" AppName = "Restart-Time" Set Wsh = CreateObject("WScript.Shell") PathFile = """" & WScript.ScriptFullName & """" Result = wsh.RegRead(KeyA & "Times") if Result = "" then MsgResult = Msgbox (MsgA, vbOKCancel, AppName) If MsgResult = vbcancel then WScript.Quit Wsh.RegWrite KeyA & "Times", left(Time,8), "REG_SZ" Wsh.RegWrite KeyB, PathFile, "REG_SZ" Wsh.Run "cmd /c Shutdown -r -f -t 00", false, 0 else Wsh.RegDelete KeyA & "Times" Wsh.RegDelete KeyA Wsh.RegDelete KeyB TimeDiff = DateDiff("s",Result,left(Time,8)) MsgBox "Your computer takes " & TimeDiff & " seconds to completely restart.", VbInformation, AppName end if wscript.Quit[/spoiler] 4.Pasi ti mbyllni te gjitha programet klikoni OK 5.Kur ta kryeni restartimin do tju shfaqet kjo dritare dhe duhet te klikoni OK 6.Muni me fshi qe doni ose me rujt dikun ku doni. 7.Sdi a gjendet dikun kjo (ESK) qe po tregoni ja boj delete. 8.For fun qe doni postoni edhe ju kohen tuaj. [info]XP Users sju kisha keshillu me ba kta un ktu foli gjith per Windows 7[/info]