+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: bilgisayarı access içinden kapatmak (/konu-bilgisayari-access-icinden-kapatmak.html)
bilgisayarı access içinden kapatmak - accessman - 09/03/2012
modul içine
**************************
Declare Function ExitWindowsEx& Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long)
Public Const ZorlaKapat = 4
Public Const LOGOFF = 0
Public Const KapatAc = 2
Public Const Kapat = 1
*********************
formda bir butona
************
Private Sub Komut44_Click()
Dim MsgRes As Long
MsgRes = MsgBox("Windows'unuzu kapatmak istiyor musunuz?", vbYesNo Or vbQuestion)
If MsgRes = vbNo Then Exit Sub
Call ExitWindowsEx(Kapat, 0)
Unload Me
end sub
*************
internetten
bu kodları buldum ama
sadece oturumu kapatıyor
bunlarla bilgisayarı tamamen nasıl kapatabilirim
Cvp: bilgisayarı access içinden kapatmak - accessman - 09/03/2012
bir de şu var
**********
Private Sub Form_Load()
shell ("shutdown -s -t 1)
End Sub
**********
veya şunlar vb kodu imiş
***********
Kapatma Kodu ; Shell ("shutdown -s -t 1")
Reset Attirma Kodu ; Shell ("shutdown -r -t 1")
***********
bunu yazınca çalışmadı kod yazılışında bir hata var
yazı kırmızı oluyor
Cvp: bilgisayarı access içinden kapatmak - accessman - 09/03/2012
doğru olan kod bu imiş
Shell ("shutdown -s -t 1")
öncekinde bir tırnak unutulmuş muş
Cvp: bilgisayarı access içinden kapatmak - ercansahin - 10/03/2012
O halde konuyu taşıyalım değil mi?
Cvp: bilgisayarı access içinden kapatmak - Coskun0559 - 10/03/2012
https://accesstr.net/konu-bilgisayari-kapat-resetle-askiya-al.html
bunu yeni ekledim isterseniz bi bakın işinize yarayabilir.
Cvp: bilgisayarı access içinden kapatmak - zetyu - 18/11/2012
ekte örnek var komut duğmesı tıklama olayına aşağıda kodu yazınız
stAppName = "C:\WINDOWS\system32\Shutdown.exe -s -t 00"
Call Shell(stAppName, 1)