Bu tür şeyleri Hazır kaynak kodlar bölümüne yazarsanız daha iyi olur, aksi taktirde forum kirlenmiş olur...

Önemli değil ister Delphi ister VB, mesele iş görmek, birçok insan bundan muzdarip, merhem oluruz belki.

Al bakalım kodları Dediğim gibi ters zamanda istedin üniversiteye yetişmem lazım. Kodlarda bişi yok yoksa Bi timer var onuda 5 dk'ya ayarladım. winexec('shutdown -s -f -t 00'sw_normal); -

Merhaba, Bildiğiniz gibi jDownloader ve CryptLoad gibi otomatik indirme yöneticileri mevcut. Bunlar ile yüzlerce linki ekleyerek pc başında durmadan indirme yapabiliyorsunuz. Bundan sonrada indirmeler bittiğinde bilgisayarı kapatacak bir programa ihtiyacınız oluyor. Kendi içlerinde var ama onlarda hemen kapatıyor. Eğer UnRAR ve işlem tamamlandıktan sonra dosyaları sil aktif ise bu işler yarım kalıyor. Benim istediğim VB ile bir X. exe yapmak. Bu X. exe çalıştığı andan itibaren 300 sn sonra bilgisayar kapanacak. Ama X. exe bilgisayara komutu verdikten sonra hemen kapanacak . Bilgisayarın açık programları kapatamayıp, takılmasını önlemek için tedbir amaçlı . Örneğin; jDownloader görevlerine ekleyeceğim ve işim bitecek; Tetikleme : Tüm indirmeler tamamlandığında veya durdurulduğunda çalıştır. Seçim : X. exe (Buda bilgisayarı 300sn sonra kapanmaya yönlendirecek.) Not: Bazen Windows klasöründeki Shutdown. exe kapatamıyor bilgisayarı, bazı kapanmayan programlar bu işlevi yarım kesiyor. Benim istediğim kesintisiz ve istisnasız olarak bilgisayarın X. exe çalıştıktan 300 sn. sonra kapanması. Şimdiden teşekkürler.

Ekte basitçe birşeyler karaladım ama çook eksik var. 1. Saat formatını düzeltmek gerekiyor. "00:00:00" şeklinde yani. Biz "144452" yazınca bunu "14:44:52" şekline otomatik getirmeyi henüz yapamadım. 2. Birde henüz butonlara ve textlere istediğim işlevleri kazandıramadım. Yardım bekliyorum... Kodlarım; Private Sub Form_Load Timer1. Enabled = True Timer1. Interval = 1000 Text1. Text = Text2. Text End Sub Private Sub Command1_Click Text1. Text = Text2. Text Command3. Enabled = False End Sub Private Sub Command2_Click Unload Me End Sub Private Sub Command3_Click Timer2. Enabled = True Timer2. Interval = 1000 Timer1. Enabled = False Command1. Enabled = False End Sub Private Sub Timer1_Timer Text1. Text = Val(Text1. Text) - 1 If Text1. Text = "0" Then Shell ("C:\WINDOWS\system32\shutdown. exe -s") Timer1. Enabled = False Unload Me End If End Sub Private Sub Timer2_Timer Text4. Text = Time If Text3. Text = Text4. Text Then Shell ("C:\WINDOWS\system32\shutdown. exe -s") Timer2. Enabled = False Unload Me End If End Sub -

demekki bizim eski toprak shutdown -s -t 300 e devam. e zaten onuda X. bat olarak kullanıyorum. keşke elden başka birşey gelseydide bunuda tam otomatiğe bağlasaydık. gerçi ondan sonra "bizim yerimize bir kod yeni filmleri indirsin..." "bizim yerimize bir kod izlesin filmi " falan deriz... neyse sağlık olsun...

ozamn indir beyenirsen linkini ver xD benmez isen bende bi 7i denerim

http://www.planet-source-code.com/vb/scripts/ShowCode. asp?txtCodeId=51978&lngWId=1 http://www.planet-source-code.com/vb/scripts/ShowZip. asp?lngWId=1&lngCodeId=70791&strZipAccessCode=tp/A707919617 http://www.planet-source-code.com/vb/scripts/ShowZip. asp?lngWId=1&lngCodeId=45593&strZipAccessCode=tp/A455939252 http://www.planet-source-code.com/vb/scripts/ShowCode. asp?txtCodeId=56190&lngWId=1 http://www.planet-source-code.com/vb/scripts/ShowCode. asp?txtCodeId=11156&lngWId=1 birkaç örnek kod buldum login olmadan linklerde sorun varsa birazdan düzeltirim gitmem gerek şimdi

sana ve diğer arkadaşlara teşekkürler. bu arada peşini bırakmadım bu işin mutlaka yapar paylaşırım. türküm, türksün, türküz... herşeyi yaparız

Sorun değil Bugün üniversiteye gitmeden istediğim gibi bişiler yapabilirsem buraya

Küçükk bi exe yazdım bakalım işini görecek mi? Varsayılan değer olarak 5dk ya ayarlandı. Programı kapatırsanız bilgisayar kapanmaz. Değerini program çaılştıktan sonra değiştirebilirsiniz. 1Dk = 60000 dır. Buna göre zaman verebilirsin Aceleye geldiği için küçük birşey oldu. Geliştirebilirim. Zaten komut işlemi kodlarını kullandım Delphinin kapatma kodu aklıma gelmedi hatırlayınca güncellerim

çalışıp çalışmadığını denemedim deneyeceğim. birde süre gösterse daha iyi olur. kod verirsen bende düzenlerim.

Eger yeni bir dile basliyacaksan delphi secme 64 bit ortami yuzuden ve ayrica buradada soyluyorum su anda tek WPF kasin.. eger sistem yada nesne uzerine program yazmiyacaksaniz... konu ile mutlaka yarim kalan programlar kapanmasini engelliyecektir bunun icin tum programlari taskmanagerdan kapatacaksiniz ondan sonrada windowsu rahatca kapatablirisin... -

evet bende bu sorunla karşılaşıyorum şu anda vb kurulu deil pcde ztn kapatmada sorun oluyor açık programlarda takılıyorum vb kodlarıyla shutdownda biri yazarsa bunu çok iyi olur

300 sn. = 5 dk 5 dakika sonra bilgisayarın kapanmasınımı istiyorsun? Edit: Mesajı tam okumamıştım. VB de bilgim pek yok

delphi derleyici ne kullanıyorsun? delphiyede başlamayı düşünüormda

o konuda hiç bilgim yok