标题: vb问题(2)
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2004-12-28 18:24 资料 文集 短消息 看全部作者


QUOTE:
原帖由阿尔法孝直于2004-12-27, 13:31:49发表
麻烦问一下:假如将一个十六进制的文件(比如英杰传的main.exe)取文件号为#1,那么将该文件地址为0x030FBC的地方改为FF,问语句是什么?谢谢!

dim v as byte
v = 255
put #1, 200636, v

我很久不用vb读写文件了,大概是这么写。


顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2004-12-28 21:14 资料 文集 短消息 看全部作者


QUOTE:
原帖由Tom Joad于2004-12-28, 20:53:06发表

QUOTE:
原帖由Maxwell于2004-12-28, 18:24:17发表
dim v as byte
v = 255
put #1, 200636, v

我很久不用vb读写文件了,大概是这么写。

地址好象要加1的:
put #1, &H30FBC+1, v
今天天氣好冷啊!  

嗯,有道理,不知道原文给的地址是0起还是1起的,用c/c++习惯了,都是给什么地址写什么地址的。


顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-8 12:12 资料 文集 短消息 看全部作者
你用的代码完整贴出来看看,不太清楚是怎么回事。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-11 13:27 资料 文集 短消息 看全部作者


QUOTE:
原帖由阿尔法孝直于2005-01-10, 12:30:46发表
但是引发了下一个问题:
虽然30FBC被成功地改成了FF,但30FBD被改成了00(原值是04)!

如果两个字节被改了说明没有正确识别类型,我觉得我的那个代码应该不会出错。用cbyte转换的也不会出错才对。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-19 14:36 资料 文集 短消息 看全部作者


QUOTE:
原帖由阿尔法孝直于2005-01-19, 13:48:54发表
继续 ask for help
本人做了个实验:
在VB里执行下列语句:
Private Sub Com1_Click()
Open "d:\sgzyjz\Main.exe"
For Binary As #1
Dim a As String * 1
Get #1, &H30FBD, a
Debug.Print a
nd Sub
结果不是"v",而是空格!Why?
(事先确定30FBC=76)

这里有点问题吧
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-20 12:26 资料 文集 短消息 看全部作者


QUOTE:
原帖由阿尔法孝直于2005-01-20, 12:15:56发表

QUOTE:
原帖由Maxwell于2005-01-19, 14:36:35发表
[quote]原帖由阿尔法孝直于2005-01-19, 13:48:54发表
继续 ask for help
本人做了个实验:
在VB里执行下列语句:
Private Sub Com1_Click()
Open "d:\sgzyjz\Main.exe"
For Binary As #1
Dim a As String * 1
Get #1, &H30FBD, a
Debug.Print a
nd Sub
结果不是"v",而是空格!Why?
(事先确定30FBC=76)

这里有点问题吧

按照十六进制的表示方法,第一字节是0,而按照VB的表示方法,第一字节是1 [/quote]
用vb不用从0计,这样看上去太不方便了。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-20 12:29 资料 文集 短消息 看全部作者
我没有你用的文件,但是试了一下其他的文件也没有问题。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-20 12:50 资料 文集 短消息 看全部作者
你先读个简单文件试试。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-21 12:20 资料 文集 短消息 看全部作者
你传这个文件上来试试吧。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-22 11:46 资料 文集 短消息 看全部作者


QUOTE:
原帖由阿尔法孝直于2005-01-20, 12:35:25发表
d:\sgzyjz\main.exe确实存在。

用函数判断一下到底打开了没有,存在不一定能打开。

我没有你那个main.exe,我用了另外一个exe文件,没有任何问题。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-22 22:36 资料 文集 短消息 看全部作者
是有点蹊跷啊,明天我再继续看看。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-22 23:01 资料 文集 短消息 看全部作者
晕,现在不知怎么又正常了。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-22 23:08 资料 文集 短消息 看全部作者


QUOTE:
原帖由loranrowe于2005-01-22, 23:02:12发表
是main.exe的问题...
换原版的可以了

什么意思?


不过现在再试无论如何都是对的了,另外。。。  不知道你修改了内容之后存盘了没有啊?
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-23 10:14 资料 文集 短消息 看全部作者
那个地方是0你不会改成不是0吗。。。楼主问的是那里不是0的时候为什么读出来也是0。我在第一次试的时候确实出了点问题,怎么改都是0,重新开了一次vb就好了。

金山游侠的编辑功能没用过,不知道是不是需要退出才能存盘,要是那样的话当然改了也没有用了。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-23 11:18 资料 文集 短消息 看全部作者
看他上传的图上金山游侠好像没有保存按钮,所以很怀疑是因为没存盘的问题。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-24 09:47 资料 文集 短消息 看全部作者
建议你做如下操作
1. 复制一个main.exe到另外一个目录
2. 修改并关闭
3. 重新打开查看是否修改成功并关闭
4. 修改程序到新路径读文件
5. 执行

你用lof(1)测试一下便知行不行了。金山游侠也许是以独占模式打开的文件。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-1-24 09:50 资料 文集 短消息 看全部作者
还有,用vb的时候最好说地址都按vb的来说,免得混乱。
你给的文件不管按哪种起始地址算30FBD处都是0,loranrowe说的也没错。
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-2-6 19:39 资料 文集 短消息 看全部作者
晕,你终于搞明白了?
顶部
性别:未知-离线 Maxwell

代王
监管使
枢密直学士
山南西道节度使

Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27Rank: 27
柱国(正二品)
组别 诸侯
级别 征东将军
好贴 4
功绩 1845
帖子 5800
编号 622
注册 2004-7-7


发表于 2005-2-6 20:03 资料 文集 短消息 看全部作者
呵呵,这种东西只能说是rpwt了。我遇到最搞笑的一次是一个程序编译出来运行死机,怎么改都不行,后来新建一个文件把内容拷贝过去,居然好了。
顶部

正在浏览此帖的会员 - 共 3 人在线




当前时区 GMT+8, 现在时间是 2025-2-10 23:06
京ICP备2023018092号 轩辕春秋 2003-2023 www.xycq.org.cn

Powered by Discuz! 5.0.0 2001-2006 Comsenz Inc.
Processed in 0.013448 second(s), 9 queries , Gzip enabled

清除 Cookies - 联系我们 - 轩辕春秋 - Archiver - WAP