İstenilen Zamanda Bilgisayarı Kapatma.

arkadaşlar selam.

access'in form açıldığında formdaki ayarlanan saatde bilgisayarı kapatmasını istiyorum. 
bu komutu yüklendiğinde yazdığımda çalışıyor.

Private Sub Form_Load()
Shell ("Shutdown -s -t, 600")
End Sub

sorunum aşağıdaki gibi yapınca dakiyayı formdan alamıyorum.
Private Sub Form_Load()
Shell ("Shutdown -s -t, Forms![GRT_KONT]!Me.Metin37")
End Sub

bu şekildede olmadı
Private Sub Form_Load()
Dim ksaat As String
ksaat = (Forms![GRT_KONT]![Metin36]) * 60
Call Shell("Shutdown -s -t, ksaat", vbNormalFocus)
End Sub

(11/01/2019, 13:18)barcins yazdı: arkadaşlar selam.

access'in form açıldığında formdaki ayarlanan saatde bilgisayarı kapatmasını istiyorum. 
bu komutu yüklendiğinde yazdığımda çalışıyor.

Private Sub Form_Load()
Shell ("Shutdown -s -t, 600")
End Sub

sorunum aşağıdaki gibi yapınca dakiyayı formdan alamıyorum.
Private Sub Form_Load()
Shell ("Shutdown -s -t, Forms![GRT_KONT]!Me.Metin37")
End Sub

bu şekildede olmadı
Private Sub Form_Load()
Dim ksaat As String
ksaat = (Forms![GRT_KONT]![Metin36]) * 60
Call Shell("Shutdown -s -t, ksaat", vbNormalFocus)
End Sub

Sorunuzu "Access Soruları ve Cevapları" bölümüne taşıdım.
Lütfen sorularınızı bu başlık altında açınız...

Private Sub Form_Load()
Shell ("Shutdown -s -t," & Forms![GRT_KONT]!Me.Metin37 & "'")
End Sub

kodunuz yukardaki gibi değiştirip dener misiniz

(11/01/2019, 14:34)haliliyas yazdı: Private Sub Form_Load()
Shell ("Shutdown -s -t," & Forms![GRT_KONT]!Me.Metin37 & "'")
End Sub

kodunuz yukardaki gibi değiştirip dener misiniz

malesef

Run-time error '2465':
ifadenizde başvurulan 'Me' alanı Microsoft Office Access Tarafından bulunamıyor.

aklıma komutu text yapıp call shell ("cmd.exe /k text") gibi birşey geliyor ama 

Private Sub Form_Load()
Shell ("Shutdown -s -t," & cint( Forms![GRT_KONT]!Me.Metin37) )
End Sub
bunu deneyin
metin37 aktif from üzerinde mi başka bir formda mı?
eğer  başka kapalı bir formda ise önce o formu açması gerek

-t, den sonra 1bosluk olacakti

Shell ("Shutdown -s -t, " & cint( Forms![GRT_KONT]!Me.Metin37) )