Upload, rezise og navngivning af billede

Hvilke komponenter har du adgang til?

Altså en upload-komponent, og en til behandling af billeder.

Imagesize,AspImage,ASPupload

Tag lige et kig på likedon's kode i dette spørgsmål. http://www.eksperten.dk/spm/229329 det er vist tæt på det du søger, hvis du vil havde det med databasen med skal du lige læses spørgsmålet igennem, det er nu en god ide lige gyldigt hvad..

eagle > Ja det ser ikke så tosset ud...

eagle > Har lige haft travlt med en masse andet..
Har stykket følgende sammen for lissom at teste:
*************************
<!-- #include file="includes/adovbs.inc" -->
<!-- #include file="includes/mysql_con.asp" -->

<html>
<body>

<form method="post" enctype="multipart/form-data" action="pic.asp?p=uploaded">
  <input type=file name="file1"><br>
  <input type=file name="file2"><br>
  <input type=file name="file3"><br>
  <input type=submit value="upload!">
</form>

</body>
</html>

<% If request.querystring("p") = "uploaded" Then

  Set Upload = Server.CreateObject("Persits.Upload.1")
  Upload.Save("d:\home\boligtavlendk\db\annoncepics\")

For Each File in Upload.Files
    If File.ImageType <> "JPG" Then
        Response.Write "This is not a JPGE image."
        File.Delete
        Response.End
    End If

StorX = 600
StorY = 450

lilleX = 100
lilleY = 100

    Set Image = Server.CreateObject("AspImage.Image")

    Image.LoadImage File.Path

    Image.Resize StorX,StorY
    Image.ImageFormat = 1
    Image.JPEGQuality = 75
    Image.FileName = "d:\home\boligtavlendk\db\annoncepics\stor_" & File.FileName
    Image.SaveImage

picstor=Image.FileName
Image.LoadImage File.Path

    Image.Resize lilleX,lilleY
    Image.ImageFormat = 1
    Image.JPEGQuality = 75
    Image.FileName = "d:\home\boligtavlendk\db\annoncepics\lille_" & File.FileName
    Image.SaveImage
   
    piclille=Image.FileName
   
    Set Image = nothing   

%>
    <IMG SRC="<% = piclille %>"><BR>
    <IMG SRC="<% = picstor %>"><BR>
<%
Next
End If %>
****************************
men den fejler i linie 42 som er
Image.FileName = "d:\home\boligtavlendk\db\annoncepics\stor_" & File.FileName og fortæller mig at Object doesn't support this property or method: 'File.FileName'

Jeg har lige løst det med et autogenereret identificerings id...
Nu mangler jeg faktisk kun en ting!
Jeg har et script jeg inkluderer på samtlige sider, som sletter recordsets hvis de er mere end en måned gamle...
Hvordan kan jeg udvide det så det også sletter det tilhørende billede?

Der er vist for mange nye spørgsmål til at holde under dette...