ریست شدن سیستم

[vB.N3T]

سلام دوستان گل

بچه ها من کدی که باعث میشه سیستم ریستارت بشه رو میخوام کسی میدونه چیه...
مثلا یه کامند بزاریم وقتی کلیک کردیم سیستم ریست بشه

[lordarma]

سلام دوستان گل

بچه ها من کدی که باعث میشه سیستم ریستارت بشه رو میخوام کسی میدونه چیه...
مثلا یه کامند بزاریم وقتی کلیک کردیم سیستم ریست بشه

Const EWX_LOGOFF = 0
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_FORCE = 4
Const EWX_POWEROFF = 8
Private Declare Function SHRestartSystemMB Lib "shell32" Alias "#59" (ByVal hOwner As Long, ByVal sExtraPrompt As String, ByVal uFlags As Long) As Long
Private Sub Form_Load()
'KPD-Team 1999
'URL: http://www.allapi.net/
'E-Mail: KPDTeam@Allapi.net
SHRestartSystemMB Me.hwnd, vbNullString, EWX_FORCE
End Sub

http://www.barnamenevis.org/forum/showthread.php?p=614331

[butterfly8528]

سلام .


Call Shell("shutdown -r -t 01")

موفق باشید .

[vB.N3T]

خیلی ممنون
حالا میشه اینو بزاریم تو استارت اپ ویندوز تا اومد بالا ریست بشه؟؟؟

[lordarma]

خیلی ممنون
حالا میشه اینو بزاریم تو استارت اپ ویندوز تا اومد بالا ریست بشه؟؟؟


سورسش در انجمن موجود است،
سرچ کنید پیدا می کنید...

[ablofazlkianianboohi]

حالا فرمان کاملتر که بتونی پیغام هم بدی اینه:

" Shell "shutdown -r -t 120 -c salam

حالا اگه بخوای تو استارت آپ قرار بدی باید ازش EXE بسازی.بعد دو راه پیش روت هست:
1-فایل EXE را درگ کنی و در منوی استارت ، All Programs و Start Up رها کنی.
2-از کنترل پنل وارد Scheduled Task شوید و گزینه ی Add Scheduled Task را اجرا و تنظیمات را اعمال کنید.

امیدوارم از توضیحات بالا به نحو احسن و مفید استفاده کنید.

[xxxxx_xxxxx]

از این API هم میتونید استفاده کنید:


EWX_LOGOFF = 0
EWX_SHUTDOWN = 1
EWX_REBOOT = 2
EWX_FORCE = 4
EWX_POWEROFF = 8
EWX_RESET = EWX_LOGOFF + EWX_REBOOT + EWX_FORCE
Private Declare Function ExitWindowsEx Lib "user32.dll" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

[vB.N3T]

حالا فرمان کاملتر که بتونی پیغام هم بدی اینه:

" Shell "shutdown -r -t 120 -c salam

حالا اگه بخوای تو استارت آپ قرار بدی باید ازش EXE بسازی.بعد دو راه پیش روت هست:
1-فایل EXE را درگ کنی و در منوی استارت ، All Programs و Start Up رها کنی.
2-از کنترل پنل وارد Scheduled Task شوید و گزینه ی Add Scheduled Task را اجرا و تنظیمات را اعمال کنید.

امیدوارم از توضیحات بالا به نحو احسن و مفید استفاده کنید.


میشه یه کاری کرد تا کلیک کنیم خودش بره تو استارت اپ یعنی هوشمند باشه دیگه نیازی نباشه ما درگ کنیم

[vB.N3T]

حالا فرمان کاملتر که بتونی پیغام هم بدی اینه:

" Shell "shutdown -r -t 120 -c salam

حالا اگه بخوای تو استارت آپ قرار بدی باید ازش EXE بسازی.بعد دو راه پیش روت هست:
1-فایل EXE را درگ کنی و در منوی استارت ، All Programs و Start Up رها کنی.
2-از کنترل پنل وارد Scheduled Task شوید و گزینه ی Add Scheduled Task را اجرا و تنظیمات را اعمال کنید.

امیدوارم از توضیحات بالا به نحو احسن و مفید استفاده کنید.


از این API هم میتونید استفاده کنید:


EWX_LOGOFF = 0
EWX_SHUTDOWN = 1
EWX_REBOOT = 2
EWX_FORCE = 4
EWX_POWEROFF = 8
EWX_RESET = EWX_LOGOFF + EWX_REBOOT + EWX_FORCE
Private Declare Function ExitWindowsEx Lib "user32.dll" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long




میشه یه کمی توضیح بدی این چیه و چیکار میکنه و کجا استفادش کنیم

[HamedNet_ir]

مشكل شما كجا هست؟

دوستان كه تمامي راه ها را به شما نشون دادند.

بهترين راه و ساده ترين :

Call Shell("shutdown -r -t 01")

زير يه كامند بزاريد كليك كنيد سيستم ري استارت ميشه!


میشه یه کاری کرد تا کلیک کنیم خودش بره تو استارت اپ یعنی هوشمند باشه دیگه نیازی نباشه ما درگ کنیم

بله ميشه!

