100分解决求高手解决这个大问题 本帖最后由 zhengchao109 于 2009-12-21 10:54:34 编辑 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 ReleaseFile 这个函数代码找一下 没有 只用了api调用Doc命令的exe编译汇编程序 Call ReleaseFile(101, gsProjectPathBase & "voice\Main1.asm") 我调试到这里时 生成了 一个Main1.asm文件出息(还是旧的,没有复制新的)我在项目源码里放了一个新Main1.asm文件 ReleaseFile 函数是他自己写的吧 果然 Thanks更一步的来了..Public Sub ReleaseFile(ByVal id As Byte, ByVal sFilename As String) Dim DataFile() As Byte DataFile = LoadResData(id, "forwtv") '从资源文件读入文件内容 Open sFilename For Binary Access Write As #1 Put #1, , DataFile Close #1End Sub DataFile = LoadResData(id, "forwtv") '从资源文件读入文件内容 关键在这里了, 但还是搞不懂.. ReleaseFile 函数不像是API,很有可能是自定义的函数,第一个参数好象是文件索引,第二个参数象是文件路径。 以下是MSDN中查到的有关LoadResData用法资料:语法LoadResData(index, format)LoadResData 函数的语法包含下列部分:部分 描述index 必需的。一个整数或字符串,它用来指定资源文件中数据的标识符 (ID)。ID 标识符为 1 的资源保留给应用程序的图标。Format 必需的。一个数值,它用来按照下列“设置值”中的描述,指定返回数据的原始格式。该数值也可以是用户定义资源的字符串名。设置值用于 format 的设置值有:设置 描述1 光标资源2 位图资源3 图标资源4 菜单资源5 对话框6 字符串资源7 字体目录资源8 字体资源9 加速键表10 用户定义资源12 群组光标14 群组图标 ReleaseFile 是个自定义函数,作用是把资源文件中的文件下载到本机指定位置,第一个参数是资源文件的ID,第二个参数是要保存的文件名。 说明LoadResData 从资源文件装载的数据可以达到 64K。对位图、图标、光标资源类型使用 LoadResData 将返回包含该资源中的实际二进制位的字符串。如果想使用实际的位图、图标或资源,请使用 LoadResPicture oˉêy.LoadResData 的使用对于 Visual Basic 应用程序本地化有好处,这是因为需要翻译的资源在一个资源文件中被隔离,并且无须访问源代码或重新编译该应用程序。 在项目工程里找到一个XPSytle.res 文件...在源码里找不到 如何直接播放载入到内存的MP3数据? 如何獲取枚舉量的信息 Msgbox提示框,能否动态显示时间? 请问如果播放透明AVI文件 如何取日期 统计函数问题,当同名称只出现一次时结果正确,但出现一次以上就错误了??附代码,大虾帮我看看!!!谢谢 如何在图片框中画图时,对paint事件触发时,取得需要更新的区域? 请问如何在VB的窗体中嵌入HTML文件 VB中数据库连接问题,在线等待(急) 求救 vb activex问题,高手进! 请高手指点!!
只用了api调用Doc命令的exe编译汇编程序
Public Sub ReleaseFile(ByVal id As Byte, ByVal sFilename As String)
Dim DataFile() As Byte DataFile = LoadResData(id, "forwtv") '从资源文件读入文件内容
Open sFilename For Binary Access Write As #1
Put #1, , DataFile
Close #1
End Sub
关键在这里了, 但还是搞不懂..
设置值用于 format 的设置值有:设置 描述1 光标资源2 位图资源3 图标资源4 菜单资源5 对话框6 字符串资源7 字体目录资源8 字体资源9 加速键表10 用户定义资源12 群组光标14 群组图标
在源码里找不到