PDA

View Full Version : روشن و خاموش کردن کامپیوتر



sabair
شنبه 16 دی 1385, 11:20 صبح
به نام خداوند دوست
دوست عزیز آیا امکان دارد در vb6 بتوان کامپیوتر را روشن کنیم.
اگراز شما می داند من را راهنمایی کند
باتشکر
takyazd@gmail.com

googoole
شنبه 16 دی 1385, 14:14 عصر
به نام خداوند دوست
دوست عزیز آیا امکان دارد در vb6 بتوان کامپیوتر را روشن کنیم.
اگراز شما می داند من را راهنمایی کند
باتشکر
takyazd@gmail.com

روشن کردن کامپیوتر امکان ندارد اما خاموش کردنش می شه ، اگر برنامه vb در حال اجرا نباشه پردازشی در حافظه وجود نداره که بتونه پیغامی رو ارسال کنه برای روشن کردن کامپیوتر توسط برنامه نویسی در شبکه میشه کامپیوتری را توسط کامپیوتر دیگر در شبکه روشن کرد البته باید مادر برد اون سیستم امکان Wakeup By Lan رو داشته باشه . اما یک کامپیوتر زمانی که خاموش بشه فقط توسط دکمه روشن شدن روشن میشه . چون پروسسورش خاموش شده و پردازشی انجام نمی ده . اما برای خاموش کردن یا ریست کرد سیستم میتونی از قطعه کد زیر استفاده کنی :


'textbox - txtComputerName
'textbox - txtSeconds
'textbox - txtComments
'comboBox - cboAction
'option - optYes
'option - optNo
'frame with caption: "Force shutdown?"
'command button - cmdGo
'command button - cmdClear
Option Explicit
Private forceShutdown As Boolean




Private Sub cmdGo_Click()
Dim computerName As String, seconds As Integer, comments As String
Dim selected As String, command As String, forced As String


computerName = txtComputerName.Text
seconds = Val(txtSeconds.Text)
selected = Combo1.Text
comments = txtComments.Text


If Not forceShutdown Then
forced = ""
Else
forced = "-f"
End If


' Chr(34) = "
If selected = "Shutdown" Then
command = "shutdown -s " & forced & " -m \\" & computerName & _
" -t " & seconds & " -c " & Chr(34) & comments & Chr(34)
MsgBox command, , ""
Shell (command)
ElseIf selected = "Restart" Then
command = "shutdown -r" & forced & "-m \\" & computerName & _
"-t " & seconds & " -c" & Chr(34) & comments & Chr(34)
Shell command
ElseIf selected = "Logoff" Then
command = "shutdown -l" & forced & "-m \\" & computerName & _
"-t " & seconds & " -c" & Chr(34) & comments & Chr(34)
Shell command
Else
MsgBox "Please select an action!", vbExclamation, ""
End If
End Sub
Private Sub cmdClear_Click()
txtComputerName.Text = ""
txtSeconds.Text = ""
Combo1.Text = "-- Select one --"
txtComments.Text = ""
optYes.Value = False
optNo.Value = True
End Sub
Private Sub optYes_Click()
forceShutdown = True
End Sub
Private Sub optNo_Click()
forceShutdown = False
End Sub



این قطعه کد از Command Prompt استفاده می کنه اگر بخوای میتونم API مربوط به این کار رو همراه با یک برنامه نمونه که کامپیوتر را در یک زمان دلخواه خاموش یا ریست می کنه بفرستم .

mahdyeh
پنج شنبه 21 دی 1385, 13:44 عصر
salamam age komakam konid:
man link ya ettelaati mikhastam darmorede
scan kardan tavassote scaner
dar vage mikhastam bedonam che ettefagati miyofte ta yek tasvir tavassote scan beshemanmon misham age rahnemayim konid. albatte be sorate kamel

sabair
پنج شنبه 21 دی 1385, 17:08 عصر
دوست عزیز
این کار امکان پذیر است
چون من این سورس رادیدام که زمان بندی می کرد وکامپیوتر را روشن می کرد

sjj
پنج شنبه 21 دی 1385, 19:28 عصر
salamam age komakam konid:
man link ya ettelaati mikhastam darmorede
scan kardan tavassote scaner
dar vage mikhastam bedonam che ettefagati miyofte ta yek tasvir tavassote scan beshemanmon misham age rahnemayim konid. albatte be sorate kamel
لطف کنید سوالتون رو توی تاپیک مربوطه مطرح کنید.

sjj
پنج شنبه 21 دی 1385, 19:31 عصر
دوست عزیز
این کار امکان پذیر است
چون من این سورس رادیدام که زمان بندی می کرد وکامپیوتر را روشن می کرد
فکر کنم با وقفه های بایوس این کار امکان پذیر باشه.

googoole
جمعه 22 دی 1385, 12:31 عصر
بر روی بعضی از پاورهای ATX زمانبند وجود دارد که می بایست از کارخانه سازنده اون کد دسترسی به اونو درخواست کنی میتونی به بخش پشتیبانی پاور گرین زنگ بزنی و اطلاعات مربوط به این نوع دسترسی رو از اونها بخوای اما اینکار با برنامه نویسی انجام نمیشه یعنی در واقع حافظه پاور مقدار دهی میشه و بعد برنامه شما بسته می شه در ضمن اگر لینک این برنامه رو داری که کامپیوتر رو روشن میکنه داری بزار تا مانیتورش کنم ببینم از کدوم تابع استفاده می کنه و چجوری پاور رو مقدار دهی میکنه . یا شاید هم از بایوس استفاده کنه . به هر حال تابع API خاصی برای روشن کردن سیستم وجود نداره . من اینترنت رو پاره کردم پیدا نکردم .

Sub Zero
جمعه 22 دی 1385, 16:10 عصر
ببینید دوستان اطلاعات مربوط به بایوس در حافظه (ROM) ذخیره می شه .
وقتی به وسیله برنامه نویسی اسمبلی می شه پاسورد ست اپ رو عوض کرد حتما می شه بایوس رو طوری تنظیم کرد که کامپیوتر در زمان معینی روشن بشه . اما لازمه این کار فهم قوی از نحوه قرار گیری اطلاعات بایوس در سگمنتهای حافظه است . بهتره که توی همین سایت از یه خوره اسمبلی کمک بگیریم . خود من سه ساله که دنبال یه همچین چیزی هستم . اگه راهی پیدا کردید حتما ما رو هم در جریان بذارید .

oVERfLOW
شنبه 23 دی 1385, 12:09 عصر
می‌شه زمان بندی کرد ولی نه به پاور ربط داره نه به کیس و نه به اسپیکر !
خود مادربورد اونم بعضی از مدل‌هاش زمان بندی دارن
دسترسی به مادر بورد حتی در صورتی که از این امکان پشتیبانی کنه به این راحتی‌ها نیست (توی NT)

کلی دردسر داره و با VB شدنی نیست
باید یه درایور بنویسید
و چک کنه که اگه فلان مادربورد بود اونوقت بره و توی بخش مربوطه اطلاعات زمانبندی رو بنویسه