VB黑客编程基础
一. 调用系统“创建快捷方式”向导
是否为VB不支持创建快捷方式而于着急呢?,但它是为安装程序设计的,快捷方式的默认路径总是从当前用户的“\Start Menu\Programs”开始,也就是说,如果您的Windows95装在C盘上,您无法通过 fCreateShellLink函数把快捷方式创建到D盘上去。
现在,给大家介绍一种极为方便、巧妙的方法: 用Shell语句调用系统“创建快捷方式”向导。
新建一个项目,在窗体上放一个按钮,双击此按钮,加入以下代码:
Private mand1_Click()
Open & "\" For Output As #1
Close #1 '以上两句在程序所在目录建立一个临时文件
Shell " ,NewLinkHere
"& & "\"
End Sub
(注意:Shell语句中NewLinkHere后面跟着一个空格才是引号,否则将出错。)
运行程序,按一下命令按钮,怎么样?“创建快捷方式”向导出现了,如果创建成功,,如果选取消, 也会自动消失。当然,您可以在硬盘的任意位置建立 。好,现在又可以为您的程序增添一项新功能了。Enjoy!
二.
我们知道,用Shell语句只能调用可执行文件,即、bat和pif文件,有时我们想要调用其他一些系统功能该怎么办呢?此时,Windows提供的 。下面我们来认识一下这些用法,也许会给您带来一点惊喜。
(),只需运行如下代码:
Shell "
,Control_RunDLL "
至于打开其他控制面板文件,相信您一定能够举一反三,尝试一下,换个文件名就成了。
(*.lnk)则可以用以下代码:
She11 " , FileProtocolHandler X" (X代表要运行的文件,包括路径,下同。
3. 也可以这样写来打开ActiveMovie控制:
Shell " ,Rundll",1
而用Shell " ,Rundll /play X",1 将直接播放媒体文件。
4. Shell " ,InstallScreenSaver X”当然是安装屏幕保护啦,如果你写了一个屏幕保护程序,那么可以在安装程序中写上它,而不一定要装到system目录下。顺便提一下,VB不是自捞一个“Application Setup Wizard”么?它的VB源代码都在安装目录下的“\setupkit\setup1”中放着呢,好好把它研究一下。你完全能做出富有个性的安装程序来。
,右击某一文件,菜单中会出现“打开方式”选项,这也许已不是什么秘密。但现在, 用shell " OpenAs_RunDLL X" 便能直接调用“打开方式”框。
6. 甚至能用这样一句来打印文件(包括HTML所支持的所有文本与图像格式):
Shell " ,PrintHTML X”, 1
怎么样?是不是小有收获呢?这下,您一定会对 ,它可是系统运行必不可少的部件呢!其实 Shell+Rundll32还能调用其他许多系统功能,比如关方面的。如果您有兴趣,可以到往册表的“我的电脑\HKEY_CLASSES_ROOT\”或“我的电脑\HKEY_LOCAL_MACHINE\Software\CLASSES”下去看看,本文的内容大都是从那里“抄”来的。只要有足够的决心、信心、耐心,您一定能发现更多有价值的东西。Good luck!
主要也就/?BoardID=0&ErrCodes=60,60&action= 再起作用程序所有代码仅此两段 Private mand1_Click() (
vb黑客木马编程(精选大全)(免费) 来自淘豆网www.taodocs.com转载请标明出处.