Gemme til fil der ikke kan åbnes og ændres

kender ikke ret meget til VB, men gemmer du dine data binært?
Så kan brugeren i hvertfald ikke ændre indholdet til noget brugbart.

men man kan altid åbne en fil med notepad og ændre indholdet.

Giv din datafil en type der ikke kan genkendes af andre programmer.
F.eks:  data.pxq

istedet for data.txt som default bliver åbnet af notepad.

\"Så kan brugeren i hvertfald ikke ændre indholdet til noget brugbart.\" >> her mener jeg at han ikek vhad hvad han laver, da han bare får mærkelige tegn frem i Notepad.

At ændre extension på filen, er kun et skridt hen i moda t gøre det \"sværer\" at ændre... men brugeren kan altid åbne en fil med notepad hvis han ønsker det... Prøv selv med en gif, eller en jpeg.

Er det ikke muligt at sætte parameteren \'read-only\' når man gemmer filen ?

Hvordan gemmer man sin fil/dataer binært?

Jeg trækker mig...
Jeg tænker i VBA baner.
Der er det muligt at gemme, med argumentet read-only.
Det kunne være det var muligt i VB.

http://www.vbweb.co.uk/show/85/

magik> god side...
jeg har prøvet det i et program. Programmet kan skrive og læse binary files. Men hvis man åbner en af filerne i notepad kan man kun se en masse |||||||||||||||||||||||| lodrette streger.
takker.

Nu er det at gemme i binære filer eller ændre extention lidt af en \"hovsa-løsning\" på det faktiske spørgsmål... Jeg kunne da godt tænke mig at vide, om man ikke kan sætte en parameter til read-only når man gemmer en txt-fil fra VB - ved nogle hvordan? Det var jo egentligt det spørgsmålet gik på ;-) /Martin

Altså ligeså vel som du kan højreklikke på en fil og vælge properties - og her sæte filen til read only. Så kan du også vha. Visual Basic sætte den samme fil til read only. Dette gøres ved at bruge Microsoft Scripting Runtime til at tilgå den samme fil med og sætte dens readonly property til true.

Private Sub Command1_Click()
    Dim fso As FileSystemObject
    Set fso = New FileSystemObject
   
    Dim fil As File
    Set fil = fso.GetFile(\"c:\\huji.txt\")
    fil.Attributes = ReadOnly
    Set fil = Nothing
    Set fso = Nothing
End Sub


husk at sætte en reference til Microsoft.Scripting.Runtime

Kedde

spørgsmålet gik på hvordan man kan forhændre andre i at ændre på indholdet af en fil som et VB program har gemt. Og ved at gemme filen binært kan andre ikke læse dens indhold. Men man kan stadig ændre på det...

Hvis man gemmer filen som read only - kan man så ikke bare højreklikke på filen og fjerne fluebenet igen ude i windows, og så derefter åbne og ændre filens indhold?

Det vil jeg mene man kan. Eller overskrive den.

Kamak>> Jo selvfølgelig kan man det - men der er ikke andre måder at lave det på. Du kan ikke lave noget sådan som dette skud sikkert!!

Hvilket Windows version kører den på ?
Er der mulighed for at gemme filen i en mappe (evt. skjult) der
er utilgængelig for brugeren ?