Filhanterare

Här är koden...kanske någon vet hur man ska lösa det med mellanslag i filnamnet

<%
If Request.QueryString("path") = "" Then
StartMapp = "D:\Inetpub\wwwroot\code\Download\Components\ASP Components\"
StartMappUrl = "http://localhost/code/Download/Components/ASP Components"

Else

StartMapp = Request.QueryString("path")
StartMappUrl = Request.QueryString("url")

End If

Set filsystemobjekt = CreateObject("Scripting.FileSystemObject")
Set folder = filsystemobjekt.GetFolder(StartMapp)
Set filer = folder.Files 
Set underkataloger = folder.SubFolders 

%>
<html>

<head>
<title></title>
<!--<link rel="stylesheet" type="text/css" href="styles/shop.css">-->
</head>

<body bgcolor="#FFFFFF" text="#000000" vlink="#0000FF">

    <table align="center" cellpadding="0" cellapcing="0" border="0" width="800">
      <tr>
        <td width="29%" bgcolor="#FFFFDF"><font face="Verdana"><strong><small>Filnamn</small></strong></font></td>
        <td width="37%" bgcolor="#FFFFDF"><font face="Verdana"><strong><small>Filtyp</small></strong></font></td>
        <td width="17%" bgcolor="#FFFFDF"><font face="Verdana"><strong><small>Datum</small></strong></font></td>
        <td width="17%" bgcolor="#FFFFDF"><font face="Verdana"><strong><small>Storlek</small></strong></font></td>
      </tr>
      <tr>
<%
For Each folder in underkataloger

' Nedan kontrollerar vi så att det inte visas några mappar med konstiga attribut

If folder.Attributes < 50 then
%>
        <td width="29%"><strong><small><small><font face="Verdana"><img src="images/folder.gif" align="absmiddle" WIDTH="15" HEIGHT="13"> <% Response.Write "<a href=index.asp?url=" & StartMappUrl & "/" & folder.name & "&path="  & StartMapp & "\" & folder.name &  ">" & folder.name & "</a> <br>" %> </font></small></small></strong></td>
        <td width="37%"><small><small><font face="Verdana">mapp</font></small></small></td>
        <td width="17%"><small><small><font face="Verdana"><%= FormatDateTime(folder.DateCreated, 2) %> </font></small></small></td>
        <td width="17%"><small><small><font face="Verdana"><%= folder.Size %> </font></small></small></td>
      </tr>
<%
end if
Next  
%>
<%
For Each folder in filer

' Nedan kontrollerar vi så att det inte visas några filer med konstiga attribut

If folder.Attributes < 50 then
%>
      <tr>
        <td width="29%"><img src="images/dokument.gif" align="absmiddle" WIDTH="13" HEIGHT="16"><small><small><font face="Verdana"> <% Response.Write "<a href=" & StartMappUrl & "/" & folder.name &  ">" & folder.name & "</a> <br>" %> </font></small></small></td>
        <td width="37%"><small><small><font face="Verdana"><%= folder.Type %> </font></small></small></td>
        <td width="17%"><small><small><font face="Verdana"><%= FormatDateTime(folder.DateCreated, 2) %> </font></small></small></td>
        <td width="17%"><small><small><font face="Verdana"><%= folder.Size %> </font></small></small></td>
      </tr>
<%
end if
Next  
%>
    </table>

  </tr>
</table>
</body>
</html>
<%

Set filsystemobjekt = Nothing
Set folder = Nothing
Set filer = Nothing
Set underkataloger = Nothing

%>

[Redigerat av ironhead den 15 nov 2001]

Hur ska man göra för att en sträng inte ska bli avhuggen, om det är mellanslag...som i fallet ovan?

Detta är tråden jag letade http://cgi.webforum.nu/wf/Forum11/HTML/006065.html ...men den gav tydligen inget svar på min fråga.
Hur man fixar så att det funkar med mellanslag i filnamnet.

[Redigerat av ironhead den 16 nov 2001]

Man skall alltid ha citationstecken runt attribut i html-taggar om attributet innehåller andra tecken än a-z och 1-9. Dessutom måste vi i det här fallet även urlencoda mappnamnet.

Response.Write "<a href=""index.asp?url=" & server.urlencode(StartMappUrl) & "/" & server.urlencode(folder.name) & "&path=" & server.urlencode(StartMapp) & "\" & folder.name & """>"

Mvh,

1000-ggr tack @nders! Funkar kanon!

Ville bara ge en eloge till alla duktiga programmerare som tar sig tid att hjälpa alla personer som sliter sitt hår...bra jobbat å sug åt er äran

[Redigerat av ironhead den 16 nov 2001]

Verkar som att en liknande funktion öppnar upp för diverse säkerhetshål (syftar på länk i den inlänkade tråden) men det beror givetvs på hur man använder sig av det hela.

Själv kör jag IIS hemma men jag verkar inte kunna köra script med "FileSystemObject" vad krävs?

På vilket sätt fungerar det inte?
Får du felmeddelande? Står den och tuggar? Både när du använder FSO för att läsa och skriva?

När inträffar felet / felen?

Det kan bli problem med FSO om man Norton antivirusprogram installerat
http://support.microsoft.com/support/kb/articles/Q295/3/75.ASP

Jag är TOTALT hänförd av debn snabba respons man får här. Man hinner knappt vända ryggen till innan man har ett svar.
Jo, den står och tuggar och jo, det var mycket riktigt Norton som gjorde det.
(Jag tycker liksom att Norton mfl virus/brandväggprogram är ok, men de stoppar ibland lite väl mycket på automatik, man får knappt en chans att göra något åt saken/problemet. Iofs antagligen en inställningsfråga. Men det är överkurs i dennatråd.)

När jag ändå är i farten måste jag säga att jag använder wf väldigt mycket men ofta behöverman inte ens posta en fråga eftersom svaret redan finns om man söker.