{
e.Handled = true;
}还有一种办法就是不通过屏蔽热键来实现,就是通过设置焦点.你可以把你程序窗口设置为主焦点,这样其他程序一般就无法在你的程序前面了.实现屏蔽的作用.至于任务管理器的话可以通过杀掉进程的办法做到.如下: Process[] p = Process.GetProcesses(); foreach (Process p1 in p)
try
if (p1.ProcessName.ToLower().Trim() == "taskmgr")//这里判断是任务管理器
p1.Kill();
return;
}
catch
}}好了,全部的使用C#编写的,稍微改下就可以了,在,NET里面都差不多!
由于你要求的是能够动态的加载与卸载,所以这里选用了appdomain的load方法来加载一个程序集(同样的,卸载的时候调用appdomain的静态方法Unload即可).
另外由于,在appdomain.load的时候remoting会试图将程序集序列化到defaultdomain中去,这会产生问题,通常以一个"FileNotFoundException"结束,所以呢采用了一种折中的办法.
思路如下:
①建立一个新的程序集,里面包含一个轻量的类型,这个类型只包含一个用来加载程序集的公共方法;
源代码已经打包发给你了,
你看看吧~
如果有问题,再找我哈
设备:电脑
你既然喜欢编程,就应该认认真真的学习一门语言,学习微软的就先从VB开始,VB是比较好的入门语言,可视化的,比较简单,是非常好的入门语言.书籍最少应该准备两本,不可能一本书籍会包含VB的所有内容,在看书的时候,可以交叉的看,一本书籍中没有讲到的内容可以在另一本中看到,这样对学习是很有好处的,也能保证所学知识的完整性.学编程是一个很漫长的过程,不要着急,要理论与实践想结合,例程书籍也是很重要的,看源代码对学习也是很有帮助的,等你学完这门VB语言之后,学习别的语言是非常简单,可以尝试C语言,按照C——C++——VC的顺序学习,有助于知识的连贯性,我也希望你能学好的.
或者学习Delphi,入门较为简单类似于VB,但比VB强大,即可作为入门又能做强、做大
怎样学编程
①明确学习目的
学习编程对大多数IT业人员来说都是非常有用的.学编程,做一名编程人员,从个人角度讲,可以解决在软件使用中所遇到的问题,改进现有软件,可以为自己找到一份理想的工作添加重要得砝码,有利于在求职道路上谋得一个好的职位;从国家的角度,可以为中国的软件产业做出应有的贡献,一名优秀的程序员永远是被争夺的对象.学习编程还能锻炼思维,使我们的逻辑思维更加严密;能够不断享受到创新的乐趣,将一直有机会走在高科技的前沿,因为程序设计本身是一种创造性的工作.知识经济时代给我们带来了无限的机会,要想真正掌握计算机技术,并在IT行业里干出一番事业来,有所作为,具有一定的编程能力是一个基本条件和要求.
学编程要具备一定的基础,总结之有以下几方面:
(1)数学基础 从计算机发展和应用的历史来看计算机的数学模型和体系结构等都是有数学家提出的,最早的计算机也是为数值计算而设计的.所以呢,要学好计算机就要有一定的数学基础,出学者有高中水平就差不多了.
一本程序设计的书看到的无非就是变量、函数、条件语句、循环语句等概念,但要真正能进行编程应用,需要深入理解这些概念,在理解的基础上应用,不要只简单地学习语法、结构,而要吃透针对这些语法、结构的应用例子,做到举一反三,触类旁通.
学习一门语言或开发工具,语法结构、功能调用是次要的,最主要是学习它的思想.例如学习 VC 就要学习 Windows 的内在机理、什么是线程......;学习 COM 就要知道 VTALBE 、类厂、接口、idl......,关键是学一种思想,有了思想,那么我们就可以触类旁通.
掌握编程思想必须在编程实际工作中去实践和体会.编程起步阶段要经常自己动手设计程序,具体设计时不要拘泥于固定的思维方式,遇到问题要多想几种解决的方案.这就要多交流,各人的思维方式不同、角度各异,各有高招,通过交流可不断吸收别人的长处,丰富编程实践,帮助自己提高水平.亲自动手进行程序设计是创造性思维应用的体现,也是培养逻辑思维的好方法.
编程入门不难,但入门后不断学习是十分重要的,相对来说较为漫长.在此期间要注意养成一些良好的编程习惯.编程风格的好坏很大程度影响程序质量.良好的编程风格可以使程序结构清晰合理,且使程序代码便于维护.如代码的缩进编排、变量命令规则的一致性、代码的注释等.
学编程是符合"理论→实践→再理论→再实践"的一个认识过程.一开始要具有一定的计算机理论基础知识,包括编程所需的数学基础知识,具备了入门的条件,就可以开始编程的实践,从实践中可以发现问题需要加强计算机理论知识的再学习.程序人人皆可编,但当你发现编到一定程度很难再提高的时候,就要回头来学习一些计算机科学和数学基础理论.学过之后,很多以前遇到的问题都会迎刃而解,使人有豁然开朗之感.所以呢在学习编程的过程中要不断地针对应用中的困惑和问题深入学习数据结构、算法、计算机原理、编译原理、操作系统原理、软件工程等计算机科学的理论基础和数理逻辑、代数系统、图论、离散数学等数学理论基础知识.这样经过不断的学习,再努力地实践,编程水平一定会不断提高到一个新高度.
(一) COPY文件复制命令
①..功能:拷贝一个或多个文件到指定盘上.
(1)COPY是文件对文件的方式复制数据,复制前目标盘必须已经格式化;
(10)注意:COPY命令的使用格式,源文件名与目标文件名之间必须有空格!
DOS时代,Copy命令恐怕是最受欢迎也最常用一个DOS内部命令,但在Windows横行的今天,它渐渐被用户遗忘,似乎变得可有可无.其实这个命令远远不止"拷贝"这么简单,好好利用它,会收到意想不到的效果.
用Copy将秘密藏在别人肚子里
DOS的Copy命令可以将几个同类型的文件合并成一个文件,比如:多个.txt文件,其实通过它还能将一个文本文件合并到一个非文本文件中,实现隐藏秘密的效果.比如你在D盘根目录有一个重要的文本文件:001.txt,想对其进行隐藏.
同样道理,你可以把文件藏进图片、WAV声音文件,甚至还能在Word、Excel等文档中藏进秘密,比如:
Copy wanfei.jpg/b + 001.txt/a wanfei-1.jpg(把001.txt藏进wanfei-1.jpg图片)
Copy wanfei.doc/b + 001.txt/a wanfei-1.doc(把001.txt藏进wanfei-1.doc文档)
Copy wanfei.wav/b + 001.txt/a wanfei-1.wav(把001.txt藏进wanfei-1.wav文件)
Copy wanfei.exe/b+ 001.txt/a wanfei-1.exe(把001.txt藏进wanfei-1.exe文件)
★ShellExecute函数和Shell函数:打开外部程序
ShellExecute函数
'声明
(ByVal hWnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
'命令语句
Private Sub Command1_Click()
Dim lR As Long
lR = ShellExecute(Me.hWnd, "Open", sFile, "", "", vbNormalFocus)
End Sub
本函数还可以用来连接到网页:
ShellExecute 0, vbNullString, "", vbNullString, vbNullString, vbNormalFocus
或者这样写来发送Email:
另外有ShellExecute的替代用法,更加简单实用,不用API,一句Shell搞定!
连接到网页:
打开文件:
Shell函数
运行一个可执行程序,并且如果该程序仍然在运行,则返回一个包含该程序的进程 ID 的整数.
Public Function Shell( _
ByVal Pathname As String, _
Optional ByVal Style As AppWinStyle = AppWinStyle.MinimizedFocus, _
Optional ByVal Wait As Boolean = False, _
Optional ByVal Timeout As Integer = -1 _
) As Integer
格式:Shell(Pathname, Style As AppWinStyle, Wait, Timeout)
参数:
△Pathname
必选项.字符串.要执行的程序名以及任何需要的参数和命令行开关.Pathname 还可以包括驱动器和目录路径或文件夹.
△Style
可选项.AppWinStyle.从 AppWinStyle 枚举中选择的值,该枚举与要在其中运行程序的窗口样式相对应.如果省略 Style,则 Shell 使用 AppWinStyle.MinimizedFocus,这将使程序以最小化启动并具有焦点.
Style 参数可以有以下设置之一:
AppWinStyle.Hide 隐藏窗口并为隐藏的窗口提供焦点.
AppWinStyle.NormalFocus 为窗口提供焦点,并以最近的大小和位置显示窗口.
AppWinStyle.MinimizedFocus 为窗口提供焦点,并以图标的形式显示窗口.
AppWinStyle.MaximizedFocus 为窗口提供焦点,并以全屏方式显示窗口.
AppWinStyle.NormalNoFocus 将窗口设置为最近的大小和位置.当前活动窗口保持焦点.
AppWinStyle.MinimizedNoFocus 以图标的形式显示窗口.当前活动窗口保持焦点.
△Wait
可选项.Boolean.指示 Shell 函数是否应等待程序完成的值.如果省略 Wait,则 Shell 使用 False.
△Timeout
可选项.Integer.Wait 为 True 时等待完成的毫秒数.如果省略 Timeout,则 Shell 使用 -1,表示没有超时,Shell 直到程序完成时才返回.所以呢,如果省略 Timeout 或将它设置为 -1,则 Shell 可能永远不会将控制返回给程序.
异常/错误
异常类型 错误号 条件
备注
Shell 函数的返回值取决于 Pathname 中指定的程序在 Shell 返回时是否仍在执行.如果将 Wait 设置为 True 并且程序在超时过期前结束,Shell 返回零.如果超时过期或者省略 Wait 或将它设置为 False,则 Shell 返回程序的进程 ID.进程 ID 是标识正在运行的程序的唯一数字.
默认情况下,Shell 函数异步运行程序.这意味着用 Shell 函数启动的程序在 Shell 函数后面的语句执行前可能没有结束执行.如果想等待程序结束后再继续,请将 Wait 设置为 True.
整个路径和文件规范应该始终用引号引起来,如以下示例所示:
ID = Shell("""C:\Program Files\MyFile.exe"" -a -q", , True, 100000)
字符串内每对相邻的双引号 ("") 被解释为字符串中的一个双引号字符.所以呢,前面的示例表示 Shell 函数的下列字符串:
"C:\Program Files\MyFile.exe" -a -q
如果路径没有用引号引起来,Windows 就会在 C:\ 目录中查找名为 Program.exe 的文件,而不是在 C:\Program Files 目录中查找 MyFile.exe 文件.
安全说明 如果路径和文件规范没有用引号引起来,那么当文件名或路径节点包含空格时,就会出现安全风险.在上面土嘎嘎给出的例子源码中,路径节点 \Program Files 包含一个空格.如果规范不在引号中,并且名为 Program.exe 的程序(例如通过非法的破坏)安装在 C:\ 中,Windows 就会执行 Program.exe 程序而不是 MyFile.exe.
安全说明 Shell 函数需要非托管代码权限,这可能会对它在部分信任情况下的执行产生影响.有关更多信息,请参见 SecurityPermission 类和代码访问权限.
示例
本示例使用 Shell 函数运行一个用户指定的应用程序.通过将 AppWinStyle.NormalFocus 指定为第二个参数,以正常大小打开应用程序并为它提供焦点.
Dim ProcID As Integer
' Run Calculator.
' The preceding path is for Windows XP;
另,shell函数无须声明,例:
Option Explicit
Shell ("D:\Program Files\WinRAR\winrar.exe")
调用Shell函数可以执行外部可执行文件,其扩展名如.exe 、.com、.bat或.pif,缺省扩展名为.exe.不能执行操作系统内部命令及所有非执行文件(如文档),否则将显示出错信息
VB 中,常以Shell指令来执行外部程式,然而它在Create该外部process 后,立刻就会回到vb 的下一行程式,无法做到等待该Process结束时,才执行下一行指令,或是说,无法得知该Process是否已结束,甚者,该Process执行到一半,又该如何中止其执行等等,这些都不是Shell指令所能控制的,所以呢我们需使API的帮助来完成.
第一个问题,如何等待shell所Create的process结束后才往后执行vb的程式.
首先要知道的是,每个Process有唯一的一个ProcessID,这是OS给定的,用来区别每个 Process,这个Process ID(PID)主要可用来取得该Process相对应的一些资讯,然而要对该Process的控制,却大多透过 Process Handle(hProcess).VB Shell指令的传回值是PID,而非hProcess,所以我们需透过OpenProcess这个API来取得 hProcess而OpenProcess()的第一个参数,指的是所取得的hProcess所具有的
能力,像 PROCESS_QUERY_INFORMATION 便是让GetExitCode()可取得hProcess所指的process之状态,而PROCESS_TERMINATE,便是让TerminateProcess(hProcess..)的指令能够生效,也就是说,不同参数设定,使hProcess所具有的权限、能力有所不同.取得 hProcess后便可以使用WaitForSingleObject()来等待hProcess状态的改变,也就是说,它会等待 hProcess所指的process执行完,这个指令才结束,它
第二个参数所指的是 WaitForSingleObject()所要等待的时间(in milliseconds ),如果超过所指的时间,就TimeOut而结束WaitForSingleObject()的等待.若要它无限的等下去,就设定为INFINITE.
hProcess = OpenProcess(PROCESS_QUERY_INFORMATION, 0, pid)
ExitEvent = WaitForSingleObject(hProcess, INFINITE)
Call CloseHandle(hProcess)
Dim pid As Long
isDone = False
Do
Call GetExitCodeProcess(hProcess, ExitCode)
Debug.Print ExitCode
DoEvents
Loop While ExitCode = STILL_ALIVE
isDone = True
另外,如果您的shell所Create的程式,有视窗且为立刻Focus者,可另外用以下的方式
Loop
而如何强迫shell所Create的process结束呢,那便是
Dim aa As Long
If hProcess 0 Then
End If
Debug.print ExitCode
另外,有人使用Shell来执行.bat档,即:
pid = Shell("c:\aa.bat", vbNormalFocus)
可是却遇上aa.bat结束了,但ms-dos的Window却仍活着,那可以用以下的方式来做
pid = Shell("c:\command.com /c c:\aa.bat", vbNormalFocus)
那是执行Command.com,而Command.com指定执行c:\aa.bat 而且结束时自动Close
所有程式如下:
Const INFINITE = HFFFF
Private ExitCode As Long
Private hProcess As Long
Private isDone As Long
Dim ExitEvent As Long
Shell "c:\command.com /c c:\aa.bat", vbNormalFocus ' vbHide)
把Task scheduler改为:
""Task scheduler""
两边都加两个双引号
即Shell "net start ""Task scheduler"""
以上就是土嘎嘎小编大虾米为大家整理的相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!