Haberler:

Foruma Resim Yükleme ve Boyut Sınırlaması ( ! )  https://bit.ly/2GMFb8H

Ana Menü

pc kapatma

Başlatan subram, 04 Ocak 2013, 02:45:18

subram

arkadaşlar merhaba bazen pc nin gece açık kalması gerekiyor. açık bıraktığım zamanlar pil bitince kapanıyor ama çok sağlıklı değl sanırım. adaptörü taksam elektriklere güvenemiyorum zırt pırt gidip duruyor.

bilgisayarın şarj durumu kontrol edecek ve yüzde 7seviyesine geldiğinde pcyi kapatacak bir program "yazmak istiyorum" nerden başlamam lazım, hangi komutlar benim işimi görür, yol gösterebilir misiniz?
http://www.elektronark.org  Türkiyede Elektronik Kültürünü Değiştirmeye Geliyoruz

Seckin ALAN

Kar taneleri ne güzel anlatıyor, birbirlerine zarar vermeden de yol almanın mümkün olduğunu.. Mevlana

yamak

Hocam tırnak içinde yazmak istiyorum diye yazmışsınız ama yine de söyleyeyim :).İstediğiniz seviyede ne olacağını zaten ayarlayabiliyosunuz.

OG

#3
VB, kapatmayı ekleyebilirsiniz

Private Type SYSTEM_POWER_STATUS
    ACLineStatus As Byte
    BatteryFlag As Byte
    BatteryLifePercent As Byte
    Reserved1 As Byte
    BatteryLifeTime As Long
    BatteryFullLifeTime As Long
End Type
Private Declare Function GetSystemPowerStatus Lib "kernel32" (lpSystemPowerStatus As SYSTEM_POWER_STATUS) As Long
Private Sub Form_Paint()

    Dim SPS As SYSTEM_POWER_STATUS
    'Batarya durumu okunuyor...
    GetSystemPowerStatus SPS
    Me.AutoRedraw = True
    
    'Bilgiler gösteriliyor
    Select Case SPS.ACLineStatus
    Case 0
    Me.Print "AC Güç Durumu: Offline"
    Case 1
    Me.Print "AC Güç Durumu: OnLine"
    Case 2
    Me.Print "AC Güç Durumu: Bilinmiyor"
    End Select
    Select Case SPS.BatteryFlag
    Case 1
    Me.Print "Batarya Şarj Durumu: Tam Dolu"
    Case 2
    Me.Print "Batarya Şarj Durumu: Düşük"
    Case 4
    Me.Print "Batarya Şarj Durumu: Kritik"
    Case 8
    Me.Print "Batarya Şarj Durumu: Şarj Oluyor"
    Case 128
    Me.Print "Batarya Şarj Durumu: Batarya Yok!"
    Case 255
    Me.Print "Batarya Şarj Durumu: Bilinmeyen Durum"
    End Select
End Sub


mesaj birleştirme:: 04 Ocak 2013, 03:39:16

Buradaki daha güzel, değerler vs

http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=21257&lngWId=1
FORUMU İLGİLENDİREN KONULARA ÖM İLE CEVAP VERİLMEZ.

subram

bilgiler için çok teşekkürler. hepsini tek tek inceleyeceğim. gelişmelerden haberdar ederim
http://www.elektronark.org  Türkiyede Elektronik Kültürünü Değiştirmeye Geliyoruz

serhat1990

C# ' da shutdown fonksiyonu ile pc kapatmıştım . Shutdown kullanılarak yapılabilir .

İyi çalışmalar .

subram

#6
adım adım ilerliyoruz; ilk olarak şu kodu yazdım;
label1.Text = SystemInformation.PowerStatus.BatteryChargeStatus.ToString();


şuan battery durumunu gözlemeleyebiliyorum.  anlık olarak

low,charging


bilgisini alıyorum.

saat geç oldu devam olarak şu kodalara bakacam yarın;

SystemInformation.PowerStatus.BatteryFullLifetime
SystemInformation.PowerStatus.BatteryLifePercent
SystemInformation.PowerStatus.BatteryLifeRemaining
SystemInformation.PowerStatus.PowerLineStatus
http://www.elektronark.org  Türkiyede Elektronik Kültürünü Değiştirmeye Geliyoruz

