Avatar billede curriculum Nybegynder
25. februar 2004 - 12:34 Der er 4 kommentarer

Upload Dundas mangler filnavn

Jeg har lavet denne kode: men jeg kan ikke hente filnavnet. Hvordan gør jeg det ??

ASP kode:
<%
Set objUpload = Server.CreateObject ("Dundas.Upload.2")
objUpload.UseUniqueNames = False
objUpload.Save Server.Mappath("images\temp\")

For Each objUploadedFile in objUpload.Files
    Response.Write "Size: " & objUploadedFile.Size & " bytes<br>"
    Response.Write objUploadedFile.ContentType & "<br>"
Next
    For Each objFormItem In objUpload.Form
    Response.Write "<br>" & objFormItem & ": " & objFormItem.Value
Next

Set objUpload = Nothing

Response.Write "<br>File Name: " & sImage & "<br>"
Response.Write "<br>Dundas upload completed..."
%>
Avatar billede dk_akj Nybegynder
25. februar 2004 - 14:25 #1
<%
Set objUpload = Server.CreateObject ("Dundas.Upload.2")
objUpload.UseUniqueNames = False
objUpload.Save Server.Mappath("images\temp\")

For Each objUploadedFile in objUpload.Files
    Response.Write "Name: " & objUploadedFile.filename & " bytes<br>"
    Response.Write "Size: " & objUploadedFile.Size & " bytes<br>"
    Response.Write objUploadedFile.ContentType & "<br>"
Next

For Each objFormItem In objUpload.Form
    Response.Write "<br>" & objFormItem & ": " & objFormItem.Value
Next

Set objUpload = Nothing

Response.Write "<br>File Name: " & sImage & "<br>"
Response.Write "<br>Dundas upload completed..."
%>

//akj
Avatar billede steen Nybegynder
25. februar 2004 - 14:29 #2
Avatar billede curriculum Nybegynder
25. februar 2004 - 14:45 #3
att: dk_akj:

Fejltype:
Microsoft VBScript runtime (0x800A01B6)
Object doesn't support this property or method: 'objUploadedFile.filename'

att: steen:
GetFileName property er ikke til nogen nytte..
Avatar billede curriculum Nybegynder
25. februar 2004 - 14:47 #4
Svar:

Set objUpload = Server.CreateObject ("Dundas.Upload.2")
objUpload.UseUniqueNames = False
sPath = Server.Mappath("images\temp\")
objUpload.Save sPath

For Each objUploadedFile in objUpload.Files
    Response.Write "Size: " & objUploadedFile.Size & " bytes<br>"
    Response.Write objUploadedFile.ContentType & "<br>"
    sImage = objUploadedFile.OriginalPath
Next

aImage = SPLIT(strReverse(sImage),"\")
sImage = CStr(strReverse(aImage(0)))

Den her fungerer fint.. jeg har dog ikke testet filnavnet på uniquenumber..
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