第一次运行的时候,把软盘的卷标读出写入到你ini中
Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Public Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long

解决方案 »

  1.   

    如果用户修改了ini文件种的卷标哪不就起不到作用了?
    同时怎样将文件和卷标绑定?
    文件可能是个DOC文档或者是张图片,其目的主要是防止被拷贝。
      

  2.   

    谢谢楼上的,现在主要的问题我不知道该怎样解决,怎样利用将文件(例如:DOC、JPG等)打开。为了防止拷贝,我已经将这些文件加密,怎样解密后又不生成解密的文件读出文件的内容
      

  3.   

    谢谢楼上的,现在主要的问题我不知道该怎样解决,怎样利用程序将文件(例如:DOC、JPG等)打开。为了防止拷贝,我已经将这些文件加密,怎样解密后又不生成解密的文件读出文件的内容
      

  4.   

    你在打开时候自动运行你的解密程序段,然后自动读取磁盘卷标,按照位对比是否一致。这都是自动在内存里对比,不用生成文件阿!!
    至于打开那些文件,你用open方法二进制(binary)读取即可,但是那样有什么用呢?
      

  5.   

    哪些文件是WORD文档,我要将调用WORD打开这些文件
      

  6.   

    那你用文本(txt)形式打开阿,^_^。不然你会看不见内容的。
      

  7.   

    自己写一个加密算法,再把要保护的文件捆绑到一个应用程序,要打开这个程序,必须先输入正确的密码才释放文件.一定要使用OPEN BINARY读到一个BYTE()数组中,不要写盘就OK了.不过,好像没有什么办法可以不写盘打开WORD文档的.可能是小弟我才疏学深吧,那位大虾知道的话,也告诉我一下吧!  呵呵谢了!对了,如果单纯只是要保护WORD文件的话,可以在WORD中用VBA写一个程序来完成呀!去问一问VBA区的人吧!夜已深,还有什么人,像我这样,醒着在编程
    -------------------------------
    海纳百川,有容乃大;
    壁立千仞,无欲则刚。