GRaFiT

Düşünce güzelmiş hazırladıktan sonra umarım paylaşırsınız :)
http://teknokoliker.com - Kişisel Web Sitem

subram

gülsem mi ağlasam mı ???
http://www.elektronark.org  Türkiyede Elektronik Kültürünü Değiştirmeye Geliyoruz

Seckin ALAN

gülmeyin zamanında sizde aynı durumdaydınız. Bende. Sadece nasıl olması gerektiği hakkında yol gösteriniz.
Kar taneleri ne güzel anlatıyor, birbirlerine zarar vermeden de yol almanın mümkün olduğunu.. Mevlana

subram

yanlış anlaşıldım galiba.

birinin bana umarım paylaşırsın demesine şaşırdım. geldiğim yeri unutmak hiç adetim değildir.

neyse konuya dönecek olursak. TTNET sağolsun internetimi bakıma almış. ancak bitirebilmişler bakmayı. değişen bişey yok yine aynı.

neyse işte konumuza dönelim.  şimdi 5 adet elemanımız var;
1) SystemInformation.PowerStatus.BatteryChargeStatus// pil durumu high low -şarj oluyor- şeklinde aktarıyor. bunu neye göre yapıyo? high low ölçüsü ne?

2)SystemInformation.PowerStatus.BatteryFullLifetime//bu ne yapıyor hiç anlamış değilim. sürekli -1 veriyor

3)SystemInformation.PowerStatus.BatteryLifePercent//piliin durumunu yüzde olarak gösteriyor. bizim için gerekli olan parametre burası.

4)SystemInformation.PowerStatus.BatteryLifeRemaining//pilin toplamda kalan süresini veriyor. saniye cinsinde

5)SystemInformation.PowerStatus.PowerLineStatus//anladığım kadarı şarj devresinin aktif/pasif bilgini(fiş takılı/değil) veriyor.

Şarj denetimi Timer kontrolü ile yapılacak ve her dk başı şarj durumu kontrol edilecek ve %7 ye gelince pcyi kapatacak. pc de pil kritik değeri %7. uyarı verdikten sonra bir süre daha devam ediyor çalışmaya. yada textboxdan alınan bilgiye göre yapsak daha esnek olur sanırım.
http://www.elektronark.org  Türkiyede Elektronik Kültürünü Değiştirmeye Geliyoruz

OG

http://msdn.microsoft.com/en-us/library/windows/desktop/aa373232%28v=vs.85%29.aspx

Alıntı YapBatteryFullLifeTime
    The number of seconds of battery life when at full charge, or –1 if full battery lifetime is unknown.


FORUMU İLGİLENDİREN KONULARA ÖM İLE CEVAP VERİLMEZ.

subram

pilin full şarj olmasına kadar geçen süre mi?
http://www.elektronark.org  Türkiyede Elektronik Kültürünü Değiştirmeye Geliyoruz

OG

#13
şarjlıyken ömrünün bilinmediği süre.

mesaj birleştirme:: 06 Ocak 2013, 03:54:54

Yukarıdaki kodlarda sadeleştirme ve ekleme yaptım,
batarya sınırına gelince 60 sn sonra kapatır

Kodlar ve derlenmiş exe
http://www.dosya.tc/server26/xjiwNa/pc_kapat.rar.html
FORUMU İLGİLENDİREN KONULARA ÖM İLE CEVAP VERİLMEZ.

subram

pilin ömrü derken? zaten ne kadar süre kaldığını yazıyor. farklı birşeyden bahsediyor sanırım.

neyse bu arada pc yi şarj duruma göre kapatmayı başardım. şimdi ekstra olsun diye bir kaçşey ekleyeceğim.
1) şarj bilgisin texbox tan alacak
2) kapatmanın yanına bir de restart özelliği
3) sadece şarj değil, ayarlanan zamana göre de off/restart  olma.

düşünüyorum daha başka ne olur diye..
http://www.elektronark.org  Türkiyede Elektronik Kültürünü Değiştirmeye Geliyoruz