WIN10系统下被坑的FreeBasic代码 VFB

  勇芳 2019-5-25 21760

以下代码只发生在WIN10系统里,其它系统正常,也不属于我们写代码的问题。

在文件的某个地址写入内容

  Open 文件名 For Binary Access Write As #M
  If Put(#M, 地址, by()) = 0 Then Function = True Else Function = False

代码没问题,在 XP 、WIN7  系统很正常,当来到了 WIN10 系统就发生问题,它会先删除文件,再写入,

我们只修改部分,到了W10就全清0,经过研究,去掉 Access Write 才可以

  Open 文件名 For Binary As #M
  If Put(#M, 地址, by()) = 0 Then Function = True Else Function = False


因国家互联网安全管理要求,关闭回帖功能。大家需要留言,请使用【勇芳软件客服】即时联系勇芳点此打开->>勇芳软件客服
返回
联系勇芳
发新帖 搜索 反馈 回顶部