Avatar billede mannik Nybegynder
22. november 2003 - 17:32 Der er 8 kommentarer og
1 løsning

he he. jeg var for hurtig her

ja jeg var. Jeg får godt nok uploadet ....filnavnene men ikke filerne så jeg får kun udskrevet navn f.eks. mitbillede.jpg .

Ja grin bare færdig koden er her ; <html>
<head></head>
<body>
<%
if Request.ServerVariables("REQUEST_METHOD") = "POST" then

  '  Object creation
  Set upload = Server.CreateObject("aspSmartUpload.SmartUpload")
 
  'Upload filerne til memory
  upload.Upload
 
  upload.Save

  filnavn = upload.Files.Item(1).FileName

  'Gem filnanvet i databasen
  if filnavn <> "" then
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("\config\datasources\ads.mdb")
    strSQL = "INSERT INTO [comments] (annoncer) VALUES ('" & filnavn & "')"

    Conn.Execute(strSQL)
    Conn.Close
    Set Conn = Nothing
  end if
   
%>
<center> Filen er nu uploaded og gemt </center>
<%
else
%>

<form method="post" action="" ENCTYPE="multipart/form-data">
<input type="file" name="fil1">
<input type="submit" name="Upload" value="Upload">
</form>

</body>
</html>
<% end if %>
Avatar billede 44fire44 Nybegynder
22. november 2003 - 17:36 #1
skal "<% end if %>" ikke ind på den anden side af </html> og </body>???
Avatar billede mannik Nybegynder
22. november 2003 - 18:14 #2
ok, jeg har fået den til at smide filerne i en mappe for sig, det er fint nok men hvordan får jeg den til at vise filerne? De ligger i enmappe der hedder Upload og filnavnene er gemt i databasen comment i feltet annoncer
Avatar billede Slettet bruger
23. november 2003 - 00:57 #3
response.write "<a href='mappe/" & filnavn & "'>link til fil</a>"
Avatar billede mannik Nybegynder
23. november 2003 - 10:48 #4
hmmm .. jeg forstår ikke rigtigt , kunne vise mig i nedenstående hvordan det skulle se ud ? Det er muligt at jeg ike har fået nok kaffe endnu !
<%
Set objRS=objConnads.Execute("SELECT id, annoncer,images FROM comments")
Do while Not objRS.EOF
Response.Write"<tr><td>" & objRS("id") &"</td>"
Response.Write"<td>" & objRS("annoncer") &"</td>"
%>
<td><% if ObjRS("images")<>""then %><img src='www/upload/<%= ObjRS ("images")%>'<% end if %></td>
Avatar billede Slettet bruger
23. november 2003 - 11:02 #5
nåh... du kalder den annoncer.. sidste linje:
<td><% if ObjRS("annoncer")<>""then %><img src='www/upload/<%= ObjRS ("annoncer")%>'<% end if %></td>
Avatar billede mannik Nybegynder
23. november 2003 - 11:30 #6
Det virker næsten, vi er rigtigt tæt på men istedet for at vise filen så viser den kun teksten f.eks : img src='www/upload/fishbreath.jpg' gad vide om jeg skal have hele stien på linket ?
Avatar billede mannik Nybegynder
23. november 2003 - 11:32 #7
der manglede et < (min fejl) men nu får jeg det berømte røde kryds
Avatar billede mannik Nybegynder
23. november 2003 - 13:26 #8
Jeg giver dig point da jeg næsten er der , jeg er nu løbet ind i et andet problem. jeg opretter et nyt spørgsmål til det.
Avatar billede 44fire44 Nybegynder
23. november 2003 - 15:11 #9
tak fordi du svarede på mit spørgsmål...
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