---
title: "Skriva ut filnamn utan filändelse"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/42937-skriva-ut-filnamn-utan-filändelse"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Addeladde"
published: "2002-05-02T14:52:56.000Z"
updated: "2002-05-02T15:29:42.000Z"
replies: 2
views: 264
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/42937-skriva-ut-filnamn-utan-filändelse"
---

# Skriva ut filnamn utan filändelse

## #1 — Addeladde, 2002-05-02T14:52Z

Hej jag har jätte stressigt med en med en sak och hinner inte klura på det så nån av er kanske har ett snabbt och bra svar.

Jag listar ett antal filer med hjälp av ett asp-script men jag vill inte att filändelsen ska synnas. Hur gör jag?

så här ser min kod ut:

```
 <%
If Request.QueryString("path") = "" Then
StartMapp = "d:\clients\testsite.se\wwwroot\ljufiler\ivr"
StartMappUrl = "http://www.testsite.se/ljudfiler\ivr"

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 

For Each folder in underkataloger

If folder.Attributes < 50 then
%>
        <table border="0" width="500">
          <tr>
            <td width="29%" bgcolor="#999999"><font face="Verdana"><strong>IVR</strong></font></td>
       
      </tr>
      <tr>
            <td width="29%" bgcolor="#FFFFFF"><strong><small><small><font face="Verdana"><img src="../bilder/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>
        </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%" bgcolor="#FFFFFF"><small><small><font face="Verdana"> 
              &nbsp; 
              <% Response.Write "<a href=" & StartMappUrl & "/" & folder.name &  ">" & folder.name & "</a> <br>" %> </font></small></small></td>
       
      </tr>
	  </table>
<%
end if
Next  

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

Tack på förhand
Andreas

Permalänk: https://www.webforum.nu/p/42937

## #2 — OveRRidE, 2002-05-02T15:00Z

```
str = "filnamn.jpg"

response.write left(str,instr(str,".") -1)
```

Red.) Felkodat. :l

Permalänk: https://www.webforum.nu/p/664342

## #3 — Addeladde, 2002-05-02T15:29Z

Tackar 

Det sparade mig många minuter

Permalänk: https://www.webforum.nu/p/664350

---

Tråden på webben: https://www.webforum.nu/amne/asp/42937-skriva-ut-filnamn-utan-filändelse