Jag har en kodsnutt som funkar fint på en en webbplats (sist jag testade) men när jag försöker köra den på ett anat ställe så får jag ett felmeddelande som säger: The system cannot find the path specified. Det visade sig att det "nya" webbhotellet hade en något äldre version av ASPUpload. Jag fick lägga till .1 i:INget filnamn med ASPUpload
Jag har konstaterat att sökvägen är ok men jag får inte ut något filnamn. Hur jag än vänder på metoden att ladda upp filen så funkar det inte. Några tips?
<code>
<%
Set Upload = Server.CreateObject("Persits.Upload")
Upload.SetMaxSize 50000, True '---Max filstorlek i byte---
Upload.SaveToMemory '---Ladda upp bilden till temporärt minne---
'---Kolla om någon fil är vald---
Set File = Upload.Files("FImange")
If Not File Is Nothing Then
Filename = file.ExtractFileName '---Hämta filnamnet---
Else
Filname = NULL '---Annars är variablen "Filname" = NULL---
End If
For Each File in Upload.Files '---Felhantering vid uppladdning av bild---
If File.ImageType = "UNKNOWN" Then
Response.Redirect("Error.asp?Error=NoImage") '---Om det inte är en bildfil, skicka vidare---
End If
'---Lägg bildens sökväg, bredd och höjd i variablar---
StrPath=File.Path
IntWidth=File.ImageWidth
IntHeight=File.ImageHeight
Next
'---Kontrollera bred och höjd på bilden---
If IntWidth > 300 OR IntHeight > 500 Then
Response.Redirect("Error.asp?Error=ImageSize")
End If
'---Bilden är OK och sparas på servern---
Path = Server.MapPath("/bilder/")
Response.Write(Filname)
For Each File in Upload.Files
File.SaveAs Path & "/" & File.ExtractFileName
Next
%>
</code>Sv: INget filnamn med ASPUpload
<code>
Set Upload = Server.CreateObject("Persits.Upload.1")
</code>
Nu funkar det fint.