Forum

Otomatik pc kapama
 
Bildirimler
Hepsini Temizle

[Çözüldü] Otomatik pc kapama

4 Yazılar
4 Üyeler
0 Likes
515 Görüntüleme
(@OkanBurak)
Gönderiler: 9
Active Member
Konu başlatıcı
 

merhaba arkadaşlar,


 


yazılım ile ilgili yeni adım atmaya başladım, fakat otomatik bilgisayar kapatma programı yapmak istiyorum ve bu benim projem..Fakat bişeyler yapmaya çalıştım ama olmadı. Pek yapamadım, program kodlarını ve ekran görüntüsünü versem, nerde hangi kodda hata yaptığımı yani hatalarımla ilgili yardımcı olabilir misiniz? ve yarın son 🙁


sadece combobox yazan yer dokunulmayacak şekilde Bilgisayar Kapat yazısı olacak,


button 1 de ise hayır yazacak ve, hayır dendiğinde bilgisayar kapanmayacak. fakat 7.30 da tekrar soracak hayır butonuna tıklandığında ise tekrar saat 10 da soracak. eğer cevap veerilmez ise 30 dk içerisinde kapanacak.


 


 Kodlar


Public Class Form1




    Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click




    End Sub




    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


       


        InitializeComponent()








    End Sub




    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click


        If (ComboBox1.Text == "10 dak") Then




            System.Diagnostics.Process.Start("shutdown", "-f -s -t ")




        ElseIf (ComboBox1.Text = "Bilgisayarı Kapat") Then




            System.Diagnostics.Process.Start("shutdown", "-f -s -t ")




        ElseIf (ComboBox1.Text = "Bekleme") Then




        Else






            MessageBox.Show("Kapanma zamanını belirleyiniz")






        End If


    End Sub




    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged


If (ComboBox1.Text == "10 dak") Then




            System.Diagnostics.Process.Start("shutdown", "-f -s -t ")




        ElseIf (ComboBox1.Text = "Bilgisayarı Kapat") Then




            System.Diagnostics.Process.Start("shutdown", "-f -s -t ")




        




            MessageBox.Show("Kapanma zamanını belirleyiniz")




            End


            If True Then




            End If




    End Sub


End Class


 

 
Gönderildi : 30/07/2012 03:37

(@SavasKAPLAN)
Gönderiler: 244
Reputable Member
 

Form'un resmini cekip yukler misin?

Elimde V.Studio olmadigi ve kurmak istemedigim icin yazdigin ve su kurala gore gidedcek dedigin kodun gittigi yolu dahi anlamadim. Formu bi goreyim yada algoritmayi ayrintili yaz cozeriz senin mevzuyu.

 
Gönderildi : 30/07/2012 14:45

Hakan Uzuner
(@hakanuzuner)
Gönderiler: 32909
Illustrious Member Yönetici
 

Bilgisayarların otomatik kapanması için GPO ile Zamanlanmış görev tanımlama – İpucu – ÇözümPark Forum (cozumpark.com)

Danışman - ITSTACK Bilgi Sistemleri
****************************************************************
Probleminiz Çözüldüğünde Sonucu Burada Paylaşırsanız.
Sizde Aynı Problemi Yaşayanlar İçin Yardım Etmiş Olursunuz.
Eğer sorununuz çözüldü ise lütfen "çözüldü" olarak işaretlerseniz diğer üyeler için çok büyük kolaylık sağlayacaktır.
*****************************************************************

 
Gönderildi : 06/07/2023 14:31

(@supercanki)
Gönderiler: 20
Eminent Member
 
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        InitializeComponent()
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If ComboBox1.Text = "10 dak" Then
            System.Diagnostics.Process.Start("shutdown", "-f -s -t 600")
        ElseIf ComboBox1.Text = "Bilgisayarı Kapat" Then
            System.Diagnostics.Process.Start("shutdown", "-f -s -t 0")
        Else
            MessageBox.Show("Kapanma zamanını belirleyiniz")
        End If
    End Sub

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        ' "Bekleme" seçeneği için bir işlem yapmak istemiyorsanız bu kısmı kaldırabilirsiniz.
    End Sub
End Class

bak bakalim bu mu istediğin ?

 
Gönderildi : 10/12/2023 22:10

Paylaş: