Un1正式发布在VB中使用OBJ文件的方法!

Un1 2000-07-04 10:29:00
环境:
要在VB中使用xx.obj的函数func1但又不想把它作成外部DLL.

’有关vc

1:先把xx.obj编译成dll,找出xx.obj需要的所有连接于外部DLL的函数,比如有:
CreateFileA,DeviceIoControl

2:用VC编写一模块调用func1包含func11函数和自己的外部函数地址定义:
long _imp__CreateFileA_28;
long _imp__DeviceIoControl_32;

long __stdcall func11(long p1, void *p)
{
_imp__CreateFileA_28 = *p;
_imp__DeviceIoControl_32 = *(p+1);
return func1(p1);
}

3:编译init.c形成init.obj文件
4:用vc将init.obj文件内的
__imp__CreateFileA_28改为__imp__CreateFileA@28
__imp__DeviceIoControl_32改为__imp__DeviceIoControl@32
5:使用vc98\bin下的lib.exe:
lib.exe /out:vbaexe6.lib \vb path\vbaexe6.lib xx.obj init.obj
6:备份vb98目录下的vbaexe6.lib文件。
7:拷贝vbaexe6.lib到vb目录下。

’有关vb
8:在你的vb程序中加入module1.bas模块,其包含函数定义:(例如)
public function func11(byval para as long, byval dllentry as long) as long
end function
9:在你的vb程序中加入空模块module2.bas
10:在你的程序中加入usercontrol1.ctl模块,加入以下代码:
Private Sub UserControl_Initialize()
MsgBox "Hello"
End Sub
11:加入模块module3.bas, 定义结构:
Public Type DLLEntrys
A__imp__CreateFileA_28 As Long
A__imp__DeviceIoControl_32 As Long
End Type
12:在程序中用loadlibrary和getprocaddress得到kernel32.dll中的CreateFileA,DeviceIoControl地址填入dllentry.
13: 这样调用func11:

dim de as dllentrys
de.A__imp__CreateFileA_28 = xxx
de.A__imp__DeviceIoControl_32 = yyy

func11 para1, varptr(de)

14:在你一定要装入的窗口中放入控件usercontrol1。如果没有就装入一个空form,启动后在unload掉。
15:存盘并编译你的vb程序,在link时编译过程会被usercontrol的msgbox暂停。
16:到程序目录去找出module1.obj删除。
17:拷贝module2.obj为module1.obj。
18:用vc修改你调用func1的模块,比如form1.obj, 把形入:
?func11@Module1@@AAGXXZ
的字符传改为:
_func11.(.代表字符'0x0')即修改其名称到xx.obj中的输出一致,存盘。
19:按下msgbox的确定按钮让编译继续。
20: 如果你没有遗漏任何函数此时将编译成功,否则查看link错误后重复2开始。
21: 运行程序,用softice把msgbox去掉。

22:大功告成!

