多台电脑使用的excel文件如何授权？

shi7361

我自己做了一套生产管理系统，自己单位在用，但是职位变更，我不管生产了；我怕是他们把我的系统拷贝给别人使用；
我想通过硬盘序列号的方式授权给生产部门使用，但是只能局限一台电脑；

这个系统是3-4台局域网用户使用，谁有好办法？
注：只是一个共享的excel文件；

shi7361

我的想法是让excel读取局域网内指定一台电脑（存储文件位置那台）的E盘（共享盘）物理序列号，局域网内都可以在他的共享文件中使用，拷贝走就不能使用了，本人才疏学浅请老师指教；

    用这种方法只能读取本机的；

    Set d =fs.GetDrive(fs.GetDriveName(fs.GetAbsolutePathName("C:")))

    s = Abs(d.SerialNumber)