martes, 29 de noviembre de 2011

Convertir nuestra aplicaion en DEMO



Bueno acá les traigo un pedazo de código que encontré por hay estaba en Visual Basic 6.0 pero lo pase a .Net y aquí esta. esta rutina lo que hace es controlar las ejecuciones de nuestra aplicación esto para aplicaciones DEMO Si queremos darle la aplicación a algún posible cliente y queremos que solo se le pueda ejecutar cierta cantidad de veces o las que ustedes quieran bueno aquí esta este código.
funciona de la siguiente forma, crea un archivo en el registro de Windows donde almacena el numero de veces ejecutadas ya cundo llega a 15 o al numero que ustedes le quieran colocar manda un mensaje y wuala no corre mas el programa. Espero que le sirva a alguien saludos..

'**********************************************************************
'rutina para controlar ejecucuines de la App. en esta ocacion
'en cada ejecucion el programa manda un mensaje de cuantas ejecuciones van
Dim iVeces As Integer, retValue As String
retValue = GetSetting(My.Computer.Name, "Carpeta", "Archivo")
iVeces = Val(retValue) + 1
SaveSetting(My.Computer.Name, "Carpeta", "Archivo", iVeces)
If iVeces < 2 Then
MsgBox("Número de ejecuciones: " & iVeces, 64)
Else
Me.Visible = False
MsgBox("Lo sentimos esta version ha expirado", vbCritical)
'aka ya puedes no c llamar al formulario de registro para que el User ingrse
'la clave de registro de la aplicacion o lo ke se te ocurra xd
Close()
End
End If
'*********************************************************************
By Kin3xc - Developer

2 comentarios:

  1. hey gracias por tu aporte en verdad hace mucho q buscaba poder hacer esto gracias

    ResponderEliminar
  2. De nada Men para eso estamos
    Saludos...

    ResponderEliminar