说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

关于定时关机时出现的问题

编辑:说三道四文库 发布时间:2017-01-19 06:56
HTML文档下载 WORD文档下载 PDF文档下载
我在编写定时关机时,有时遇到别的程序优先级很高,会报出错误,比如说窗口handle error ,请高手告诉之。
NT下要先得到权限的,相关的例子很多,找找就能有一大把
FAQ 里的!


==========================================================================
Declare  Function  AdjustTokenPrivileges  Lib  "advapi32.dll"  Alias  "AdjustTokenPrivileges"  (ByVal  TokenHandle  As  Long,  ByVal  DisableAllPrivileges  As  Long,  NewState  As  TOKEN_PRIVILEGES,  ByVal  BufferLength  As  Long,  PreviousState  As  TOKEN_PRIVILEGES,  ReturnLength  As  Long)  As  Long  
 
Declare  Function  OpenProcessToken  Lib  "advapi32.dll"  Alias  "OpenProcessToken"  (ByVal  ProcessHandle  As  Long,  ByVal  DesiredAccess  As  Long,  TokenHandle  As  Long)  As  Long  
 
这是一个例子:  
Option  Explicit    
 
Private  Type  LUID  
UsedPart  As  Long  
IgnoredForNowHigh32BitPart  As  Long  
End  Type    
 
Private  Type  TOKEN_PRIVILEGES  
PrivilegeCount  As  Long  
TheLuid  As  LUID  
Attributes  As  Long  
End  Type    
 
'Beginning  of  Code  
 
Private  Const  EWX_SHUTDOWN  As  Long  =  1  
Private  Const  EWX_FORCE  As  Long  =  4  
Private  Const  EWX_REBOOT  =  2    
   
 
Private  Declare  Function  ExitWindowsEx  Lib  "user32"  (  _  
ByVal  dwOptions  As  Long,  ByVal  dwReserved  As  Long)  As  Long      
 
Private  Declare  Function  GetCurrentProcess  Lib  "kernel32"  ()  As  Long  
 
Private  Declare  Function  OpenProcessToken  Lib  "advapi32"  (  _  
ByVal  ProcessHandle  As  Long,  ByVal  DesiredAccess  As  Long,  _  
TokenHandle  As  Long)  As  Long  
 
Private  Declare  Function  LookupPrivilegeValue  Lib  "advapi32"  _  
Alias  "LookupPrivilegeValueA"  (ByVal  lpSystemName  As  String,  _  
ByVal  lpName  As  String,  lpLuid  As  LUID)  As  Long  
 
Private  Declare  Function  AdjustTokenPrivileges  Lib  "advapi32"  (  _  
ByVal  TokenHandle  As  Long,  ByVal  DisableAllPrivileges  As  Long,  _  
NewState  As  TOKEN_PRIVILEGES,  ByVal  BufferLength  As  Long,  _  
PreviousState  As  TOKEN_PRIVILEGES,  ReturnLength  As  Long)  As  Long  
 
 
Private  Sub  AdjustToken()    
 
Const  TOKEN_ADJUST_PRIVILEGES  =  &H20  
Const  TOKEN_QUERY  =  &H8  
Const  SE_PRIVILEGE_ENABLED  =  &H2  
 
Dim  hdlProcessHandle  As  Long  
Dim  hdlTokenHandle  As  Long  
Dim  tmpLuid  As  LUID  
Dim  tkp  As  TOKEN_PRIVILEGES  
Dim  tkpNewButIgnored  As  TOKEN_PRIVILEGES  
Dim  lBufferNeeded  As  Long    
 
hdlProcessHandle  =  GetCurrentProcess()  
 
OpenProcessToken  hdlProcessHandle,  (TOKEN_ADJUST_PRIVILEGES  Or  _  
TOKEN_QUERY),  hdlTokenHandle    
 
'  Get  the  LUID  for  shutdown  privilege.  
 
LookupPrivilegeValue  "",  "SeShutdownPrivilege",  tmpLuid    
tkp.PrivilegeCount  =  1  '  One  privilege  to  set  
tkp.TheLuid  =  tmpLuid  
tkp.Attributes  =  SE_PRIVILEGE_ENABLED    
'  Enable  the  shutdown  privilege  in  the  access  token  of  this  
'  process.  
AdjustTokenPrivileges  hdlTokenHandle,  False,  tkp,  _  
Len(tkpNewButIgnored),  tkpNewButIgnored,  lBufferNeeded    
End  Sub    
 
Private  Sub  cmdForceShutdown_Click()  
       AdjustToken  
       ExitWindowsEx  (EWX_SHUTDOWN  Or  EWX_FORCE  Or  EWX_REBOOT),  &HFFFF  
End  Sub  
 
