Du skal selvføglelig oprette et FileSystemObject før du kan gør dette, så denne kode er måske et bedre eksempel.
Function ShowFileAccessInfo(filespec) Dim fso, f, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile(filespec) s = f.Path & "<br>" s = s & "Created: " & f.DateCreated & "<br>" s = s & "Last Accessed: " & f.DateLastAccessed & "<br>" s = s & "Last Modified: " & f.DateLastModified ShowFileAccessInfo = s End Function
Tak for det, desværre skriver den at filen ikke kan findes. Dette er både prøvet internettet og intranet. Jeg har ingen problemer med at se koden via Internet Explorer. Nogle andre bud? P.s. skal man connecte til serveren først, jeg har engang brugt httpGET i C++, der skulle man til hosten først.
Jeg fandt selv svaret, ved at søge under "download", her er et par gode eksempler der virker.
Synes godt om
Ny brugerNybegynder
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.