祝你好运。
...全文
206 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复
​ 博主介绍:✌在职Java研发工程师、专注于程序设计、源码分享、技术交流、专注于Java技术领域和毕业设计✌项目名称基于Web的酒店客房管理系统的设计与实现系统说明3.2.1  用户模块功能分析前台模块应主要包括用户登录模块、用户注册模块、查看客房信息模块、客房预定 模块、用户留言模块、充值模块和个人信息维护模块。用户登录模块:用户通过输入注册的的账号和密码,然后进行身份验证,匹配成功 后实现登录功能。用户注册模块:用户输入合法的账号和密码可以实现注册功能。 查看客房信息模块:用户可以通过首页查看客房的价格,图片,详情等信息,从而   可以选择想要预定的房间。 客房预定模块:用户选择自己想要预定的客房后,可以通过输入相关信息进行订房操作。用户留言模块:用户可以向管理员发送留言。 充值模块:用户可以通过添加银行卡再为自己进行充值操作。 个人信息维护模块:用户可以修改自己的姓名、密码、身份证号等信息,还可以查看自己的订单。3.2.2  管理员模块功能分析对于管理员而言,一个好的管理系统总是能让酒店的管理工作事半功倍[7]。管理员 能够通过这个系统对自己的酒店情况一目了然,应该包括客户留言模块、客房管理模 块、订房信息管理模块、入住信息管理模块、统计分析模块、酒店新闻管理模块、会 员信息管理模块、员工信息管理模块、系统用户管理模块、个人信息维护模块。客户留言模块:管理员可以查看并回复用户的留言。客房管理模块:管理员可以管理客房信息,可以添加新的客房,删除已经停用的客房信息,还可以修改现有的客房信息。订房信息管理模块:管理员可以处理用户的订房请求,为用户办理入住手续。入住信息管理模块:对于没有注册的线下客户,也可以办理入住手续。统计分析模块:可以对酒店所有的入住信息进行记录和总结分析。酒店新闻管理模块:管理员可以更新网站上的新闻公告,展示图片等信息。会员信息管理模块:管理员可以查看到所有的注册会员信息,可以对会员信息进行删除,修改,添加操作。员工信息管理模块:管理员可以查看到自己公司所有的员工信息,而且还可以对员工的相关信息进行管理。系统用户管理模块:管理员可以查看到所有的系统管理员信息并对管理员信息进行管理。个人信息维护模块:管理员可以更改自己的登录密码或者是姓名、性别、手机号等 相关个人信息。​编辑 环境需要1.运行环境:最好是java jdk 1.8,我们在这个平台上运行的。其他版本理论上也可以。2.IDE环境:IDEA,Eclipse,Myeclipse都可以。推荐IDEA;3.tomcat环境:Tomcat 7.x,8.x,9.x版本均可4.硬件环境:windows 7/8/10 1G内存以上;或者 Mac OS; 5.数据库:MySql 5.7版本;6.是否Maven项目:否;技术栈1. 后端:Spring+SpringMVC+Mybatis2. 前端:JSP+CSS+JavaScript+jQuery使用说明1. 使用Navicat或者其它工具,在mysql创建对应名称的数据库,并导入项目的sql文件;2. 使用IDEA/Eclipse/MyEclipse导入项目,Eclipse/MyEclipse导入时,若为maven项目请选择maven;若为maven项目,导入成功后请执行maven clean;maven install命令,然后运行;3. 将项目springmvc-servlet.xml配置文件的数据库配置改为自己的配置;4. 运行项目,在浏览器输入http://localhost:8080/ 登录运行截图​编辑​编辑​编辑​编辑​编辑​编辑​编辑​编辑​编辑​编辑​编辑​编辑​编辑​编辑​编辑 用户管理控制层:package com.houserss.controller;import javax.servlet.http.HttpSession;import org.apache.commons.lang3.StringUtils;import org.springframework.beans.factory.annotation.Autowired;import org.springframework.stereotype.Controller;import org.springframework.web.bind.annotation.RequestMapping;import org.springframework.web.bind.annotation.RequestMethod;import org.springframework.web.bind.annotation.RequestParam;import org.springframework.web.bind.annotation.ResponseBody;import com.houserss.common.Const;import com.houserss.common.Const.Role;import com.houserss.common.ServerResponse;import com.houserss.pojo.User;import com.houserss.service.IUserService;import com.houserss.service.impl.UserServiceImpl;import com.houserss.util.MD5Util;import com.houserss.util.TimeUtils;import com.houserss.vo.DeleteHouseVo;import com.houserss.vo.PageInfoVo;/** * Created by admin */@Controller@RequestMapping(/user/)public class UserController if (ip != null && ip.length() > 0) String[] ips = ip.split(,);for (int i = 0; i  

741

社区成员

发帖
与我相关
我的任务
社区描述
VB 版八卦、闲侃,联络感情地盘,禁广告帖、作业帖
社区管理员
  • 非技术类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