AspSmartUpload uploader intet
Jeg har oprettet dette spg. en gang.Men prøver igen nu..!
tidligere spg!
http://www.eksperten.dk/spm/364317
Jeg har installeret ASPSmartUpload på min egen server, derefter prøver jeg at uploade en fil til min server med følgende script:
<%
' Variables
' *********
Dim mySmartUpload
Dim intCount
' Object creation
' ***************
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
' Upload
' ******
mySmartUpload.Upload
' Select each file
' ****************
For each file In mySmartUpload.Files
' Only if the file exist
' **********************
If not file.IsMissing Then
' Save the files with his original names in a virtual path of the web server
' ****************************************************************************
'file.SaveAs(server.mappath("\gfx\billedarkiv\" & MySmartUpload.form("fileUpload_dir")) & file.FileName)
' sample with a physical path
file.SaveAs("c:\" & file.FileName)
' Display the properties of the current file
' ******************************************
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>")
intCount = intCount + 1
End If
Next
' Display the number of files which could be uploaded
' ***************************************************
Response.Write("<BR>" & mySmartUpload.Files.Count & " files could be uploaded.<BR>")
' Display the number of files uploaded
' ************************************
Response.Write(intCount & " file(s) uploaded.<BR>")
response.write "<a href='default.asp'>Tilbage</a>"
%>
Jeg får følgende resultat fra scriptet:
Formen fileUpload_dir findes på den side jeg submitter til denne side.
Resultatet af et kald til dette script er følgende:
Name = FILE1
Size = 7796
FileName = Dhmhelp.txt
FileExt = txt
FilePathName = D:\DO_DATA\Dhmhelp.txt
ContentType = text/plain
ContentDisp = form-data
TypeMIME = text
SubTypeMIME = plain
10 files could be uploaded.
1 file(s) uploaded.
Tilbage
Men problemet er at der ikke bliver uploadet filer til nogen mapper..
Jeg har prøvet både:
file.SaveAs(server.mappath("\gfx\billedarkiv\" & MySmartUpload.form("fileUpload_dir")) & file.FileName)
og med:
file.SaveAs("c:\" & file.FileName)
Jeg har i forvejen ingen erfaring med SmartUpload, men jeg tror jeg har fået det installeret rigtigt da der ikke kommer nogen fejl fra scriptet...Håber der er nogen der kan hjælpe!
..Ellebæk!
