Avatar billede flodhesten Nybegynder
14. maj 2006 - 20:49 Der er 3 kommentarer og
1 løsning

aspSmartUpload, ændr filnavn

Jeg har denne aspSmartUpload kode:

<%

Dim objUpload

Set objUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

objUpload.MaxFileSize = 50000

On Error Resume Next

Dim strUploadPath

strUploadPath = "/upload/"

Dim intFileCount

objUpload.Upload

intFileCount = objUpload.Save(Server.MapPath(strUploadPath))

If Err Then
Response.Write "Der opstod en fejl :<br>" & vbCrLf
Response.Write Err.Description
Else
Response.Write intFileCount & " fil(er) uploadet.<br>" & vbCrLf
End If

Set objUpload = Nothing

%>


Hvad skal jeg tilføje i min kode for at få navngivet filen, eksempelvis via et felt i en form.

Forestiller mig noget lignende:

objfile.name = request.form("felt"

men jeg er sikkert helt galt.

På forhånd tak
Avatar billede tofte Juniormester
14. maj 2006 - 22:02 #1
du kan lave noget ala:

For intI=1 to objUpload.Files.count
  MyUpLoad.Files.Item(intI).Save(minStiTilDerHvorFilenSkalGemmes)
Next
Avatar billede tofte Juniormester
14. maj 2006 - 22:03 #2
Avatar billede flodhesten Nybegynder
15. maj 2006 - 20:42 #3
Hmm... Jeg er lidt nybegynder til dette komponent.

Hvis den fil man uploader skal omdøbes til "test", hvad skal man så skrive?

Kan du eventuelt putte det ind i koden og forklare hvad der sker? Det ville være en stor hjælp.
Avatar billede tofte Juniormester
16. maj 2006 - 12:34 #4
<%

Dim objUpload

Set objUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

objUpload.MaxFileSize = 50000

On Error Resume Next

Dim strUploadPath

strUploadPath = "/upload/"

Dim intFileCount

objUpload.Upload

For intI=1 to objUpload.Files.count
  MyUpLoad.Files.Item(intI).Save(strUploadPath & "test.jpg")
Next

If Err Then
Response.Write "Der opstod en fejl :<br>" & vbCrLf
Response.Write Err.Description
Else
Response.Write objUpload.Files.count & " fil(er) uploadet.<br>" & vbCrLf
End If

Set objUpload = Nothing

%>

Det kunne se ud som ovenstående. Jeg skal dog gøre opmærksom på, at jeg ikke selv har komponentet liggende, så der kan godt være lidt fejl i koden. Men komponentet er lavet til at uploader en eller flere filer på en gang, alt efter hvor mange "browse" felter man har på den side som sender filerne. Men alle filerne gemmes i samlingen objUpload.Files, med count finder man så ud af hvor mange filer der er. Man kan så bladre hver fil igennem ved eks at skrive objUpload.Files.Item(1) som giver den første og objUpload.Files.Item(2) som giver den anden fil osv. Hvis du kun har en browse boks, så er der kun en fil og alle andre end objUpload.Files.Item(1) er tomme. Hver objUpload.Files.Item(x) indeholder et fileItem som kan gemmes eller hvad man nu ellers ønsker dette gøres eks. med save(placering)
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