webForumDet fria alternativet

Type mismatch /fso.delete.file

6 svar · 213 visningar · startad av Jesper T

Jesper TMedlem sedan nov. 20017 144 inlägg
#1

Type mismatch: 'fso.DeleteFile'

/ner.asp, line 32

fso.DeleteFile sokvag&"\"&strFileName,sokvag&"\"&ny & right(strFileName,4)

PS. går det att byta ut :& right(strFileName,4)
till: & vadsomhelst (vilken filändelse som helst)

MVH Jesper T
------------------
If ASPackad date-1 then ASPerin Now

[Redigerat av Jesper T den 12 feb 2002]

Jesper TMedlem sedan nov. 20017 144 inlägg
#2

Nej det skall vara nåt sånt här:

bild = request.cokies("username")
fso.DeleteFile sokvag & bild

Men då hittar den ju ingen fil, det måste ju vara någon ändelse (den skall vara .gif eller .jpg)
Annars hittar den ju ingen fil!

MVH Jesper

------------------
If ASPackad date-1 then ASPerin Now

Jesper TMedlem sedan nov. 20017 144 inlägg
#3

Nej, nu gjorde jag så här i brist på fantasi, orkar någon kan ni kanske rätta det. Det verkar ju funka i alla fall

on error resume next
bild = request.cokies("username")
fso.DeleteFile sokvag&"\"&bild &".gif"
fso.DeleteFile sokvag&"\"&bild &".jpg"

MVH Jesper T

------------------
If ASPackad date-1 then ASPerin Now

solbulleMedlem sedan mars 20015 287 inlägg
#4

Ska väl kunna fungera, annars kan du kolla om filen verkligen fins med hjälp av en funktion liknande denna: http://cgi.webforum.nu/wf/Forum11/HTML/008982.html

------------------
/solbulle
Hemmabio | Spelautomater | The Who | The Who II

Jesper TMedlem sedan nov. 20017 144 inlägg
#5

Ok, men går det inte att slänga ut ett wildcard lixom?

TYP: fso.DeleteFile sokvag&"\"&bild &".%"

Som i en selectsats vid en sökning?

Tack för ditt svar på förra frågan, har inte hunnit tittat på det ännu!

MVH Jesper T

------------------
If ASPackad date-1 then ASPerin Now

solbulleMedlem sedan mars 20015 287 inlägg
#6
<%
sokvag = Server.MapPath("files\imgs\")
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Folder = FSO.GetFolder(sokvag)
set Files = Folder.Files
For each Item In Files
bild = request.cokies("username")
If Left(Item.Name, 4) = bild Then
FSO.DeleteFile sokvag&"\"&Item.Name
End If
Next
%>

Spelar ingen roll vad det är för filändelse. Allt ryker.

------------------
/solbulle
Hemmabio | Spelautomater | The Who | The Who II

Jesper TMedlem sedan nov. 20017 144 inlägg
#7

Tack vad bussigt!! :birp

------------------
If ASPackad date-1 then ASPerin Now

121 ms totalt · 3 externa anrop · v20260731065814-full.fb544a5a
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
119 ms — hämta tråd, inlägg och bilagor (db)