Zastita baze podataka

Imam jedan problem.Imam moju bazu npr.baza.mdb i u njoj 5 recordset-a

ime, prezime,telefon,adresa....e sad hocu da posto kada povezem bazu.mdb sa Data1 odnosno Db-gridom podaci mi se prikazu...ali ja hocu i da te iste podatke snimim u tekst fajl-u i to pod posebnom ekstenzijom npr . *.baz koju moze otvoriti samo moj program.

Hvala na pomoci unapred!

[Ovu poruku je menjao jc denton dana 20.07.2002 u 12:17 AM GMT]

[Ovu poruku je menjao jc denton dana 20.07.2002 u 12:20 AM GMT]

Pa samo zameni ekstenziju baze, i kad ti je potrebno
tvoj program da ucita u kodu to vrati.
A ako hoces da snimis kao fajl, sve zavisi kakav fajl i koliko ce biti veliki
i da li je potrebno da ponovo taj fajl ucitavas, edutujes i pretrazujes.

Nije dovoljno samo promijeniti extenziju .txt file pa da ga otvoris samo sa tvojim programom.
Moras registrovati file u registar windowsa
HKEY_Classes_Root\.baz
potom u tom kljucu ubaci string kao default vrijednost koji identifikuje class nesto kao ID sto moze biti "Moj File"
Potom moras napraviti novi kljuc
HKEY_Classes_Root\Moj File\DeafultIcon
i u default vrijednost navedi lokaciju na kojoj se nalazi ikona koju ce koristiti svi Files sa ext .baz
Napravi potom kljuc za pokretanje tvog programa
HKEY_Classes_Root\Moj File\Shell\Open\Command
kao default vrijednost moras staviti MojProgram.exe %1
%1 predstavlja ime file na koji si kliknuo i ako tvoj program prihvata ulazne parametre svaki put kad kliknes na NekiFile.baz otvorices ga u tvom programu.
Obican textualni file osim sa tvojim moze biti otvoren i sa jos dva miliona programa.
Kao primjer:
Sa Notepad.exe otvori neki .vbp file i vidi kako izgleda

Ma ovo je naucna fantastika za mene, a za Bojana je zajebancija :)

Naravno salim se.

Gio1000, imash peticu od mene :) za ovaj post.

Potpis

fire, walk with me

Nisam siguran da je Bojan bas ovo trazio,
pretpostavljam da njemu treba da sakrije bazu od drugih.
Ali u svakom slucaju ovo je odlican kod koga vredi imati u arhivi.

I ja bih ti dao peticu, samo je Gojko ukinuo sistem ocenjivanja.

Pozdrav..

Verovatno bi bilo mnogo jednostavnije kada bi se znalo sta Bojan hoce!

Predpostavljam da je on nekeko hteo da zastiti svoju bazi ili da napravi mogucnost da je prenese negde!
Ja bih mu predlozio da to u pisuje u neki TXT fal onako kao sto cita iz baze jedan po jedan record set i da ga na kraju snimi sa nekom sasavom ekstenzijom, a da bi se zastitio da samo njegov program moze to da cita moze napraviti neko kriptovanje za koje enkripciju tj. kljuc ima samo njegov program!!

Pozdrav!!!

Bravo ljudi,evo Dekys vam je lepo rekao.Hocu da zastitim svoju bazu!Ali takodje hocu da sve recordset-ove u bazi snimim posebno u neki fajl sa *.baz ekstenzijom
koju moze samo moj program da otvori...kada bi neko mogao to da uradi za mene
posto vidim sve znate pa vam nece biti problem....imam jedan obrazac "Form1"
i u njemu "snimi" i "otvori" dugmad i prostor gde ce se taj fajl otvoriti.Mislim da bi trebalo da koristim kontrolu MS Common Dialog za snimanje i otvaranje fajla,samo ne znam da to isprogramiram.Molim vas pomozite!AAAAAAAAA

Pozdrav!

Dobro da i ja nesto pogodim!!!

Mislim da taj tip baze koji ti koristis daje moguznost zastite baze PWD-om, ali svi znamo da to skoro nikada nije dovoljno!

Zato predlazem neki vid kriptovanja!

Dajte kod....help me!

'Ajd da probamo da mu pomognemo.
Ja cu predloziti ovako:
Imas tvoju bazu i tabelu (recimo "Adresar")
U tabeli imas polje: Ime
Na bazu si, vjerovatno, konektovan pomocu DataControle
Sad pozivas RecordSet
Evo, po meni, sta ti treba:
Text1 (u kom ce biti prikazana vrijednost polja:Ime, aktuelnog RecordSeta)
Text2 (u kom cemo vrijednost Text1 postaviti kao sifru)
Dakle, pozvao si Record i u Text1 nam stoji: "Bojan"
Sad pravimo sifru:
Private Sub Command1_Click()
Text1.SetFocus
Text1.SelStart = 0
Text1.SelLength = 1
Do Until Text1.SelStart = Len(Text1.Text)
Select Case Text1.SelText
Case "B","b"
Text2 = Text2 + "H"
Case "o","O"
Text2 = Text2 + "a"
Case "j","J"
Text2 = Text2 + "k"
Case "a","A"
Text2 = Text2 + "e"
Case "n","N"
Text2 = Text2 + "r"
End Select
Text1.SelStart = Text1.SelStart + 1
Text1.SelLength = Text1.SelLength + 1
Loop
End Sub
Kad si dobio sifrovano "Bojan" tad otvaras tvoj .baz File i dodas liniju
sa vrijednoscu Text2.Text
Naravno posle imas program koji radi obrnuto da bi desifrovao
Znaci, prvo otvara File, uzima prvu liniju ubacuje je u Text1 i potom desifruje u tex2 itd.
Igranka je pocela.

Ok.Hvala ti.E sad me jos zanima mogu li ja da moj prikaz iz data-grida (u njemu vidim sve recordset-ove) snimim kao text i da li imate i kod za to?

Pozdrav!

Pogledaj :
https://www.elitesecurity.org/t9629

Idi redom kroz recordset i upisuj uporedo u neki .txt fajl


poz.

Potpis

fire, walk with me

Hvala mnogo!Probacu da se snadjem pa ako se zaglavim negde javicu...

Moze li neko da mi navedene primere uradjene posalje u vidu projekta(*.vbp) posto se ne snalazim bas najbolje!

e-mail:[email protected]