7 svar · 456 visningar · startad av Thompa__85
Hejsan Wf!
Jag har ett litet problem här med ASPSmartUpload!
Jag får det att funka med uppladdningen och sånt! Men grejjen är den att jag vill kunna välja vad filen ska heta! Just nu får den det namn som den heter när man laddar upp den:
Så här är min kod:
mySmartUpload.Upload
mySmartUpload.Save(Server.MapPath("bildarkiv/"))
Läste lite på deras sida, och hitta denna kod:
myUpload.files.item(2).saveas "c:\temp\" & myUpload.files.item(2).filename
myUpload.files.item(3).saveas "/docs/" & myUpload.files.item(3).filename
myUpload.files.item(4).saveas "myFile.txt"
Men det funkar inte alls!
Hur gör jag egentligen för att kunna välja filnamn när den ska sparas? Till Tex Thomsson.gif
Tacksam för alla svar!
Mvh Andreas
Om det bara är en fil du laddar upp borde väl detta funka?
strFilename = "foo.bar"
mySmartUpload.Upload
mySmartUpload.Save
mySmartUpload.files.item(0).saveas Server.MapPath("bildarkiv/" & strFilename)
Helt otestat förstås, men borde rimligen kanske kunna fjungera.
@nders skrev:
Om det bara är en fil du laddar upp borde väl detta funka?
strFilename = "foo.bar" mySmartUpload.Upload mySmartUpload.Save mySmartUpload.files.item(0).saveas Server.MapPath("bildarkiv/" & strFilename)Helt otestat förstås, men borde rimligen kanske kunna fjungera.
Funkar inte riktigt...
aspSmartUpload.Files error '800404b5'
Invalid Files Name '0' (Error 1205)
Säger de dig nåt?
Kan prova med en kontroll på filen också.
<%
Dim mySmartUpload,file
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
mySmartUpload.Upload()
For Each file In mySmartUpload.Files
If NOT file.IsMissing Then
file.SaveAs("/bildarkiv/Thomsson.jpg")
End If
Next
Set mySmartUpload = Nothing
%>
*otestat*
Denkan skrev:
Kan prova med en kontroll på filen också.
<% Dim mySmartUpload,file Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload") mySmartUpload.Upload() For Each file In mySmartUpload.Files If NOT file.IsMissing Then file.SaveAs("/bildarkiv/Thomsson.jpg") End If Next Set mySmartUpload = Nothing %>*otestat*
:)
Nu säger den:
Unable to save file (Error 1120)
på denna kod:
file.SaveAs("/bildarkiv/Thomsson.jpg")
Du är säker på att du har skrivrättigheter i mappen?
Thompa__85 skrev:
:)
Nu säger den:
Unable to save file (Error 1120)på denna kod:
file.SaveAs("/bildarkiv/Thomsson.jpg")
Inte heller
file.SaveAs(Server.MapPath("bildarkiv/Thomsson.jpg"))
?