Newsgroup: it.comp.appl.access
Titolo: protezione con SERIALNUMBER

vorrei proteggere la mia applicazione da installazioni fraudolenti.
capisco che è tutto relativo (potenzialmente è tutto "scardinabile"), ma
vorrei cumunque mettere una protezione.
Visto che distribuisco un MDE e che gestisco internamente al codice le
autorizzazioni a fare determinate funzioni, vorrei attivare una protezione
del tipo:
mi testo il serilnamber dell'unità C:\ con se seguenti istruzioni
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set d = fs.GetDrive(fs.GetDriveName(fs.GetAbsolutePathName("C:\")))
    serialnumber$ = Str$(d.serialnumber)
a questo punto, dando per scontato che in ogni PC dovrei trovare un diverso
serialnumber (almeno credo), potrei usare tale numero per sottoporlo ad una
equazione matematica che deve ritornarmi il valore del codice installazione
che vorrei inventarmi.
E allora le domande sono queste:
    -che cavolo vogliono dire le istruzioni sopra elencate ?
    - e checavolo rappresenta il "serialnumber" dell'unità che ritornato ?
Io lavoro su MainFrame e di pc non ne mastico molto, ma da noi il software
di base scade ogni anno e richiede psw che sono calcolate in base ad
lagoritmi basati sul serialnumber delle CPU (o motori che dir si voglia). E'
possibile farsi ritornare su pc in VBA un idintificativo univoco del pc
analogo ?
Grazie ciao Luc

 ha scritto nel messaggio
news:8u9m11$fep$1...@nslave2.tin.it...



Se interessa ho scaricato in rete (ma non mi ricordo dove) un controllo OCX
con relativo programma di calcolo password che genera un numero seriale
legato all'applicazione ed al numero di serie dell'hard disc, con controllo
della data di sistema (si accorge se viene spostata in dietro) ed altre
caratteristiche interessanti: il controllo è freeware, se qualcuno lo vuole
me lo faccia sapere.
--
Aries
e-mail: 
seren.f...@iol.it
icq: 56640169
www.sereninformatica.it

"Aries" <seren.f...@NOSPAMiol.it> ha scritto nel messaggio
news:FJ7O5.13838$BF.4...@news.infostrada.it...

Certo che interessa.
Se e' freeware passalo al sito comune oppure dai qualche informazione in
piu'.
Grazie
bg


Allora, l'ocx č freeware: se mi date l'indirizzo dei gestori (non me lo
ricordo) lo invio al sito comune ed intanto vi copio/incollo le faq, cosě
vedete di cosa parlo, ok?
=== inizio FAQ ===
---What's the price of ActiveLock?---
ActiveLock is free. It is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-------Install questions-----------
---How do I install ActiveLock?---
1. Download nslock15vb5.zip and extract it into the directory you want.
2. Run install.bat to register the ocx files.
3. Enable ActiveLock in the Visual Basic Components dialog box
---How can I uninstall ActiveLock?---
1. Run uninstall.bat from the ActiveLock directory.
2. Delete the ActiveLock directory.
---I have installed ActiveLock but I do not see it in the toolbox?---
Did you enable ActiveLock in the Controls tab of the Components dialog box?
If not, open Components dialog box, scroll down until you spot "ActiveLock
1.5" and check it.
-------Programming questions------------
---How do I create different versions of the same software?---
Use different software names for each version. (e.g: "MySoft 1.0", "MySoft
2.0")
----How do I check user registration?---
Use the RegisteredUser property:
  If Not (ActiveLock1.RegisteredUser) Then
    MsgBox "Please register!"
  End If
---How do I implement time evaluation periods?---
Use the UsedDays property:
  If (ActiveLock1.UsedDays > 21) Then
    MsgBox "Your evaluation period has expired."
  End If
---What happens if the user changes the time settings?---
You can avoid that the users extend their evaluation periods. Use the
LastRunDate property:
  If (ActiveLock1.LastRunDate > Now) Then
    MsgBox "You have changed your time settings."
  End If
---How do I create a form to allow users to register?---
First, you must show the SoftwareCode to your users, and you can do that
with a Label:
  Label1 = "Your software code is " & ActiveLock1.SoftwareCode
When the user receives a LiberationKey, he/she will type it on a text box
and click on a button. The following code shows how that works:
  Private Sub Command1_Click()
    ' Set the LiberationKey with the Text1 text.
    ActiveLock1.LiberationKey = Text1
  End Sub
For more information, see the sample projects or the help file.
---Does ActiveLock package include a help file?---
Yes. It's an HTML help file and is called "nslock15.chm".
---How do I generate LiberationKeys?---
Use the KeyGenerator to create and send keys to your users via e-mail.
It's important to note that ActiveLock generates a different SoftwareCode
for each installation. Therefore, you must give (or sell) a different
LiberationKey for each user.
===Fine FAQ===
Spero la cosa vi interessi quanto ha interessato me.......


....se può interessare ve lo dico io dove si trova l controllo ocx in
questione :
www.activex.com
il controllo si chiama Active Lock 1.5 !
Se qualcuno ne ha bisogno glielo posto io tranquillamente !
Frank...@libero.it

 Si grazie.
ricc...@free.panservice.it
oppure se viene messo sul sito comune è lo stesso.
ciao Riccardo

Aries <seren.f...@NOSPAMiol.it> wrote in message
FJ7O5.13838$BF.4...@news.infostrada.it...

Copiando il database attivato da un computer ad un'altro l'attivazione
rimane valida?
Ciao Bobbit


No, bisogna registralo di nuovo, penso perché si basa sul seriale dell'hard
disc.
Questo ti permette anche di controllare quante volte viene installato il tuo
software.
Comunque mando lo zip al sito comune, così potete smanettarci sopra, ok?


 
Frank...@libero.it
Da lì come da altri siti (personalmente l'ho scaricato dal sito del
produttore, che però non ricordo ;-)
Cmq anch'io non ho problemi a postarlo a chi lo vuole..... ora vedo di
inviarlo al sito comune, così ci togliamo il pensiero.



Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
Ciao e grazie
bg


Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
Grazie
bg


L'ho spedito qualche giorno fa, spero che sia arrivato.
Fatemi sapere se ci sono problemi.


 ---
Hai dei problemi? Io non leggo il ng per creare, alimentare e leggere
polemiche. Avevo aggiunto in fondo ai messaggi l'indirizzo comune del sito
come chiesto da Aries. Pensavo di avere accorciato i messaggi precedenti ed
invece mi sono dimenticato. Per una volta che capita ecco che salta su
quello che forse sa tutto e si rompe per un'errore o chissà perche'. Staro'
piu' attento, certo che anche a me rompe stare connesso un bel po' per
scaricare e trovare poi che la meta' dei msg e' di polemiche, richieste di
password ed altro. Qual'e' il range di righe che tolleri, che leggi e a cui
rispondi? (per parlare comunque solo di access)
bg

 ---
Prego e basta rompere, controlli tutto l'ng o hai solo del tempo da perdere?
bg