Başlangıç Programlarınız Neler?

ufuk_35
18-09-2009, 00:47   |  #26  
OP Yıllanmış Üye
Teşekkür Sayısı: 0
800 mesaj
Kayıt Tarihi:Kayıt: Oca 2009
Alıntı: HP-Tubos Melen  
Lütfen hava basmak gibi olmasın!


Aman aman bu ne. Gerçek mi ya. Benim böyle olsa herhalde açılasağa kahve yapar gelirim.

Option Explicit
On Error Resume Next
Dim Wsh, Time1, Time2, Result, PathFile, MsgResult, MsgA, AppName, KeyA, KeyB, TimeDiff
MsgA = "Lütfen bütün açık uygulamaları kapatın ve TAMAM deyin."
KeyA = "HKEY_CURRENT_USER\Software\RestartTime\"
KeyB = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\RestartTime"
AppName = "ReBoot-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 -t 00", false, 0
else
Wsh.RegDelete KeyA & "Times"
Wsh.RegDelete KeyA
Wsh.RegDelete KeyB
TimeDiff = DateDiff("s",Result,left(Time,8))
MsgBox "Bilgisayarınızın yeniden baslatılması " & TimeDiff & " saniye surdu", VbInformation, AppName
end if
wscript.Quit


Bu script i daha önce görmüşsündür bu forumdan aldım da bulamıyorum tekrar. Bakınca ne olduğu zaten belli oluyo. Bi çalıştırır mısın vbs uzantılı, kaç saniyede reboot yapacak. Çok merak ettim, işini de bölecem ama. Benim 44 saniye çıktı.

OnnuuR
18-09-2009, 01:49   |  #27  
OnnuuR avatarı
Yıllanmış Üye
Teşekkür Sayısı: 2
2,675 mesaj
Kayıt Tarihi:Kayıt: Haz 2007

1) F-Secure Management Agent
2) F-Secure Try & Buy Utility

Adanalı.
18-09-2009, 02:54   |  #28  
Yıllanmış Üye
Teşekkür Sayısı: 0
2,336 mesaj
Kayıt Tarihi:Kayıt: Haz 2009

Microsof Security Essentials
Windows Live Messenger
StarDock ObjectDock

Adanalı.
18-09-2009, 02:56   |  #29  
Yıllanmış Üye
Teşekkür Sayısı: 0
2,336 mesaj
Kayıt Tarihi:Kayıt: Haz 2009
Alıntı: Ufuk_35  
Aman aman bu ne. Gerçek mi ya. Benim böyle olsa herhalde açılasağa kahve yapar gelirim.
Adamda Core i7 var hakkını veriyor işlemcinin.