Avatar billede hehlers Nybegynder
25. august 2005 - 15:17 Der er 14 kommentarer og
1 løsning

Fileup - filnavn på server

Hejsa

Jeg har en formular på en hjemmeside hvor folk skal kunne uploade dokumenter. Jeg vil bare gerne selv kunne bestemme filnavnet, hvilket jeg ikke kan få lov til med følgende kode:

    <%
    '  Upload.
    Dim oFileUp
    Set oFileUp = Server.CreateObject("SoftArtisans.FileUp")
    oFileUp.Path = Server.MapPath("/temp")
    oFileUp.Form("myFile").SaveAs ("CV_"& Request.form("myFile") &"")
    Set oFileUp = Nothing

    %>
----------------------------------

Jeg må åbenbart ikke bruge request.form sådan??

Ydermere skal jeg efterfølgende have hevet filnavnet ud i en streng, som jeg senere skal bruge. - Kan i også hjælpe mig med det??

På forhånd tusind tak.
Avatar billede tofte Juniormester
25. august 2005 - 15:23 #1
har du prøvet
oFileUp.ShortFilename den burde give filnavnet

Hvordan vil du selv bestemme filnavnet, skal det tastes i et andet felt eller ?
Avatar billede hehlers Nybegynder
25. august 2005 - 15:30 #2
Ja, - på forrige side har jeg et felt der hedder navn, så jeg vil eks. gerne have at filnavnet bliver: ("CV_" & Request.form("navn") &"_"& Request.form("filnavn") & "")

Håber det er forståeligt...  :)
Avatar billede tofte Juniormester
25. august 2005 - 15:34 #3
så skal du bare bruge oFileUp.Form("navn_på_felt"), da request.form ikke kan bruges pga formen på den forrige er sat op til at sende filer.
Avatar billede hehlers Nybegynder
25. august 2005 - 15:49 #4
yes, har jeg har prøvet. Det virker godt nok. Problemet er at det skal hedde mere end bare filnavnet. Vedkommendes navn skal også indgå i filnavnet nemlig...

Så den uploadede fil vil altid komme til at hedde: "CV_kundensnavn_kundensFilnavn.doc"

Her skal KundensNavn og Kundensfilnavn komme fra to felter på forrige side.
Avatar billede tofte Juniormester
25. august 2005 - 16:02 #5
men virker følgende ikke:
oFileUp.Form("myFile").SaveAs ("CV_"& oFileUp.Form("navn") &"-"&oFileUp.Form("navn"))
eller bare
oFileUp.SaveAs ("CV_"& oFileUp.Form("navn") &"-"&oFileUp.Form("navn"))
Avatar billede hehlers Nybegynder
26. august 2005 - 09:12 #6
Så virker det... :) Takker...

Kan du vise mig hvordan jeg henter filnavnet ud i en streng, som jeg senere kan bruge i en mail?
Avatar billede tofte Juniormester
27. august 2005 - 10:54 #7
det er lidt på samme måde. Du kan evt. først gemme strengen:
gemtStreng = "CV_"& oFileUp.Form("navn") &"-"&oFileUp.Form("navn")
og så gemme den efterfølgende med

oFileUp.SaveAs gemtStreng
Avatar billede hehlers Nybegynder
29. august 2005 - 09:28 #8
Hej igen tofte

Jeg har nu følgende kode:
-------------------------------------------
    angStilling = Request.Form("_AngStilling")
   
    Dim oFileUp
    Set oFileUp = Server.CreateObject("SoftArtisans.FileUp")
    oFileUp.Path = Server.MapPath("../../../temp")
    gemtStreng = "CV_"& oFileUp.Form("navn") &"-"&oFileUp.Form("navn")
    oFileUp.SaveAs gemtStreng
    Set oFileUp = Nothing


Set myMail = CreateObject("CDO.Message")
myMail.From = "minmail"
myMail.To = "minmail"
Mymail.Subject = "Emne " & angStilling
MyMail.textbody = "Job ansøgning angående stillingen: " & angStilling & vbcrlf & vbcrlf & Body
MyMail.AttachFile = gemtStreng
myMail.Send
Set myMail = Nothing
Response.Write("Ansøgning sendt")
----------------------------------------------------

