1,453
社区成员
发帖
与我相关
我的任务
分享请问各位大哥，有没有用VB做的一个定时关机的.dll控件？
请问各位大哥，有没有用VB做的一个定时关机和重启的.dll控件？可以供ASP调用。如果没有，简单一点，能实现重启就行了。
...全文
请发表友善的回复…
发表回复
nudtdarkseed 2004-05-08
- 打赏
- 举报
shortppsy(小河) 的办法我经常用，不过先要检查程序是否可以安全退出了
muxi02 2004-05-08
- 打赏
- 举报
Private Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
private sub command1_click()
dim abc as long
abc=ExitWindwosEx(EWX_FORCE OR EWX_SHUTDOWN OR EWX_REBOOT,0)
End Sub
运行时就可以实现重启的功能
private sub command1_click()
dim abc as long
abc=ExitWindwosEx(EWX_FORCE OR EWX_SHUTDOWN OR EWX_REBOOT,0)
End Sub
运行时就可以实现重启的功能
xuminghua 2004-05-08
- 打赏
- 举报
Private Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
private sub command1_click()
dim abc as long
abc=ExitWindwosEx(EWX_FORCE OR EWX_SHUTDOWN OR EWX_REBOOT,0)
End Sub
这个好象只能多98有效哦
我有写了一DLL对98/ME/2000/XP都有效 邮箱
private sub command1_click()
dim abc as long
abc=ExitWindwosEx(EWX_FORCE OR EWX_SHUTDOWN OR EWX_REBOOT,0)
End Sub
这个好象只能多98有效哦
我有写了一DLL对98/ME/2000/XP都有效 邮箱
lzj34 2004-04-30
- 打赏
- 举报
API
WINDOWSEXIT（。。。。）
WINDOWSEXIT（。。。。）
ryuginka 2004-04-30
- 打赏
- 举报
up
kmzs 2004-04-29
- 打赏
- 举报
用不着吧。。。。。。。。。。。。
shortppsy 2004-04-29
- 打赏
- 举报
timer 控件检测时间是否达到关机时间
用rundll重启吧
call shell("c:\windows\rundll.exe user.exe,exitwindowsexec")
用rundll重启吧
call shell("c:\windows\rundll.exe user.exe,exitwindowsexec")
fanglanchun 2004-04-29
- 打赏
- 举报
想来学习
Rozre 2004-04-09
- 打赏
- 举报
没有做过，可以帮你试试
venursa 2004-04-09
- 打赏
- 举报
偶还不会写DLL,帮你UP一下....
ying1234 2004-04-09
- 打赏
- 举报
我刚刚学VB，还不会啊，你请把代码给我吗？我很急的，谢谢了。
daisy8675 2004-04-09
- 打赏
- 举报
自己寫個就可以啦
