Bjørn wrote in news:aeb35c$f34$1@sunsite.dk:
> nu er jeg nået så langt... men kan stadig ikke få det til at virke...
> den mælder hele tiden at "det virker ikke" hvad kan fejlen være, når
> filen eksistere... jeg har prøvet med mange andre filer...?
>
>
> Function ReportFileStatus(filespec)
> Dim fso, message
> Set fso = CreateObject("Scripting.FileSystemObject")
> If (fso.FileExists(filespec))=true Then
> Response.Write "det virker"
> Else
> Response.Write "det virker ik"
> End If
> End Function
>
> ReportFileStatus "/grafik/kenneler/22_1.jpg"
Du skal lave en specifik reference til din fil ... dvs din relative
reference virker ikke.
Prøv evt at køre det således:
Function ReportFileStatus(filespec)
Dim fso, message,strPathToFile
strPathToFile = server.mappath(filespec)
Set fso = CreateObject("Scripting.FileSystemObject")
If (fso.FileExists(strPathToFile))=true Then
Response.Write "det virker"
Else
Response.Write "det virker ik"
End If
End Function
ReportFileStatus "/grafik/kenneler/22_1.jpg"
:)
--
Jesper Stocholm
http://stocholm.dk
http://asp.stocholm.dk
Svar til gruppen og ikke til mig privat pr. email :|