Desværre får jeg følgende fejl, når jeg skal eksekvere den:
------------------------------
"Could not get valid code page." - I denne linie:
gemtStreng = "CV_"& oFileUp.Form("navn") &"-"&oFileUp.Form("navn")
Avatar billede tofte Juniormester
29. august 2005 - 22:33 #9
hmm. Kan ikke helt sige hvad der er galt. Men det skal nok ikke være form Navn begge gange.

Prøv evt at bytte
oFileUp.SaveAs gemtStreng
ud med
response.write gemtStreng

og så køre siden engang for at se om den giver et fornuftigt filnavn.
Avatar billede hehlers Nybegynder
30. august 2005 - 08:53 #10
Jeg kan sagtens få filen til at blive uploadet også lave et link til filen i en mail.

Problemet opstår når jeg skal have en Request.form fra forrige side, så fejler siden...

Jeg har følgende kode:
<%
    '  Upload.
    angStilling = Request.Form("_AngStilling")
   
    Dim oFileUp
    Set oFileUp = Server.CreateObject("SoftArtisans.FileUp")
    oFileUp.Path = Server.MapPath("../../../temp")
    gemtStreng = "CV_"& oFileUp.Form("navn") &"-"&oFileUp.Form("navn")&".doc"
    oFileUp.SaveAs gemtStreng
    'response.write gemtStreng
    Set oFileUp = Nothing


Set myMail = CreateObject("CDO.Message")
myMail.From = "framail"
myMail.To = "minmail"
Mymail.Subject = "Emne " & angStilling
MyMail.htmlBody = "Job ansøgning angående stillingen: " & angStilling & vbcrlf & vbcrlf & Body & "<p>Se vedhæftet dokument her: <a href='filadresse/"& gemtStreng &"'>Vedhæftet CV</a>"
'MyMail.AttachFile  gemtStreng
myMail.Send
Set myMail = Nothing
Response.Write("Ansøgning sendt")
%>
---------------------------

Dvs. det virker fint, når jeg ikke har denne linie med:
angStilling = Request.Form("_AngStilling")

Lige somom jeg ikke kan bruge request.form andre steder på siden. Kan det have noget at gøre med "ENCTYPE="MULTIPART/FORM-DATA" på forrige side??
Avatar billede hehlers Nybegynder
02. september 2005 - 08:57 #11
Uha tofte,- du gik vel ikke helt i pit?  ;)))
Avatar billede tofte Juniormester
08. september 2005 - 11:56 #12
jeg er her stadig. Jeg havde bare lige glemt dig. Jeg er ikke helt med på problemet. Men det er vigtig at du ikke bruger Request.form, hvis det er data fra en form hvor du uploader filer. Man bruger speciel data encodning når man sender filer afsted, herved bliver alle de andre felter i formen ulæselige med request.form, du skal i stedet benytte dig af dit upload component og benytte oFileUp.Form til at tilgå alle felter. Virker på samme måde. Hvis det ikke var svar på spørgsmålet, tror jeg lige at jeg skal have skåret problemet lidt mere ud i pap :-)
Avatar billede hehlers Nybegynder
13. september 2005 - 14:10 #13
Hej igen tofte...

Hvis jeg bruger denne her:
gemtStreng = "CV_"& oFileUp.Form("navn") &"-"&oFileUp.Form("navn")

Så kan jeg da ikke få fat i filen fra forrige side? Formen på formfeltet på forrige side hedder myFile. Der kommer i hvert fald ingen fil op på serveren.
Avatar billede tofte Juniormester
15. september 2005 - 18:06 #14
ok, hvis du sender scriptet til rasmus.toftegaard(a)gmail.com med en beskrivelse af hvad du du skal have gemt med hvilket navn, så skal jeg nok lige se på det. Det bliver nok først på lørdag eller søndag.

Jeg skal nok både bruge siden som sender og som modtager.

Men ovenstående burde jo give dig det ønskede filnavn, altså gemtStreng indeholder navnet. Så burde du kunne gemme med
oFileUp.SaveAs ......

men jeg ser gerne på det
Avatar billede hehlers Nybegynder
16. september 2005 - 11:11 #15
Har send dig en mail... :)

Jeg opretter lige et spørgsmål med nogle flere point til dig, når det virker...
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