---
title: "fso & delete igen"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/174538-fso-delete-igen"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Biasse"
published: "2008-10-05T12:40:34.000Z"
updated: "2008-10-07T09:28:04.000Z"
replies: 5
views: 505
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/174538-fso-delete-igen"
---

# fso & delete igen

## #1 — Biasse, 2008-10-05T12:40Z

Jag provar mig fram lite med fso och det jag började med funkade inte. Iden är så här:  Jag vill kunna ladda upp en bild som sparas i en mapp samt i mdb. Skulle man vilja ändra bilden så ändras mdb via update men hur ska man göra för att radera rätt bild i mappen? Nån som har en bra ide om detta?

```
' **Laddar upp filen**
strFixAllow = strAllow
strFixAllow = Replace(strFixAllow,",","&nbsp")

Files_upload	= Server.MapPath(strUploadFolder)
Set objFSO	= Server.CreateObject("Scripting.FileSystemObject")
Set objFolder	= objFSO.getFolder(Files_upload)
	
If Request.QueryString("action") = "post" then

'**Tar bort rätt bild**

NÅTT SKA VÄL IN HÄR

'*****************

Set Upload	= get_upload_files()
fcontent	= Upload("upload").Item("content")

extension = right(extract_filename(Upload("upload").Item("filename")),4)
If objFSO.FileExists(Files_upload & "\" & extract_filename(Upload("upload").Item("filename"))) Then
Session("mess") = "Det finns redan en fil med det namnet, byt namn på filen !!!"
Response.Redirect strPageName
Else
If instr(strAllow,extension) then
Set File	= objFSO.CreateTextFile(Files_upload & "\" & extract_filename(Upload("upload").Item("filename")))
                        
'**Lägger in filnamn i en databas**

Post = 	Request.Cookies("anvnamn")
userID = Request.Cookies("userID")
                        
Set objConn = Server.CreateObject("ADODB.Connection")
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../lagret/nisse.mdb")
objConn.Open strConn
							
strSQL = "update admin set avatar='"&_
extract_filename(Upload("upload").Item("filename")) & "' " &_
"where id = " & userid
								         
objConn.Execute(strSQL),,128
							
objConn.Close
Set objConn = Nothing
```

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

## #2 — oskars, 2008-10-05T12:44Z

```
Option Explicit

Function Main()

	Dim oFSO
	Dim sSourceFile

	Set oFSO = CreateObject("Scripting.FileSystemObject")

	sSourceFile = "C:\"&minFil&""

	If oFSO.FileExists(sSourceFile) Then
		oFSO.DeleteFile sSourceFile
	End If

	' Clean Up
	Set oFSO = Nothing

	Main = DTSTaskExecResult_Success
End Function
```

Typ? :)

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

## #3 — Biasse, 2008-10-05T13:10Z

Jo men om 10 personer har sin bild i mappen och en av dom vil byta. Då måste den hitta den rätta.   Men hur skriver man då sökvägen rätt istället för "C:\\"&minFil&""

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

## #4 — voigtann1, 2008-10-05T14:37Z

Varför inte bara ha en inparamter där du ange en dynamisk källa då?:

```
Function DeleteFiles(sFilePath)
	DeleteFiles = False
	Dim oFSO, sSourceFile

	Set oFSO = CreateObject("Scripting.FileSystemObject")

	sSourceFile = "C:\" & sFilePath

	If oFSO.FileExists(sSourceFile) Then
		oFSO.DeleteFile sSourceFile
		DeleteFiles = True
	End If

	Set oFSO = Nothing
End Function
```

 Om mappen Biasse skall rensas:

```
If DeleteFiles("Biasse") Then
Response.Write "Alla mapp funnen och filer är borttagna"
End If
```

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

## #5 — nakoz, 2008-10-07T09:13Z

Sen skulle det kunna vara ett alternativ att plocka ut filnamnet ur databasen innan du uppdaterar din mdb med det nya filnamnet.

Temp-lagra i en session och sen nyttja något av de exempel som voigtann1 och oskars föreslagit...

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

## #6 — Fredde Mannen, 2008-10-07T09:28Z

> **Biasse skrev:**
>
> Jag vill kunna ladda upp en bild som sparas i en mapp samt i mdb. Skulle man vilja ändra bilden så ändras mdb via update men hur ska man göra för att radera rätt bild i mappen? Nån som har en bra ide om detta?

Se till att bilden du då låter varje individ ladda upp får ett unikt namn, speciellt om de sparas i samma mapp. 

Med fördel kan du spara filens sökväg i databastabellen, sedan vid uppdateringen raderar du filen via informationen du får från databasen, sedan sparas den nya filen ned, och nödvändig info uppdateras i databasen!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/174538-fso-delete-igen