Avatar billede mini-me Nybegynder
04. juli 2002 - 13:55 Der er 10 kommentarer og
1 løsning

Generering af thumbnails

Jeg har problemer med at få dette til at fungerer :

Det er i den her linie : .LoadImage Server.MapPath(sPathIn)
nogen der har en løsning?? Så ville jeg bliver glad !!

<%
  if Request.Querystring("uploading") = "ok" then
      Set Upload = Server.CreateObject("Persits.Upload")
    Count = Upload.Save("E:\WWWRoot\bilnyt.dk\upload")
    Response.Write Count & " fil(er) modtaget."
    Response.Write "<br>"
    For Each File in Upload.Files 
    Randomize
Response.Expires = 0

Dim oImg, lOldWidth, lOldHeight, lNewWidth, lNewHeight
Dim lRandom
Dim sPathIn, sPathOut

'Random value to cheat browser-cache
lRandom = Int(Rnd * 1000000)

'File to load
sPathIn = File.Path

'File to save
sPathOut = "output_" & File.Path

Set oImg = Server.CreateObject("aeImage.Canvas")
With oImg
    'Load the image and get dimensions
    .LoadImage Server.MapPath(sPathIn)
    lOldWidth = .Width
    lOldHeight = .Height
   
    'Resize to 100px width - when a dimension (height for this one) is
    'omitted, proportions will be automatically constrained.
    .Resize 150
    lNewWidth = .Width
    lNewHeight = .Height
   
    'Save the image (remember to set write permissions on your server)
    .SaveImage Server.MapPath(sPathOut)
End With
   
   
    Response.Write File.Path & "<br>"
    Next
  End if
%>
<form method="post" enctype="multipart/form-data" action="upload.asp?uploading=ok">
  <input type=file name="file1"><br>
  <input type=file name="file2"> <br>
  <input type=file name="file3"><br>
  <input type=file name="file4"><br>
  <input type=file name="file5"><br>
  <input type=file name="file6"><br>
  <input type=file name="file7"><br>
  <input type=submit value="upload!">
</form>
%>
Avatar billede mini-me Nybegynder
04. juli 2002 - 14:12 #1
Slet ingen der kan gennemskue det??
Avatar billede steen_hansen Forsker
04. juli 2002 - 14:20 #2
Lytter med :o)
Avatar billede mini-me Nybegynder
04. juli 2002 - 14:27 #3
Det er blot den her linie : .LoadImage Server.MapPath(sPathIn)
der skal ændres.. men til hvad ved jeg ikke..!!
Avatar billede eagleeye Praktikant
04. juli 2002 - 14:59 #4
Hvilken fejl kode+tekst får du i den linie?
Avatar billede mini-me Nybegynder
04. juli 2002 - 15:02 #5
Error Type:
Server.MapPath(), ASP 0172 (0x80004005)
The Path parameter for the MapPath method must be a virtual path. A physical path was used.
/bilnyt.dk/admin/upload.asp, line 27
Avatar billede eagleeye Praktikant
04. juli 2002 - 15:46 #6
Så vil jeg gætte du du ikke behøver Server.MapPath da den alderrede er en pysisk sti (d:\xxx\images\fi.jpg).

Så denne:
.LoadImage Server.MapPath(sPathIn)

Rettes til:
.LoadImage sPathIn
Avatar billede eagleeye Praktikant
04. juli 2002 - 15:47 #7
hmmm pysisk = fysisk
Avatar billede mini-me Nybegynder
04. juli 2002 - 15:53 #8
Det ser ud som om det fungerer i den linie, men så nede under .save går det galt.. hvis jeg prøver at andre den linie.. lige som den anden... fungerer det stadig ikke..
Avatar billede eagleeye Praktikant
04. juli 2002 - 19:25 #9
Hvad skal filen hedde ?
sPathOut bliver sta til dette:  sPathOut = "output_" & File.Path
Eksvis hvis Fíle.Path = "D:\images\fil.jpg" så bliver din output fil:
output_d:\images\fil.jpg

File.Path indeholder nemlig både Sti + Filnavnet på filen.
Avatar billede eagleeye Praktikant
04. juli 2002 - 19:48 #10
Hvis din thumbnails skal hedde output_filnavn.asp så skal du ændre denne linie:
sPathOut = "output_" & File.Path

Til disse to:
intCut = inStrRev(File.Path,"\")
sPathOut = left(File.Path,intCut) & "output_" & mid(File.Path,intCut+1)



Så skal denne rettes:
.SaveImage Server.MapPath(sPathOut)

Til:
.SaveImage sPathOut
Avatar billede mini-me Nybegynder
04. juli 2002 - 20:03 #11
eagleeye: det kom jeg også selv frem til men du hjalp mig en godt på vej så du får lige din points :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester