Crear sistema trial - donde guardo y como el valor numerico?

[zxs23]

Por ejemplo si el programa solo va a tener 30 ejecuciones y guardo el valor numerico "30" en el registro de windows y le quito 1 cada vez que se inicie el programa esta bien funciona, pero si alguien encuentra el valor del registro y lo cambia a 1000 u otro numero entonces mi trial ya no sirve.
Ahora utilizo este codigo para guardar el registro

Código:

SaveSetting App.EXEName, "Settings", ElControl.Parent.Name & "_" & ElControl.Name, ElControl

Donde es mas recomendable guardar ese numero para evitar esta situacion?

[vicentecamesella]

Guardalo en un archivo .ini lo ocultas en una carpeta de system32 y listo eso si t recomiendo que tambien lo guardes en el registro pero operes en el ini asi todos van a irce por el registro pero para su sorpresa el sistema no va a funcionarle pasado el trial saludos....

[culd]

Me lleva 10 min detectar donde guardaste

Es al pedo

[vicentecamesella]

Culd lo se que es facil para lo que sabemos pero las probabilidades de que un usuario normal y corriente la detecte son bastante escasas

[zxs23]

Si utilizo el sandboxie para instalar cualquier programa me parece que detectara el archivo .ini, igual probare, pero tengo algunas ideas gracias por el dato.
Culd que programa es el mejor para hacer una descompilacion en vb6.0, todavia utilizas vb6 para hacer versiones demo, como lo haces

[STK_Pablo]

Te recomiendo que uses algun control ocx, yo por ejemplo uso el nslock15vb6.ocx y me da resultados satisfactorios desde hace ya varios años, existe una version nueva pero la verdad, yo sigho con ésta... ahhh, me olvidaba, es de codigo abierto, aasi que no tendrás problemas de licencia ni de ningun tipo, además permite no solo crear trial por veces de ejecucion, sino tambien por tiempo de instalcion y varias opciones mas.... para mi es excelente, probalo y me contas que te parece.....

[zxs23]

tio ya estoy utilizando el control nslock15vb6.ocx pero no he podido entender su sisntaxis al utilizar las propiedades me puedes dar un ejemplo o algun link donde encontrar informacion, saludos

[STK_Pablo]

Perdon por la demora, estaba de viaje, aca te paso un ejemplo de como lo uso yo:

Código vb:

Private Sub Form_Load()
  CentrarForm Me
  Me.Show
  If Not (ActiveLock1.RegisteredUser) And (ActiveLock1.LastRunDate > Now) Then
    MsgBox "PoR favor, se ha cambiado la fecha del sistema desde las opciones de MS Windows y eso no está permitido. Coloque nuevamente la fecha correcta para poder ejecutar el programa normalmente."
    End
  End If
  If Not (ActiveLock1.RegisteredUser) And (ActiveLock1.UsedDays > 15) Then
    'Deshabilito algunos botones por ejemplo
    For Cont = 0 To 4
      btnMain(Cont).Enabled = False
    Next Cont
    frmRegistro.Show 1     'Mustro formulario de registro
  End If
End Sub
 

Código vb:

Private Sub ActiveLock1_Registration(WasSuccessful As Boolean)
  If WasSuccessful Then
    MsgBox "Muchas Gracias por legalizar su Copia !!!", vbInformation, "Registración"
    For Cont = 0 To 4
      frmMain.btnMain(Cont).Enabled = True
    Next Cont
    vRegistrado = True
  Else
    MsgBox "ERROR. La clave ingresada no es Correcta.", vbExclamation, "Registración"
    For Cont = 0 To 4
      frmMain.btnMain(Cont).Enabled = False
    Next Cont
    vRegistrado = False
  End If
End Sub
 

Esto dentro del formulario donde colocaste el control.
En otro formulario, el de registro podes poner:

Código vb:

Private Sub Form_Load()
  txtReg(0).Text = frmMain.ActiveLock1.SoftwareCode
End Sub
 

Código vb:

Sub Private Boton_click()
      frmMain.ActiveLock1.Register (txtReg(1).Text)
End Sub
 

Eso es todo en nuestra aplicacion, ahora en el ejemplo incluido en el paquete de instalacion de nslock tenes como crear un keygen para tu aplicacion....
Proba un poco y avisame

[zxs23]

me ha servido, voy a utilizarlo, pero sabes en que parte del registro de windows se guarda la informacion