赫赫,到时间自动删除不就行了?我就是这么做的!
不过我的程序只有我自己使用。:)

解决方案 »

  1.   

    用加密锁,都提供软件试用限制功能,还可以让你的用户觉得你的软件是真正的软件产品。
      

  2.   

    用加密锁,也可以用时间限制.比如,软件到一定的日期就不能使用。
      

  3.   

    每一个软件的完成都是编程人员心血的结晶,因而,当盗版的黑手伸向你的劳动成果时,怎不令人可怜、可恨!逼得我们只好拿起武器,捍卫自己的劳动成果。以下的两段小程序,可以防止他人非法使用自己的软件。(让我们共同反对盗版!)   程序一:放于主程序的开头,用于检查文件“cjgl.dat”是否存在,若不存在,便退出,程序不能继续执行。需要注意的是文件“cjgl.dat”不能与主程序放于同一目录。这里放在win.com所在目录,选win.com主要是因为win.com必定存在。程序段如下:   path1=fullpath(″win.com″,1)   &&检查文件win.com所在目录   len=len(path1)-7   fil=left(path1,len)+″cjgl.dat″   if !file(fil)   && 如文件cjgl.dat不存在提出警告   mes=messagebox(″要用软件,请与作者联系!″,64,″重要信息″)   quit   endif   程序二:用于软件的注册,此程序运行结果即将软盘上的“cjgl.dat”文件拷贝至win.com所在目录下。cjgl.dat文件内容任意。程序如下:   set talk off   path1=fullpath(″win.com″,1)   len=len(path1)-7   fil=left(path1,len)+″cjgl.dat″   if file(fil)   && 先判断cjgl.dat是否存在指定目录下   =messagebox(″学生成绩管理系统已经注册!″,64,″提示″) &&如存在,说明已注册过   else &&如不存在,拷贝程序   copy file cjgl.dat to &fil   =messagebox(″注册完毕!″,64,″提示″)   endif   quit   若加上时间限制及内存变量,可让程序限时试用。