carobnjak | 03.02.2012 01:14 |
---|---|
Predmet:Re: Zastita aplikacije gdje grijesim nasao sam gdje mi je taj kod ali sad ne znam dalje gdje da ocitam to iz memorijske lokacije |
zxz | 03.02.2012 11:48 |
---|---|
Predmet:Re: Zastita aplikacije gdje grijesim Aha nije problem. Ovako: Me.InstBroj = Kodiranje(SerBrDiska) Lijevo od ovog Koda Klikni na vertiklanu traku i naj njoj ce se pojaviti kruzic a red ce biti obiljezen crveno smedjom bojom. Sada pokreni formu ividjet ces da ce kod pri izvrsenju stati na to mjesto. prelaskom misem preko memorijskih koje se nalaze prije mjesta zaustavljanja koda citas njihove vrijednosti. znaci samo dodjed misem na memorijsku SerBrDiska i vidjet sec ima li kakva vrijednost. Za nastavak izvrsenja mozes pritisnuti F8 i ides samo jedan korak tj. jedan red izvrsenja koda a sa F5 izvrsva se cio kod. Ako opet bude nejasno samo reci. Ima i drugih nacina za objasnjenje. |
carobnjak | 03.02.2012 17:28 |
---|---|
Predmet:Re: Zastita aplikacije gdje grijesim Ako sam dobro uradio meni poakze slijedece: SerBrDiska ="" ovo samo sa navodnicima znaci kad predjem misem preko SerBrDiska pokaze mi naziv samo sa navodnicima i znakom jednako. |
zxz | 03.02.2012 17:38 |
---|---|
Predmet:Re: Zastita aplikacije gdje grijesim Dobro si ti to uradio. Sad zaustavi ovdje: erBrDiska = GetDiskData(vbDriveSerialNumber) I vidi sta ti pokazuje u ovome: vbDriveSerialNumber Mislim da ovo nemoze procitati tj. broj diska. Ako im u ovoj variabli neki broj od 0 do 2 onda kreni sa F8 korak po korak u ovu proceduru koja se zove: GetDisk i prati variable. Vjerujem ja da ces ti to naci. Ima i drugih procedura za ser. br. diska. |
carobnjak | 03.02.2012 19:40 |
---|---|
Predmet:Re: Zastita aplikacije gdje grijesim Posto stvarno ne znam sta trazim moras mi pomoci na sta da se baziram stvarno ne znam a ako ima druga procedura za registraciju ako mozes da mi prikacis da probam s njom jer sumnjam da je do sistema mi, na kompjuteru mi je XP cita normalno, dok sam na laptopu imo Xp radilo je takodje posaljem jednom kolegi na provjeru bazu nije mu citalo kod njega mislim da je vista bila, Sad prije par dana dize sebi win7 na laptopu sad ni kod mene nece da cita, takodje sinoc jednoj prijateljici posaljem ima win 7 na pc isto joj ne cita a kod tebe kazes da normalno |
zxz | 03.02.2012 20:17 |
---|---|
Predmet:Re: Zastita aplikacije gdje grijesim Da ali i kod mene je XP. Molim te samo prije svega zaustavi opet kod pa vidi sta pise na: vbDriveSerialNumber na isti nacin kao sto si uraio prije sa: SerBrDiska |
carobnjak | 03.02.2012 20:37 |
---|---|
Predmet:Re: Zastita aplikacije gdje grijesim vbDriveSerialNumber=1 to mi pise drug |
zxz | 03.02.2012 20:52 |
---|---|
Predmet:Re: Zastita aplikacije gdje grijesim To je dobro i opet mi nista nije jasno. De mi reci koja je verzija accessa u kojoj to radis. |
carobnjak | 03.02.2012 20:59 |
---|---|
Predmet:Re: Zastita aplikacije gdje grijesim Kaako rekoh trenutno koristim win7 a ofice 2000 |
zxz | 03.02.2012 23:18 |
---|---|
Predmet:Re: Zastita aplikacije gdje grijesim Hajd probaj ovako Na on load forme imas proceduru. Zamijeni je ovom. Private Sub Form_Load() Dim SerBrDiska As String SerBrDiska = GetDiskData(0) Me.InstBroj = Kodiranje(SerBrDiska) End Sub Koliko imas diskova na compu. |