mogao bi kodom po prvi put da napravis neki fajl na disku, a pri pokretanju aplikacije izvrsis proveru dali taj fajl postoji pa ako postoji quit ili cak i brisanje baze...
ili napravis tabelu sa brojacem imao si u ranijim temama nesto koliko se secam da se otvara 20 puta.

Da znam ja napraviti na datumsko otvaranje i umanjenje svaki put, ali to ne valja.
Žašto?
Zato što korisnim može uvijek da vrati datum na svom računaru i da ponovno otvori aplikaciju ili ako odbrojaje iz tabele importuje tabelu i samo dodijeli broj otvaranja tako da ni to nije pametno!
Imašli kakav primerčić za taj fajl da ga skrijem pa da iz njega uzima broj otvaranja!!!!

Pozdrav!

imas dobar primjer u ovoj temi.
http://www.elitesecurity.org/t...em-serijskog-broja-ili-slicno-

Baccko , pa sto vazi korisniku ako vrati datum na kompu, kad mora unest npr, Datum racun
a ti stavio da ako je datum>01.05.2006 program stane. pa nece na svim racunuima i primkama datum biti stalno ist.

A najbolje ti je kod opena aplikacije iskreiras na disku neki fajl po kom ces znati da je program startan
recimo tios.sys skreiras na c:\windows stavis attrib +h

i to je to

Stari ne kontam te dali bih mogao da napravis kakav primercic na ovaj fazon...
Pozdrav..

Ima li tko kakav primerčić

Pozdrav1111111

Na c:\Windows otvori file ALEM ( ili nešto drugo )

POSTAVI NA OTVOR FORME

Private Sub Form_Open(Cancel As Integer)
Dim Msg, Msg1, Style, Title, Response
Dim fs
Msg = "DOBRODOSLI U PROGRAM !!!!" ' Define message.
Msg1 = "ŽAO NAM JE IMATE ILEGALNU KOPIJU !!!!"
Style = vbInformation
Title = "Backo" ' Define title.
Set fs = Application.FileSearch
With fs
.LookIn = "C:\Windows"
.FileName = "ALEM"
If .Execute > 0 Then
Response = MsgBox(Msg, Style, Title)

Else
Response = MsgBox(Msg1, Style, Title)
DoCmd.Quit
End If
End With
End Sub

pozdrav

jos samo fali ovaj dio pa da primjer bude potpun i to kako provjeriti vrijeme kreiranja iz accesa.

Ljudi puno vam hvala na pomoći pokušatću u toku dana!!!!

Pozdrav!!!!

Evo probao sam i mislim da ovo baš i nema nekog smisla ako će samo pretraživati fajl,potrebno je da iz fajla uzima broj i da ga svaki put umanji za 1 (-1) to je bit svega,dali tako nešto može da se odradi i koji cod poziva NPR:broj1 iz fajla C:Windows\fajl.txt

eto to je to ...

Pozdrav

Poštovani "Emhco" dali bi mi pomagao i okačio cod ili bolje mdb za "restore" aplikacije pri otvaranju.Pogledao sam tvoju kasu koju si okačio pa mi se svidjeo taj fazon restor-e aplikacije bez pozadine accessa- pa bih te zamolio ako možeš da postaviš cod i objasniš na koji event postavljaš cod.

Unaprijed hvala?

Ako bude problema javi se !!

Puno hvala na bazi i kodu ako šta zatreba javi !

Pozdrav...

Pokušaj na bazi, koju sam ti poslao, staviti šift, ako proradi zakači.
Unaprijed hvala i pozdrav!

Dali misliš da postavim blokadu na shift,da se ne može ući sa shift.javi.
Malo sam gledao da gumb close ne smije se koristiti zbog nemogućnosti ponovnog otvaranja nešto mi to nije jasno!
Ajd javi za shift dali to misliš.U svako slučaju ću probati.
Pozdrav!