比如我开发了个小软件,想给软件加个试用期(以30天为例),超过30天软件自动停止运行,并提醒用户注册付费,请各位大侠指点小弟该怎么解决?不胜感谢!!! 
小弟开发的软件网址:  
天空软件站:http://shareware.skycn.com/author_softlist.php?author_id=26655,华军也有,呵呵

解决方案 »

  1.   

    <marquee direction="up" height="25">up</marquee>
      

  2.   

    向一个打网站获取它的服务器时间 
    一般不会错 比如 新华网/新浪
    安装软件的时候写一个文件或注册表 记录安装时间  Private   Sub   Command1_Click()   
        
      Winsock1.Connect   
      End   Sub   
        
      Private   Sub   Winsock1_Connect()   
                      Dim   strCommand   As   String   
        Dim   strWebPage   As   String   
        
        strWebPage   =   "http://www.sina.com.cn"   
        strCommand   =   "GET   "   +   strWebPage   +   "   HTTP/1.0"   +   vbCrLf   
        strCommand   =   strCommand   +   "Accept:   */*"   +   vbCrLf   
        strCommand   =   strCommand   +   "Accept:   text/html"   +   vbCrLf   
        strCommand   =   strCommand   +   vbCrLf   
        
        Winsock1.SendData   strCommand   
      End   Sub   
        
      Private   Sub   Winsock1_DataArrival(ByVal   bytesTotal   As   Long)   
          Dim   webData   As   String   
          Dim   aa   As   Variant   
          Dim   bb   As   Variant   
          Winsock1.GetData   webData,   vbString   
          aa   =   Split(webData,   "Date:")   
          aa   =   Split(aa(1),   "Content")   
          If   InStr(aa(0),   "GMT")   Then   
              bb   =   Replace(aa(0),   "GMT",   "")   
              bb   =   Trim(bb)Else   
              bb   =   aa(0)   
      End   If   
            Debug.Print   bb   
      End   Sub   上面是获取服务器时间的代码相比较 30 天然后在做其他控制
      

  3.   

    上面的密码可以设置成使用次数或天数。天数的话,要动一下脑筋,万一用户修改了系统时间咋办?一是可以设置成远程读取(通过互联网);二是他如果修改了,你再给他改回去!;三是禁止他修改时间(在你的程序里用一个Timer事件检测)。
      

  4.   

    tianhuo_soft你好,你说的方法是在用户上网的时候,如果用户没上网请问该怎么解决??