26. februar 2008 - 17:01
Der er
6 kommentarer og
1 løsning
aspsmartupload getfilepath til access
hey jeg har mulighed for aspsmartupload komponentet, jeg skal lægge en masse billeder ind i en database nogle der ligger inde med en kode der tilføjer alle billedstierne til en tabel i access database.
ellers ved jeg ikke hvordan jeg får tilføjet alle de billeder :(
//jesper
26. februar 2008 - 21:33
#1
nu håber jeg da ikke at du lægger billederne ind i databasen - men i en mappe uden for - og i forhold til hvor mappen ligger - så angiver du bare stien der til i databasen - men det er ikke klogt at lægge stien i databasen men bare billednavn - så kan du trække det uanset i hvilket niveau du står.
her er hvor du omdøber filen og lægger den i en mappe der hedder billeder
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
mySmartUpload.Upload
Set File = mySmartUpload.Files("image") 'dit felt hvor du henter filen ind
If Not File Is Nothing Then
' finder navnet på filen
Navn = file.Filename
'omdøber filen
strdato2 = now()
strdato2 = replace(strdato2,"-","")
strdato2 = replace(strdato2,":","")
strdato2 = replace(strdato2," ","")
strdato2 = replace(strdato2,"/","")
Navn = file.Filename
Navn = replace(Navn,"æ","")
Navn = replace(Navn,"ø","")
Navn = replace(Navn,"å","")
Navn = replace(Navn,"Æ","")
Navn = replace(Navn,"Ø","")
Navn = replace(Navn,"Å","")
Navn = replace(Navn," ","")
Navn = replace(Navn,"%","")
Navn = trim(Navn)
Navn = replace(Navn,"."," ")
Navn = right(navn,Len(Navn)-InstrRev(Navn," "))
strdato2 = strdato2 & "." & Navn
if Navn <> "" then
File.SaveAs server.mappath("billeder/" & strdato2)
end if
end if
15. marts 2008 - 11:19
#5
ja det virker, men jeg skal jo bruge hele stien til billedet fx root/images/fil.jpg før at det gallery det kan hente billederne
19. marts 2008 - 01:32
#7
jeg tror det galleri der, det bliver lige indviklet nok for mig :) har fundet et alternativ.
men tak for hjælpen og selvfølgelig skal du også have points :)