[Resolvido]ActiveLock (Gerador de Registro de Software)

Alguns dos colegas já utilizou esta ocx ou sabe como utilizá-la?


Cumprimentos.

A resposta à sua duvida está aqui;

http://www.ativoaccess.com.br/mostra.exemplo.php?aplicativo=528

Boas JP.. perdoe-me mas não me expressei corretament, utilizei inclusive este modelo do ativo access. E ja o utilizo corretamente... porém há um problema relacionado a data de instalação e sua vinculação ao nome do sistema criado na chave... Tentarei explicar para que possa entender:



A chave
ficará registrada no nome criado no código executado nos eventos ao carregar do
F-Registro


--------------------------------------------------------------------------------------------------------
Private Sub
Form_Load()
On Error
Resume Next
'esses valores vc pode definir usando o
numero do hd como SoftwareName ou outro que seja
'diferente em cada máquina, pois que assim
não sendo serão todos iguais
' e uma chave seria válida para todas as
cópias com esta configuração
Me!ActiveLck.Password
= "123"
Me!ActiveLck.SoftwareName
= "MinhaApp_1"
'leio a chave da app e passo o valor para a
variavel
sK =
GetSetting("MinhaApp_1", "KeyApp", "NumberKey",
"123")
If sK = "123" Then ' se retorna
123 então
'necessário pois na primeira inicialização
ela não existe, e se existir sera regravada
'com o mesmo valor
'gravo os valores no registro do win com
dados nulos
SaveSetting "MinhaApp_1", "KeyApp",
"NumberKey", "123"
Else
'leio a chave o windows e se nula retorna
123 =falso - caso não, a chave
verdadeira
'o ultimo valor é passado como parametro
NULO , pois se a chave não existe tem que haver um retorno
sK = GetSetting("MinhaApp_1",
"KeyApp", "NumberKey", "123")
End If
=========================================================

A senha Defalt (123) será gravada ao incializar o form pela primeira vez e será
substituída logo após o registro.

Sendo
assim coloque no lugar de MInhaApp_1 o nome do seu sistema lembrando que:

1 – Se o usuário deletar o nsLock15vb5.ocx do registro do Windows o sistema não
funcionará
2 – Mesmo que ele acesse o registro do Windows e apague as chaves, a continuagem regressiva do tempo de
instalação continuará
3 – Em testes aqui.. tentei encontrar o local que fica gravado a data utilizada
pelo controle ocx e não obtive êxito.. portando depois que iniciar o seu
sistema com o nome correto... a contagem continuara.

Caso substitua o nome do sistema no
código de MinhaApp_1 para MeuSistema, será gravado nova chave no registro do
Windows para o MeuSistema. No entanto se voltar o nome do mesmo para
MinhaApp_1 e inicializar o form
F_Registro, a contagem de tempo para MInhaApp_1 voltara a mesma contagem para o nome.

Então..
A cada nome que mude no código, cria uma chave.. e esta fica anexada a Data da primeira inicialização do F-Registro...Náo consegui encontrar onde modifica essa data no OCX... Portanto, registrado um Nome de sistema Ex: MinhaApp_1, a data começa a correr regressivamente, e mesmo que reinstale a OCX, renomeie o sistema ou outro artificiio, esta data não modifica e o tempo continuará correndo.

Se inicializar a OCX com 3 nomes de sistemas diferentes, estes nomes ficam
gravados em um local ainda desconhecido por mim e atrelado a data da primeira
inicialização do F-Registro e por mais que exclua as chaves geradas, essa data
não é zerada e continua contando o tempo.

Resumindo,
após iniciar o F-Registro pela primeira vez, o nome do sistema utilizado terá
sua data de instalação marcada em local desconhecido ainda por mim, e por mais
que exclua suas chaves a data ainda continuará subsistindo e atrelada ao nome..
não podendo ser resetada. Ainda estou na busca de como fazê-lo
(Embora isso seja uma função a mais de proteção, busco apenas entender o processo que leva a esta data estar atrelada ao nome do sistema criado por mais que se exclua suas chaves)

Exemplo ja disponibilizado no repositoório.

Tópico exaurido.

Obrigado.