Det är första gången jag använder ASPSmartUpload, så jag har inte så stor erfarenhet inom detta område...
Set objUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
objUpload.Upload
objUpload.Save(Server.MapPath("skolarbeten\")) 'Rad 6
Felmeddelande skrev:
aspSmartUpload.File error '80040460'
Unable to save file (Error 1120)
skolarbeten.asp, line 6
Jag har testat med att skriva ut Server.MapPath("skolarbeten\") och sökvägen stämde.
Vad kan felet vara?
<form action="<%=strFilnamn%>?do=addskolarbete" method="post" enctype="multipart/form-data">
<input type="file" name="filen"><br>
<!-- Plus några input-taggar som ska läggas in i databasen -->
<input type="submit" value="---------------------------->">
</form>
PRB: aspSmartUpload.File error '80040460'. Unable to save file (Error 120)
This error may be returned by the component when it can't save a file. It often comes from the NT permissions on the directory. Check, and modify if needed, the security permissions on the directories in which you want the files to be uploaded.
Från deras eminenta faq.
(Behöver iofs inte vara det felet.)
Jag undrar hur jag ska jag göra för att lägga infon från formuläret i variabler så jag kan lägga det i en databas istället för att skriva ut dem. Denna kod använder jag.
<%
' Variables
' *********
Dim mySmartUpload
Dim item
Dim value
Dim file
' Object creation
' ***************
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
' Upload
' ******
mySmartUpload.Upload
mySmartUpload.Save("E:\data")
' FILES Collection
' ****************
Response.Write("<BR><STRONG>Files Collection</STRONG><BR>")
' Informations about files
' ************************
Response.Write("Number of files =" & mySmartUpload.Files.count &"<BR>")
Response.Write("Total bytes of files =" & mySmartUpload.Files.TotalBytes &"<BR>")
' Select each file
' ****************
For each file In mySmartUpload.Files
Response.Write(file.FileName & " (" & file.Size & "bytes)<BR>")
Next
' FORM Collection
' ***************
Response.Write("<BR><STRONG>Form Collection</STRONG><BR>")
' Select each item
' ****************
For each item In mySmartUpload.Form
' Select each value of the current item
' *************************************
For each value In mySmartUpload.Form(item)
Response.Write(item & " = " & value & "<BR>")
Next
Next
Sen så vill den inte heller spara det som jag försöker att ladda upp i den mappen jag angivit. Jag får inget felmedelande. Är det någon som kan hjälpa mig?