采用VB编写的动态链接库(ActiveX DLL)
◆请由此确定是否被恶意修改◆
作者：我心飞翔
VB中引入本DLL的方法
方法一：选择“工程(P)”菜单下的“引用(N)”，在出现的对话框中点“浏览按钮”，并找到DLL所在位置。
方法二：分两步走
(1)注册动态链接库，使用regsvr32命令。在运行对话框中，输入“regsvr32 DLL完整路径”。
(2)选择“工程(P)”菜单下的“引用(N)”，在出现的对话框中,直接在列表中找“Swpi Zy DLL 1.0.1(v2005.01.23)”
★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
封装函数过程一览表----按照分类及字母顺序
◆封装的10个过程，没有返回值◆
01、AboutAndHelp-----显示帮助信息
02、ExitOs-----------注销、重启和关机
03、KillApplication--关闭指定应用程序
04、OpenUrlOfEmail---根据指定Email地址，调用邮件工具
05、OpenUrlOfFile----根据指定本地路径，打开一个文件
06、OpenUrlOfHttp----根据指定Http地址，调用默认浏览器
07、SetCdRomClosed---关上光盘驱动器
08、SetCdRomOpen-----弹开光盘驱动器
09、SetWindowTopMost-将窗口置于最顶层
10、ShowMousePointer-显示或者隐藏鼠标指针
●封装的10个函数，有其返回值●
11、AddAppToAutorun--将指定应用程序设置为开机自运行
12、DecodeData-------对EncodeData加密后的数据进行解密
13、EncodeData-------对给定的字符串进行Base64算法的加密
14、GetCompName------获取本地计算机名字
15、GetCurrUser------获取当前登录用户名
16、GetSysDir--------获取系统所在目录
17、GetWinDir--------获取Windows所在目录
18、PlayWavSound-----播放wav格式的音频文件
19、SetDesktopStatus-显示或者隐藏桌面
20、ShowControlPanel-显示控制面板中的部分项
★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
─────────────────
VB中用本DLL封装类创建对象的语句
Dim zyObj As New prjSwpiZy.clsZy
为了执行效率，最好将Dim和New分开。下面是实际调用DLL中函数的演示
Dim zyObj As prjSwpiZy.clsZy '定义
Set zyObj = New prjSwpiZy.clsZy '实例化
zyObj.OpenUrlOfHttp ("www.niit.com.cn") '调用
Set zyObj = Nothing '释放
─────────────────
VC中用本DLL的一些关�
相关文档：
Private Declare Function ClipCursor Lib "user32" (lpRect As Any) As Long
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Private Sub Command1_Click() '锁定鼠标 到某一位置
......
一开始 以为VB的线程 不是像网上人说的那么脆弱。。。哎 现在领略到了。。。VPrivate Declare Function CreateThread Lib "kernel32" (lpThreadAttributes As Any, ByVal dwStackSize As Long, ByVal lpStartAddress As Long, ByVal lpParameter As Long, ByVal dwCreationFlags As Long, lpThreadId As Long) As Long
Pri ......
发送端以163为例
一、asp.net版 using System.Web.Mail; //命名空间引用
c#
MailMessage mail = new MailMessage();
mail.To = "shadow103@qq.com"; //接受人的邮箱
& ......
·匈牙利标记法
·使用3字符前缀来表示数据类型和控件类型
·3个字符可以实现充分多变性，并使前缀合乎逻辑和直观
·表示变量的作用域
·可以并且应该使用前缀来表示变量的作用域 ......
