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
@ndersMedlem sedan juni 200032 969 inlägg 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?
DenkanMedlem sedan juni 2002256 inlägg 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")
DenkanMedlem sedan juni 2002256 inlägg Du är säker på att du har skrivrättigheter i mappen?
DenkanMedlem sedan juni 2002256 inlägg
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"))
?
