Slet billede fra oversigt

<%
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Folder = FSO.GetFolder("d:\home\borderwinesdk\www\images\vin")
Count = 0
For Each File In Folder.Files
    Response.Write "<a href='../../images/vin/" & File.Name & "' target='_blank'><img src='../../images/vin/" & File.Name & "' style='width:95px; height:75px; border:0; margin:2px 2px 2px 2px;'></a><br>"& File.Name &"(<a href='"& Request.ServerVariables("SCRIPT_NAME") &"?file="& File.Name &"'>slet</a>)"
    Count = Count + 1
    If Count Mod 6 = 0 Then Response.Write "<br>"
Next
    picture_file = Server.MapPath("../../images/vin/"& Request.QueryString("file"))
    If FSO.FileExists(picture_file) Then
        FSO.DeleteFile(picture_file,true)
    End If

Set Folder = Nothing
Set FSO = Nothing
%>

Microsoft VBScript compilation error '800a0414'

Cannot use parentheses when calling a Sub

/admin/vin/oversigt_billeder.asp, line 84

FSO.DeleteFile(picture_file,true)
---------------------------------^

jeg er en idiot - jeg kom til at acceptere :)

If FSO.FileExists(picture_file) Then
        FSO.DeleteFile picture_file,true
    End If

http://border-wines.dk.virker.nu/admin/vin/oversigt_billeder.asp
jeg har fjernet ,true - det virker sikker ikke nu, men så kan du se layout
.
kan man få filnavnet til at stå under billedet ?

hvordan ville man skulle gøre det hvis billedet skulle forsvinde efter det er slettet - det er ikke som nu bliver blankt?

<%
Set FSO = Server.CreateObject("Scripting.FileSystemObject")

picture_file = Server.MapPath("../../images/vin/"& Request.QueryString("file"))If FSO.FileExists(picture_file) Then
    FSO.DeleteFile picture_file, True
End If

Set Folder = FSO.GetFolder("d:\home\borderwinesdk\www\images\vin")
Count = 0
For Each File In Folder.Files
    Response.Write "<a href='../../images/vin/" & File.Name & "' target='_blank'><img src='../../images/vin/" & File.Name & "' style='width:95px; height:75px; border:0; margin:2px 2px 2px 2px;'></a><br>"& File.Name &"(<a href='"& Request.ServerVariables("SCRIPT_NAME") &"?file="& File.Name &"'>slet</a>)"
    Count = Count + 1
    If Count Mod 6 = 0 Then Response.Write "<br>"
Next

Set Folder = Nothing
Set FSO = Nothing
%>

cool - så ryger de bare af :)
http://border-wines.dk.virker.nu/admin/vin/oversigt_billeder.asp
jeg har to ting:
a. hvordan kommer filnavnet til at stå under billedet
b. hvor skal jeg indsætte formattering fra mit stylesheet, jeg har prøvet mange kombinationer, men den tager ikke imod

din url virker ikke...?

prøv selv: http://border-wines.dk.virker.nu/admin/vin/oversigt_billeder.asp

prøv nu - my bad - sorry!

prøv:

Response.Write "<div style='float: left;'><a href='../../images/vin/" & File.Name & "' target='_blank'><img src='../../images/vin/" & File.Name & "' style='width:95px; height:75px; border:0; margin:2px 2px 2px 2px;'></a><br>"& File.Name &"(<a href='"& Request.ServerVariables("SCRIPT_NAME") &"?file="& File.Name &"'>slet</a>)</div>"

fedt - det virker

mht formattering ift stylesheet burde jeg så ikke kunne gøre:

Response.Write "<div class="10BlackNormal" style='float: left;'><...

.det godtager den bare ikke :(

Response.Write "<div class='10BlackNormal' style='float: left;'><...

det afhænger også af hvilke elementer der skal formateres...

filnavnet og "Slet" skal formatteres

så laver du en style mere i dit stylesheet:

.10BlackNormal a{
  /*alle dine styles her*/
  }

tak for al din hjælp :)

selv tak :o)