Reader's Digest

Digest your Internet

Archive for the 'Programming Area' Category

VB程序实现WindowsXP效果的界面

虽然WindowsXP的界面非常华丽。但是令人遗憾的是,我们用VB写的程序除了菜单和窗口的外观是XP风格外,其他控件还是一如既往的是普通风格。我想,有的程序在XP下有XP的风格,VB也一定有办法实现XP的风格。后来笔者在网上看到一篇介绍XML的文章,又在网上找到了一篇实现XP风格的文章,经过自己的实践,终于找到了VB程序实现XP风格的办法。为了使其他的网友不至于走像我这样的多的弯路,将此办法写出来,与大家共同提高!! 具体的实现方法如下: ①:在你的窗体加入代码。如果是多个窗口,可以将此代码放到模块中。 代码如下: ‘声明API函数 Private Declare Sub InitCommonControls Lib “comctl32.dll” () Private Sub Form_Initialize() InitCommonControls End Sub 注意:千万不要在Form_load()事件下写InitCommonControls这句话,否则你的窗体会启动不了。(不要怪我没告诉你啊~~~~) ②:建立一个和你的.exe同名的.exe.manifest文件(假如:如果你最后编译好的文件名为WindowXPStyle.exe,则建立一个文件名为WindowXPStyle.exe.manifest的文件),并且此文件必须存在于和你Exe文件的同一目录下。 以WindowXPStyle.exe为例,则这个WindowXPStyle.exe.manifest的文件的内容如下: ‘Your application description here. 将以上内容保存为WindowXPStyle.exe.manifest。并且和执行文件放在一个目录下(一定要记住)。

Read the rest of this entry »

浅谈VB6逆向工程

VB的编译有两种方式,一种是P-Code方式,一种是本机代码。P_Code方式是VB从早期版本保留下来的,也是比较难逆向的一种。而本机代码方式编译的程序已经和VC很接近了。这里只探讨以本机代码方式编译的程序。由于微软在VB的实现方面的资料很少,使人觉得VB的逆向比较难。其实掌握一些规律,VB的程序还是很容易入门的。 浅谈VB6逆向工程 1. 从简单变量的实现开始 一个VB简单变量的表示至少需要12个字节。通常前2个字节是表示类型信息的。 从第5个字节到第8个字节并不总是使用到,实际上很少被使用。我们不妨先叫它 辅助类型信息。从第9个字节开始就是真正的变量的值了。这里有可能存储一个指针 值,也可能是数据,具体是什么取决于变量类型。 另一个值得注意的事实是VB的内存是以4个字节对齐的。即使你使用一个字节, 那至少也要4个字节来表示。而且编译器只初始化它需要的那些字节,剩余的字节 可能是随机数据。下面我们将会看到这些。 想弄明白编译器在内部怎么实现的,最好的方法就是编一段程序跟踪运行看看。 我编写的代码如下: Dim a, i As Byte Dim b, j As Integer Dim c, k As Long Dim d, l As Boolean Dim e, m As String Dim f, n As Date Dim g, o As Double Dim h, p As Single a = […]

Read the rest of this entry »

Rundll.exe 命令详解

常用Windows9x的朋友一定对Rundll32.exe和Rundll.exe这两个档案不 会陌生吧,不过,由於这两个程式的功能原先只限於在微软内部使用,因而真正知道如何使用它们的朋友想必不多。那麽好,如果你还不清楚的话,那麽 就让我来告诉你吧。 首先,请你做个小实验(请事先保存好你正在执行的程式的结果,否则…)∶ 点击“开始-程式-Ms-Dos方式”,进入Dos视窗,然後键入 “rundll32.exe user.exe,restartwindows”,再按下回车键,这时你将看到,机器被重启了!怎麽样,是不是很有趣? 当然,Rundll的功能绝不仅仅是重启你的机器。其实,Rundll者,顾名思义,执行Dll也,它的功能就是以命令列的方式呼叫Windows的动态链结库, Rundll32.exe与Rundll.exe的区别就在於前者是呼叫32位的链结库,而後者是运用於16位的链结库,它们的命令格式是∶ RUNDLL.EXE ,, 这里要注意三点∶1.Dll档案名中不能含有空格,比如该档案位於 c: \Program Files目录,你要把这个路径改成c: \Progra~1;2.Dll档案名与Dll 入口点间的逗号不能少,否则程式将出错并且不会给出任何资讯!3.这是最重要的一点∶Rundll不能用来呼叫含返回值参数的Dll,例如Win32API中的GetUserName(), GetTextFace()等。在Visual Basic中,提供了一条执行外部程式的指Shell,格式为∶ Shell “命令列” 如果能配合Rundll32.exe用好Shell指令,会使您的VB程式拥有用其他方法难以甚至无法实现的效果∶仍以重启为例,传统的方法需要你在VB工程中先建立一个模组,然後写入WinAPI的声明,最後才能在程式中呼叫。而现在只需一句: Shell “rundll32.exe user.exe,restartwindows”就搞定了!是不是方便 多了? 实际上,Rundll32.exe在呼叫各种Windows控制面板和系统选项方面有着独特的优势。下面,我就将本人在因特网上收集的有关Rundll的指令列举如下(很有用的,能省去你很多呼叫Windows API的时间!!),供大家在程式设计中引用∶ 命令列: rundll32.exe shell32.dll,Control_RunDLL 功能: 显示控制面板 命令列: rundll32.exe shell32.dll,Control_RunDLL access.cpl,,1 功能: 显示“控制面板-辅助选项-键盘”选项视窗 命令列: rundll32.exe shell32.dll,Control_RunDLL access.cpl,,2 功能: 显示“控制面板-辅助选项-声音”选项视窗 命令列: rundll32.exe shell32.dll,Control_RunDLL access.cpl,,3 功能: 显示“控制面板-辅助选项-显示”选项视窗 命令列: rundll32.exe shell32.dll,Control_RunDLL access.cpl,,4 […]

Read the rest of this entry »