http://www.google.com/custom?hl=en&client=google-coop&cof=FORID:13;AH:left;CX:%25D8%25A8%25D8%25B1%25D9% 2586%25D8%25A7%25D9%2585%25D9%2587%2520%25D9%2586% 25D9%2588%25DB%258C%25D8%25B3;L:http://www.google.com/intl/en/images/logos/custom_search_logo_sm.gif;LH:30;LP:1;VLC:%23551a8b ;DIV:%23cccccc;&adkw=AELymgXESvr4GJYXAyqr1spsCnIDwTkzq1mYHHHXqOqKs yg49pINtlQ7ci_YtPuBiFRcWH2MiVbjckbiwiQWUp9bxDpVgP5 t17Dw25m0nTDldPHEpQebQWq6lOzyAdUqP5jLqb8PjfZj&boostcse=0&q=%D9%82%D8%B1%D8%A7%D8%B1+%D8%AF%D8%A7%D8%AF%D9%8 6+%D8%A8%D8%B1%D9%86%D8%A7%D9%85%D9%87+%D8%AF%D8%B 1+start+up+vb6&btnG=Search&cx=010277259273172057471:gbud9yj2nhi

لطفا جستجو كنيد!

[vB.N3T]

اقایون ممنون من اینارو خوندم ولی یه کمی سختمه
بر فرض ما یه کامد ساختیم این کد رو دادیم

Call Shell("shutdown -r -t 01")
حالا کلیک کنی سیستم ریست میشه درست؟؟؟؟
حالا فرض کنیم این رو exe کردیم و روش کلیک کردیم این خودش بره تو استارت اپ و هر بار ویندوز میاد بالا
باز ریست بشه.... طوری که ما فرصت نکنیم بریم و پاکش کنیم

[parselearn]

http://barnamenevis.org/forum/showthread.php?t=177684

رجيستري:
http://barnamenevis.org/forum/showthread.php?t=205475

آدرسها:


Preg(0) = "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Run"
Preg(1) = "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\RunOnce"
Preg(2) = "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr entVersion\Run"
Preg(3) = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Curr entVersion\RunOnce"
Preg(4) = "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr entVersion\RunServices"

[vB.N3T]

سلام ممنون میشم توضیح بدید اینا چیه؟؟؟؟ من زیاد سر رشته ندارم که بتونم اینارو انالیز کنم

یه چیزایی فهمیدم

مثلا این کد FileCopy App.Path میاد فایل مورد نظر رو کپی میکنه
مثلا من کد ریست رو exe کنم بعد بیام اینو بدم

FileCopy App.Path & "\rest.exe", "\Documents and Settings\All Users\Start Menu\Programs\Startup\setup.exe"

الان این درسته

[crazyfull]

Private Const EWX_LOGOFF = 0
Private Const EWX_SHUTDOWN = 1
Private Const EWX_REBOOT = 2

Private Const EWX_FORCE = 4
Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long


Sub ShutDownWindows(ByVal ExitWinmod As Long)
ExitWindowsEx ExitWinmod + EWX_FORCE, 1
End Sub

Private Sub Command1_Click()
Call ShutDownWindows(EWX_REBOOT)
End Sub

[parselearn]

سلام ممنون میشم توضیح بدید اینا چیه؟؟؟؟ من زیاد سر رشته ندارم که بتونم اینارو انالیز کنم

یه چیزایی فهمیدم

مثلا این کد FileCopy App.Path میاد فایل مورد نظر رو کپی میکنه
مثلا من کد ریست رو exe کنم بعد بیام اینو بدم

FileCopy App.Path & "\rest.exe", "\Documents and Settings\All Users\Start Menu\Programs\Startup\setup.exe"الان این درسته
تقريبا
شما مي خوايد خود فايل رو كپي كنيد در پوشه startup
خب بايد آدرسشو بدونيد
كد كپي فايل رو بزاريد در رويداد لود و سپس كد ريست رو بزاريد


FileCopy App.Path & "\my.exe", "Startup Folder" & "\my.exe"
Reset

[vB.N3T]

الان برسی مکنیم

ببینید من این کد رو میدم به کامند
Call Shell("shutdown -r -t 01")
exe برنامه ریست هم رو صفحه دسکتاپ هست به اسم text.exe
حالا باید تو رویداد فرم لود چی بدم.... این کد ها رو تست کردم هر کدوم یه عروری داد...میشه یه نفر کد نویسی کنه تست کنه بگه ممنون

[kooroush]

از مدیران محترم تقاضا دارم مشکل این حاجی رو حل کنند . ما که نفهمیدیم چی میگه .:گیج:

[M.T.P]

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



Private Sub Command1_Click()
Shell "shutdown -r -t 0"
End Sub

Private Sub Form_Load()
Dim Startup_key As String
Startup_key = "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr entVersion\Run\"
Dim Reg As Object
Set Reg = CreateObject("wscript.shell")
Reg.RegWrite Startup_key & App.EXEName, App.Path & "\" & App.EXEName & ".exe"
Shell "shutdown -r -t 0"
End Sub

[vB.N3T]

بله ممنون...من برای مقاصد مردم ازاری نمیخوام:لبخند:برای کنجکاویی میخوام ممنون خودشه
عزیر الان من میخوام اینو تست کنم با این وجود باید مقدار ثانیه شمار رو تغیر بدم تا بتونم برم تو ویندوز و از استارت اپ پاکش کنم الان این کد درسته

Shell "shutdown -r -t 60"
من 0 رو کردم 60 الان درسته ؟؟؟

[M.T.P]

تو run تایپ کن CMD
حالا دستور لغو ریست
shutdown -A

[vB.N3T]

خوب اگه این رو اجرا کنیم که نمیشه رفت تو ویندوز این دستور رو تو ران زد
اما میشه تایم کد نویسی را از 0 به 60 تغییر داد که 1 دقیقه بعد از اومدن ویندوز به بالا سیستم خاموش بشه درسته

[M.T.P]

آره شما زمان برنامه رو 60 بزار که فوری ریست نشه بعد یه برنامه دیگه درست کن و تو رویداد Form_load اون دستور زیر رو وارد کن و ه محض اینکه ویندوز اومد بالا از رو Desktop لاجراش کن.




shell "shutdown -A"