VB.NET或C#将DataSet快速导出到Excel中 HashSet的equals和hashCode重写问题 PendingIntent实现原理和代码 IntentService实现原理及内部代码 AsyncTask实现原理和内部代码 Neither user nor current process错误 ListView的右边滚动滑块启用方法 Live Wallpaper动态壁纸开发 控制软键盘显示和隐藏 设置Activity大小不再全屏原理 Android面试题,看看你基础如何? Android Canvas绘图抗锯齿解决方法 Android xliff和字符串资源 android.hardware.USB类介绍 Android开发经验谈之应用间数据共享 android_asset这个URL详细使用方法 Android 2.3系统自带高清UI图标下载 设置ScrollView滚动条的颜色 WakeLock使用方法示例代码 Concurrent并发库常见问题总结 Android数据库SQLite性能优化技巧 Android开发之Java设计模式基础篇 Android开发之Java设计模式入门篇 Android开发之Java设计模式 Android开发之Java并发包集合类性能分析 Android开发之Java集合类性能分析 Android开发之Java虚拟机原理和内存分配 Android开发之Java基础系列教程目录 Android Theme主题样式开发注意点 Android 3.0开发用的平板推荐 android.resource://这个Uri你知道吗 哪位仁兄知道如何打包delphi开发的sybase客户程序,最高78分奉送 一个关于OnDraw()的重绘问题,急急急急急急急! 新手的问题! dll调问题???VB调用VC++的DLL需要返回值时,DLL如何定义?VB调用函数如何定义??? 各位大虾 谁能提供视频采集卡的原代码,必须要CB的,300分 在堆(heap)上与在栈(stack)上建立的对象有什么区别? 一个问题,在做元件时怎样建立TdateTimePicker 给大家看看我弟弟给我的信 求助,标题栏为“The police are investigating the robbery-"的是什么程序? 谁能将.CPP文件的代码翻译成DELPHI语言?? 有关于FLASH5.0的问题!!!请各位大吓指点! 一个问题,怎样在PC:PageControl上增加TabSheet1,TabSheet1,TabSheet1…. 标题栏为“The police are investigating the robbery-"的是什么程序? 一个弱弱的问题 一个问题,建立的 FB: TBevel没显示,好象根本没建立一样。 如何在 MDI CLIENT 中添加快捷方式??谢谢!! 55分,如何映射控件中子控件的消息? 如何选择书 关于文献数据库的一个问题-如何把一个字段和一个文件关联起来? 所有喜欢到水园来逛逛,但是从不回帖子或很少回帖子的人进来签到~~~~ 谁来救救我呀,我好惨呀。。。。 如何通过VC编程,随时关闭网络端口 诚寻对嵌入式linux感兴趣的网友 今天临走前,再灌一桶酒! 急!!!哪里可以下载到制作工具栏时用到的位图呀? 太原的在哪能买到程序员杂志 我的qq:10120129 谁找我??? xml 高手帮帮我,为什么我下面的文件,在IE5.0中什么也没有?? 请问高手:在uml类图中如何用关系表示一个实体类和一个接口间的关系。 Cathy进来~~ 请问高手们一个Delphi的一个应该是比较底层的东西。 mimi大酒店正式開業﹗先進來的有分啊﹗ 哪个高手完整地讲讲OpenWith菜单项的调用方法和函数等 关于非模态对话框中使用UpdateData(FALSE)函数的问题,朋友,帮个忙好吗? “记事本”小问题,大逻辑.大虾们,照顾照顾小弟呗. Linux下配置ISDN--期待所有的Linux高手到来?? 我是女生,哈哈 急,怎么样在打印表格时使较长的字段分两行显示,并字体变小。 在VB里做的用户控件为什么在VC不能调用啊! 不服不行(真没辙了)[不够可在加200分] 我的代理怎么了? 寻找能显示CAD图纸的delphi控件 偶要给lastlove(☆☆☆☆☆robin★★★★★)放高利贷了! 哪位做过读取网卡地址的动态链接库? c++builder与sql server 2000的sql语言兼容性问题 为什么TWaitThread的帮助在help里找不到? 有关WIN2K策略的设置? TREEVIEW中如何打印结构树? 急急急!opensheet(w_child,w_main,2,Original!)不好使了?为啥? 100分求教,存储过程的两个问题! 物理和智商有关系么,为什么有些女生物理好但是数学不好呢 一个如图所示的不规则形铁片,其缺口边界是口宽4分米,深2分米(顶点至两端点A,B所在直线的距离)的抛物线的一部分,先要将其缺口边界裁剪为等腰梯形.(1)若保持其缺口宽度不变,求裁剪 如图,已知正方形ABCD边长为1cm,点E在对角线BD上,BE=BC,P是CE上一动点,PF⊥BD,PG⊥BC,PF+PG的值为 高中物理学不好是不是和智商有关系?是或者不是.不要听什么假安慰的话那有没有改进的方法? 求解啊 数学大神速度来 这是怎么解出来v的 我写出来的始终是分数形式 i e或者l都约不了 帮忙找一些物理方面的智力问答题,RT要的,至少20道吧…… 数学第15,16题. 数学大神求救格式与方法 为什么1+1+2 不等于三谢谢了, 16题, (1-3分之1)乘(1-4分之1)乘(1-5分之1)乘……乘(1-2009分之1)乘2009找规律,巧计算,求算式 2/(√3-1)等于多少谢谢了, 第15,16题 1/1乘3+1/3乘5+1/5乘7+.1/2007乘2009 (2)(3)求大神 16题 24分之3乘以20等于多少 数学大神请入3+6+9+……+3n=? 数学习题,必好评,15,16 816乘以3约等于多少 1加1在什么时后会等于3大神们帮帮忙 第15,16两题, 22度16分乘以5等于多少 有1、2、3、4四个数 2 的出现几率是1的一半、3的出现几率是2的一半、4的出现几率是3的一半.1、2、3、4 的出现几率加一起等于1(100%)那么1、2、3、4的出现几率各是多少 公式是什么?同理5个 一加一可以不等于二,一加一可以等于三吗? 15、16两题 我的神 我的神把两个式子相加得到:a3+a7-a10+a11-a4=12=a3+a11-(a10+a4)+a7=12 因为a3+a11=a10+a4所以 要是-(a10+a4)+ a3+a11那就=0了 所以就是0+a7=12 然后…… 然后就求出来了.问;为什么不能用3+7-10=0 11-4-7 求大神解这两道题,原谅我数学不好…详细请看图 15和16两题 龟与神赛跑的数学问题叫什么之论?龟与神赛跑,神先让龟跑一段距离,然后神再追.问神能否追上.答案是实际神能追上,理论追不上龟. 寻极度无聊IQ题必须系搞笑的!例如铁甲无敌奖门人之类嘎 10个以上才要!多1个+给1分 15和16两题谢谢 神才能做的高一数学难题数列{10^(n/11)}前n项之积大于10^5的最小正整数n=?(最好有过程,感激不尽!) 大神救我QAQ[请原谅我这捉鸡的智商,诶我居然没有把图放上去.. 求15,16两题, we want to know in____ case people's hidden consciousness can be developedA which B that C whose D what为什么不选A啊 2 Albert Einstein was the first man_____the great amount of energy locked in theatomA to realize B realize C realized D having 极度无聊IQ题:有一日,小明去饮酒,饮到好夜,于是就在沙发睡觉.第二日小明妈妈就报警,这是为什么? 考研数学课本重要还是习题册重要 CAD请问这个几何图形怎么做啊,想了几天了,求大神们回答,外形差不多这样,已知道尺寸. 求 的一道超级难题 智商高的来做一做 阅读短文 回答问题(18分)松树与紫藤松树与紫藤同在山坡下生长,一天,紫藤以鄙视的口气说:“小松鼠,你怎么长成这个样子,像一根木桩,孤零零的,多 关于2009年数学一考研真题第17题求助,数一17题第二问说求体积,那个就是用锥体的体积减去椭球体的一部分,这部分的求法很多,我是想用二重积分曲顶柱体的体积算法,即把x解出来,然后做积分, 英语翻译 2.06千米为什么等于2千米60米?为什么2.06千米等于2千米60米? 如图,第一步,和第二步的依据是什么啊?好像没有相应的定理吧? 12个9加减乘除等于1212,急…… 1+1为啥等于2? 10----16题怎么写? 1-3-7-5加减乘除怎么得24? 1+1会等于2吗?求大神帮助 判断题:1.如果甲数的三分之二大于乙数的四分之三(甲乙都不等于0),那么甲数小于乙数.(为什么错?)2.体积相等的两个长方体,他们的表面一定相等.为什么错?1.a是一个大于0,而不大于1的数, 分数加减乘除法的意义和整数加减乘除法的意义有什么不同问答题 观察下列算式:2的一次方=2,2的2次方=4,2的三次方=8...用你所发现的规律写出2的2012次方的个位数字是多少? ..数学14、15、16题求讲解 将八个8用加减乘除等运算符连起来,怎么得到1000? 用适当的方法做, 过程完整点 一次数学小测验中,有一道这样的填空题:0.3= ————%.小丽在横线上填了30%,而老师却判小丽填错了,小丽不服,去找老师问个究竟.请聪明的你评评小丽答对了吗,为什么? 我智商130左右,但为什么还是学不好数学和物理啊.做了许多测试,智商在130左右.其中一种测试中显示我右脑智商70+,左脑智商50+.数学和物理是用的哪个脑? 设公差不为0的等差数列an的首项为1,且a6=a2^2,求数列an的通项公式,若bn满足bn=nan+5n,求{1/bn}的前n项和Tn 这题怎么写、、求数学大神
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn