Søg
Avatar billede -l_jogge_l- Nybegynder
29. januar 2004 - 09:59 Der er 15 kommentarer og
1 løsning

Kan man: Set File Attributes?

kan man "skjule" og "Skrivbeskytte" filer, ved hjælp af VB koder`?
Avatar billede -l_jogge_l- Nybegynder
29. januar 2004 - 10:01 #1
Og hvordan sletet man filer???
Avatar billede nute Nybegynder
29. januar 2004 - 10:14 #2
Attributter:

http://msdn.microsoft.com/library/en-us/vbenlr98/html/vaproattributes.asp?frame=true

Der er et eksempel nederst på siden

Slette filer:

http://msdn.microsoft.com/library/en-us/vbenlr98/html/vamthdelete.asp?frame=true

/nute
Avatar billede -l_jogge_l- Nybegynder
29. januar 2004 - 10:46 #3
det øverste fatter jeg godt nok ikke en hat fis af!
Avatar billede -l_jogge_l- Nybegynder
29. januar 2004 - 10:47 #4
Hvis jeg har en txtfil der hedder test.txt, hvordan får jeg den gemt så?
Avatar billede nute Nybegynder
29. januar 2004 - 10:59 #5
gemt ?? du spurgte om hvordan du kan slette, skrivebeskytte eller skjule en fil ?! Hvis du har en fil der hedder "test.txt", så *er* den jo gemt ...

hvad er det du ikke fatter ?
Avatar billede -l_jogge_l- Nybegynder
29. januar 2004 - 11:18 #6
Sorry... jeg mener GEMT som i HIDDEN...
Avatar billede nute Nybegynder
29. januar 2004 - 11:31 #7
princippet er at du gemmer filen, og derefter setter attributten for filen til hidden:

Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile("test.txt")
f.attributes = f.attributes + 2
Avatar billede sjh Nybegynder
29. januar 2004 - 11:33 #8
Du kan bare bruge SetAttr()

Private Sub Form_Load()
  Call SetAttr("C:\test.txt", vbHidden + vbReadOnly)
End Sub
Avatar billede -l_jogge_l- Nybegynder
29. januar 2004 - 11:48 #9
sjh.. sådanner... takker
Avatar billede -l_jogge_l- Nybegynder
29. januar 2004 - 11:54 #10
Men sig mig hvorfor virker det her ikke???

Dim TempFile As FileSystemObject

TempFile = ("C:\temp.txt")
TempFile.DeleteFile
Avatar billede sjh Nybegynder
29. januar 2004 - 11:59 #11
det skal sikkert være :
Dim TempFile As New FileSystemObject
Avatar billede sjh Nybegynder
29. januar 2004 - 12:00 #12
du kan bare bruge Kill hvis du vil slette en file

Kill "C:\temp.txt"
Avatar billede sjh Nybegynder
29. januar 2004 - 12:02 #13
og så er TempFile jo et object og ikke en string ;)
Avatar billede -l_jogge_l- Nybegynder
29. januar 2004 - 13:00 #14
Nej.... ok.... hold kæft Kill var simpelt! Takker
Avatar billede sjh Nybegynder
29. januar 2004 - 13:02 #15
selv tak :-)
Avatar billede thread Nybegynder
04. februar 2004 - 01:32 #16
SetAttr()
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel Indlæg Oprettet Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic 5 29/08/202512:28 04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic 0 05/08/202510:10 -
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic 0 16/05/202512:31 -
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic 1 22/04/202514:55 25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic 12 10/07/202417:34 12/07/202414:34
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 20:15 Mesenger - Gendan chathistorik Af 1Dorte i Apps til Android
I går 17:02 lukkede cookies i microsoft edge Af ole falsted i Browsere
I går 14:02 Tage et billede om dagen iPhone 7 Af chiefbigchief i Mobiltelefoner
I går 13:49 Mp3 afspiller med phono stik og display Af cht22 i Andet hardware
I går 09:53 Opdatering til Windows 11 Af Bit i PC
White papers
Flere white papers »