22. oktober 2002 - 23:41Der er
12 kommentarer og 2 løsninger
At slette en fil
Jeg har en funktion, som opretter en temporær fil (minfil.rtf), som jeg efterfølgende skal slette. Til sletningen bruger jeg koden nedenunder, hvilket virker fint i WinXP, men den virker desværre ikke i Win98.
Er der nogen, der har koden, som også virker i Win98.
Set fs = Application.FileSearch With fs .LookIn = "C:\" .FileName = "minfil.rtf" If .Execute > 0 Then Set fso = CreateObject("Scripting.filesystemobject") fso.deletefile ("c:\minfil.rtf") Set fso = Nothing End If End With
Denne fil skal jeg have slettet bagefter, så uvedkommende ikke kan gå direkte ind og se indholdet i den. Jeg har derfor sat slettefunktionen ind som en del af onclick-hændelsen til min luk-knap til en formular, men jeg kan desværre ikke få den til at virke i Win98.
Jeg tror ikke at dit problem er selve koden ! Jeg bruger nøjagtig den samme kode ( bortset fra () om filnavnet ) og den virker 100% på Windows 98 Men det virker kun hvis det er Windows 98 second edition. Jeg kan heller ikke få det til at fungere på first edition. Det er et eller andet med scription hosten der åbenbart driller på first edition.
Det program jeg laver, skal gerne kunne installeres på en Win98-maskine uden at brugeren er nødt til at hente nyeste version af WSH. Det er under testningen af programmet, jeg har fundet fejlen.
Jeg ved ikke hvilken del af koden, der ikke virker, for jeg har ingen diagnostiske værktøjer på min Win98-maskine. Jeg vil nemlig helst have en helt ren installation at teste på.
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.
