Jag får detta fel med denna kod, kan se varför
Persits.Jpeg.1 error '800a0002'
The system cannot find the path specified.
/pictureupload/outputfile.asp, line 47
Rad 47 fetmarkerad
Dim mySmartUpload
Dim file
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
mySmartUpload.AllowedFilesList = "jpg,gif,png"
mySmartUpload.DenyPhysicalPath = True
mySmartUpload.MaxFileSize = 100000
mySmartUpload.Upload
Set file = mySmartUpload.Files("blob")
If file.IsMissing Then
Response.Write("Filen saknas!<BR>")
Else
strFil = file.FileName
file.SaveAs("/images/users/"&strFil)
Response.Write("Name = " & file.Name & "<BR>")
Response.Write("Size = " & file.Size & "<BR>")
Response.Write("FileName = " & file.FileName & "<BR>")
Response.Write("FileExt = " & file.FileExt & "<BR>")
Response.Write("FilePathName = " & file.FilePathName & "<BR>")
Response.Write("ContentType = " & file.ContentType & "<BR>")
Response.Write("ContentDisp = " & file.ContentDisp & "<BR>")
Response.Write("TypeMIME = " & file.TypeMIME & "<BR>")
Response.Write("SubTypeMIME = " & file.SubTypeMIME & "<BR>")
Set Jpeg = Server.CreateObject("Persits.Jpeg")
[b]Jpeg.Open "/images/users/"&file.FileName[/b]
L = 100
Jpeg.Width = L
Jpeg.Height = Jpeg.OriginalHeight * L / Jpeg.OriginalWidth
Jpeg.Save "/images/users/thumb"
End If