Bilgisayarı Kapatma Kodu

02-02-2009, 14:28:36

Bilgisayarınızı sorgusuz sualsiz kapatıyor.

Bu deklerasyonu ve makro kodunu Excel' de de çalıştırabiliyorsunuz. Çalıştırdığınız anda bilgisayarınız ve açık uygulamalarınız sorgusuz sualsiz kapatılır. O yüzden denemeden önce çalışmalarınızı kaydetmeyi unutmayınız.

Private Declare Function InitiateSystemShutdown Lib "advapi32.dll" Alias "InitiateSystemShutdownA" (ByVal lpMachineName As String, ByVal lpMessage As String, ByVal dwTimeout As Long, ByVal bForceAppsClosed As Long, ByVal bRebootAfterShutdown As Long) As Long

Sub kapat()
Shell ("Shutdown -s -t 0")
End Sub

alıntıdır...

02-02-2009, 16:11:55

#2

Supper

eline sağlık ne işime yarar bilmiyorum ama güzel bi paylaşım

03-02-2009, 04:24:25

#3

~~intelsoft~~

Üyeliği durduruldu

Supper adlı üyeden alıntı: mesajı görüntüle

eline sağlık ne işime yarar bilmiyorum ama güzel bi paylaşım

nasil ne isine yarar, hicmi kapama tusun takilmadi ayni anda bilgisayar windows donmadi. bi da basina gelince anlarsin ne ise yarar"D

super kod arkadasim +rep.

03-02-2009, 18:28:09

#4

~~new_reefy~~

Üyeliği durduruldu

süreli olarak bilgisayarı kapata bilme var oda şöyle
başlat=>çalıştır=>tsshutdn 60 yani 60 sn sonra bilgisayar kapanacak anlamına geliyor. Bir saat sonra kapanmasını istiyorsanız [tsshutdn 3600] yazmanız yeterli.

06-02-2009, 00:43:05

#5

TarkanVURAL

new_reefy adlı üyeden alıntı: mesajı görüntüle

süreli olarak bilgisayarı kapata bilme var oda şöyle
başlat=>çalıştır=>tsshutdn 60 yani 60 sn sonra bilgisayar kapanacak anlamına geliyor. Bir saat sonra kapanmasını istiyorsanız [tsshutdn 3600] yazmanız yeterli.

Mersi, bu mesajınızı da notlarıma aldım. Kodlamayı daha da geliştirebilirsiniz elbette.
Keyifli paylaşımlar.

19-09-2019, 15:38:08

#6

izleyicibotum

bu kodları nereye yazıyoruz biraz uzağım bilgi verirseniz memnun kalırım anlatım olarak