19. april 2004 - 19:28
Der er
29 kommentarer og 1 løsning
Hente DB værdi til filsendings felt i formular.
Hej har en hjemmeside med et upload til en access db, og en side til at redigere i de data der er uploadet. Siden hvor man redigere bliver de eksisterende værdier hentet ud i en formular hvor man kan rette i. der er lavet så man kan uploade billeder i samme upload, men i redigeringssiden bliver stien til billederne ikke hentet ud. Er der nogen der kan hjælpe mig med at få hentet stien ud?? Koden til siden ser sådan ud: --------------------------------- <html> <head> <meta http-equiv="Content-Language" content="da"> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <title>Salgsliste</title> </head> <body> <% mode=request.querystring("m") if mode="gem" then sti = "billeder/" Set Upload = Server.CreateObject("Persits.Upload") set conn = server.createobject("ADODB.connection") path = Server.MapPath("db/fpdb/sha.mdb") conn.Open "DBQ="& path &";DefaultDir="& path & ";Driver={Microsoft Access Driver (*.mdb)}" Upload.OverwriteFiles = False Upload.Save (Server.Mappath(sti)) fil1 = "" fil2 = "" fil3 = "" If Not Upload.Files("FILE1") Is Nothing Then fil1 = sti & Upload.Files("FILE1").FileName If Not Upload.Files("FILE2") Is Nothing Then fil2 = sti & Upload.Files("FILE2").FileName If Not Upload.Files("FILE3") Is Nothing Then fil3 = sti & Upload.Files("FILE3").FileName SQL="UPDATE tblBILSALG SET " SQL = SQL & "oprettet='" & Upload.form("oprettet") & "', " SQL = SQL & "[Mærke]='" & Upload.form("Mærke") & "', " SQL = SQL & "[Type]='" & Upload.form("Type") & "', " SQL = SQL & "[Brændstof]='" & Upload.form("Brændstof") & "', " SQL = SQL & "Farve='" & Upload.form("Farve") & "', " SQL = SQL & "[Årgang]='" & Upload.form("Årgang") & "', " SQL = SQL & "Kilometer='" & Upload.form("Kilometer") & "', " SQL = SQL & "Pris='" & Upload.form("Pris") & "', " SQL = SQL & "Synet='" & Upload.form("Synet") & "', " SQL = SQL & "[Billede 1]='" & fil1 & "', " SQL = SQL & "[Billede 2]='" & fil2 & "', " SQL = SQL & "[Billede 3]='" & fil3 & "' " SQL = SQL & " where ID_bil =" & request.querystring("ID_bil") Set RS = Conn.Execute(SQL) %><font face="Verdana"><span style="font-size: 9pt"> <meta http-equiv="refresh" content="2;URL=lukker.asp"> <font color="#FF0000">Dine ændringer er nu gemt.</font></span></font><b><font face="Verdana"><span style="font-size: 9pt"> <% else %> <% set conn = server.createobject("ADODB.connection") path = Server.MapPath("db/fpdb/sha.mdb") conn.Open "DBQ="& path &";DefaultDir="& path & ";Driver={Microsoft Access Driver (*.mdb)}" SQL = "SELECT * from tblBILSALG where Id_bil = " & Request.Querystring("ID_bil") set RS = Conn.Execute(SQL) Session("editID") = Request.Querystring("ID_bil") %> </span></font> <form method="POST" action="fjernsalgsliste.asp?m=gem&id_bil=<%=rs("ID_bil") %>" enctype="multipart/form-data"> <div align="center"> <center> <table border="0" cellpadding="0" cellspacing="0" height="44"> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Oprettet:</font></td> <td height="22"><font face="Verdana"><span style="font-size: 9pt"><input type="text" name="oprettet" size="50" value="<%=rs("oprettet") %>"></span></font></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Mærke:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Mærke" size="50" value="<%=rs("Mærke") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Model:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="model" size="50" value="<%=rs("Model") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Type:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Type" size="50" value="<%=rs("Type") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Brændstof:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Brændstof" size="50" value="<%=rs("Brændstof") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Farve:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Farve" size="50" value="<%=rs("Farve") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Årgang:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Årgang" size="50" value="<%=rs("Årgang") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Kilometer:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Kilometer" size="50" value="<%=rs("kilometer") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Pris:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Pris" size="50" value="<%=rs("Pris") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Synet:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="synet" size="50" value="<%=rs("synet") %>"></span></font></b></td> </tr> <tr> <td height="22" valign="top"> <font face="Verdana" style="font-size: 9pt">Beskrivelse:</font></td> <td height="22"><font face="Verdana"><span style="font-size: 9pt"><textarea rows="8" name="Beskrivelse" cols="40"><%=rs("Beskrivelse") %></textarea></span></font></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Billede 1:</font></td> <td height="22"><font face="Verdana"><span style="font-size: 9pt"><INPUT TYPE="FILE" SIZE="35" NAME="FILE1"></span></font></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Billede 2:</font></td> <td height="22"><font face="Verdana"><span style="font-size: 9pt"><INPUT TYPE="FILE" SIZE="35" NAME="FILE2"></span></font></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Billede 3:</font></td> <td height="22"><font face="Verdana"><span style="font-size: 9pt"><INPUT TYPE="FILE" SIZE="35" NAME="FILE3"></span></font></td> </tr> </table> </center> </div> <p align="center"> <font face="Verdana"><span style="font-size: 9pt"> <br> <span style="font-size: 8pt"> <input type="submit" value="Gem" name="gem"></span> </span></font> </p> </form> </b> <font face="Verdana" style="font-size: 9pt"> <% end if %> </font> </body> </html> ----------------------- PS. det er også muligt at uploade billeder fra redigeringssiden..
Annonceindlæg tema
Offentlig digitalisering
Fra effektivisering til digital suverænitet. Hvordan skaber det offentlige en digital fremtid med AI, sikkerhed og kontrol i centrum?
19. april 2004 - 19:36
#1
Hvad er det du ønsker? du kan evt vise billedet i en img tag ved fil input feltet, sådan disse linjer: <td height="22"><font face="Verdana" style="font-size: 9pt">Billede 1:</font></td> <td height="22"><font face="Verdana"><span style="font-size: 9pt"><INPUT TYPE="FILE" SIZE="35" NAME="FILE1"></span></font></td> Bliver til: <td height="22"><font face="Verdana" style="font-size: 9pt">Billede 1:</font></td> <td height="22"><font face="Verdana"><span style="font-size: 9pt"><INPUT TYPE="FILE" SIZE="35" NAME="FILE1"></span></font><img src="<%=rs("Billede 1")%>"></td>
19. april 2004 - 19:39
#2
Sådan som du foreslår.... så bliver billedet da vist gør det ikke?? Jeg vil gerne have at stien står i feltet, for ellers hvis man retter i teskten i de andre felter og gemmer, så har den ikke en refference til et billede længere da feltet til billeder er tomt... Jeg vil gerne have stien ud i feltet.
19. april 2004 - 19:42
#3
Jo det bliver vist, men det er umiligt at skrive stien i input feltet da du så skal vide hvor brugeren har gemt det billede han har uploaded. JEg merner godt du kan tilføje en value men
19. april 2004 - 19:43
#4
JEg merner godt du kan tilføje en value til fil inputet men det gør jo du ikke helt ved om det er et nyt eller det gamle billede der uploades. Hvis du vil give mulighed for at rette/slette et billede skal der mere til end kun et fil input.
19. april 2004 - 19:57
#6
Både og, som før skrevet. Du har stien på billedet på serveren og ikke på brugeres computer. Når du tyrkker opdater vil den jo tror det er et billede den skal uploade og det kan den ikke finde. men du kan da bare prøve at skrive det sådan her: <td height="22"><font face="Verdana" style="font-size: 9pt">Billede 1:</font></td> <td height="22"><font face="Verdana"><span style="font-size: 9pt"><INPUT TYPE="FILE" SIZE="35" NAME="FILE1" value="<%=rs("billede 1")%>"></span></font></td>
19. april 2004 - 20:00
#7
Så skriver den filnavet + stien. Jeg kan ikke helt huske hvad der sker, om den melder fil pga. filen eller den ser den som et tomt felt :)
19. april 2004 - 20:04
#8
Der sker intet ved at sætte det ind... det er stadigt et tomt felt...
19. april 2004 - 20:09
#9
hmm Ja der står value="". Problemet er et at file inputet er til at sende en fil fra client til server og derfor vil en relativ sti give noget forkert. Det jeg har set gjort før er at vise billedet og havde en checkbox som hedder slet. Hvis man vælger et nyt billede slettes det gamle også. Vælger man ikke noget billede sker der ikke noget, vælges slet, slettes billedet.
19. april 2004 - 20:15
#10
i dette tilfælde på min side sker det at hvis man ikke angiver et billede så gemmes et "tomt" felt i databasen... Det er det jeg vil undgå.... har du en idé ??
19. april 2004 - 20:17
#11
Så må du lave det sådan den ikke gemmer noget i det felt hvor billedet er tomt, sådan en linje som denne: SQL = SQL & "[Billede 1]='" & fil1 & "', " Bliver til: if fil1 <> "" then SQL = SQL & "[Billede 1]='" & fil1 & "', "
19. april 2004 - 20:25
#12
Det hjalp.... Alle tiders.. Så må jeg bare lige have lavet så der er en indikation om at der er gemt et billede!! Og det skal ikke være at billedet vises... men nærmere en tjeckboks eller noget
19. april 2004 - 20:26
#13
Ok, du kunne måske uskrive filnavnet som teskt over eller under input feltet?
19. april 2004 - 20:32
#14
Det gør jeg i første omgang.. Har du et eksempel på hvordan man laver sådan at der bliver vist et flueben hvis der er noget i feltet??
19. april 2004 - 20:35
#15
Ja en checkbox: <input type="checkbox" name="filfilndes" disabled <% if len(""&rs("billede 1")) = 0 then response.Write " checked " %> >
19. april 2004 - 20:36
#16
Eller man kan gøre sådan her hvis man vil havde det lidt mere overskueligt: <% var="" if len(""&rs("billede 1")) = 0 then response.Write var = " checked " %> <input type="checkbox" name="filfilndes" disabled <%=var%>>
19. april 2004 - 20:38
#17
hovsa.. Da jeg havde skrevet det med if fil1 .... if fil2 ... så fik jeg denne meddelelse nå jeg prøver at gemme.. ---------------- Microsoft OLE DB Provider for ODBC Drivers error '80040e14' [Microsoft][ODBC Microsoft Access Driver] Syntax error in UPDATE statement. /soeholm.toti.dk/fjernsalgsliste.asp, line 44
19. april 2004 - 20:40
#18
Hvordan ser koden ud for SQL sætningen nu?
19. april 2004 - 20:43
#19
arh fil 3 er den sidste kolonne, så koden må laves lidt om sådan man sætte , lidt før så disse: SQL = SQL & "Synet='" & Upload.form("Synet") & "', " SQL = SQL & "[Billede 1]='" & fil1 & "', " SQL = SQL & "[Billede 2]='" & fil2 & "', " SQL = SQL & "[Billede 3]='" & fil3 & "' " SQL = SQL & " where ID_bil =" & request.querystring("ID_bil") Bliver til: SQL = SQL & "Synet='" & Upload.form("Synet") & "' " if fil1 <> "" then SQL = SQL & ", [Billede 1]='" & fil1 & "' " if fil2 <> "" then SQL = SQL & ", [Billede 2]='" & fil2 & "' " if fil3 <> "" then SQL = SQL & ", [Billede 3]='" & fil3 & "' " SQL = SQL & " where ID_bil =" & request.querystring("ID_bil")
19. april 2004 - 20:43
#20
her er lige koden som den er nu.. og fejlen er i række 45, har lige indsat en linie.. ---------------------- <html> <head> <meta http-equiv="Content-Language" content="da"> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <title>Salgsliste</title> </head> <body> <% mode=request.querystring("m") if mode="gem" then sti = "billeder/" Set Upload = Server.CreateObject("Persits.Upload") set conn = server.createobject("ADODB.connection") path = Server.MapPath("db/fpdb/sha.mdb") conn.Open "DBQ="& path &";DefaultDir="& path & ";Driver={Microsoft Access Driver (*.mdb)}" Upload.OverwriteFiles = False Upload.Save (Server.Mappath(sti)) fil1 = "" fil2 = "" fil3 = "" If Not Upload.Files("FILE1") Is Nothing Then fil1 = sti & Upload.Files("FILE1").FileName If Not Upload.Files("FILE2") Is Nothing Then fil2 = sti & Upload.Files("FILE2").FileName If Not Upload.Files("FILE3") Is Nothing Then fil3 = sti & Upload.Files("FILE3").FileName SQL="UPDATE tblBILSALG SET " SQL = SQL & "oprettet='" & Upload.form("oprettet") & "', " SQL = SQL & "[Mærke]='" & Upload.form("Mærke") & "', " SQL = SQL & "[Model]='" & Upload.form("Model") & "', " SQL = SQL & "[Type]='" & Upload.form("Type") & "', " SQL = SQL & "[Brændstof]='" & Upload.form("Brændstof") & "', " SQL = SQL & "Farve='" & Upload.form("Farve") & "', " SQL = SQL & "[Årgang]='" & Upload.form("Årgang") & "', " SQL = SQL & "Kilometer='" & Upload.form("Kilometer") & "', " SQL = SQL & "Pris='" & Upload.form("Pris") & "', " SQL = SQL & "Synet='" & Upload.form("Synet") & "', " SQL = SQL & "Beskrivelse='" & Upload.form("Beskrivelse") & "', " if fil1 <> "" then SQL = SQL & "[Billede 1]='" & fil1 & "', " if fil2 <> "" then SQL = SQL & "[Billede 2]='" & fil2 & "', " if fil3 <> "" then SQL = SQL & "[Billede 3]='" & fil3 & "' " SQL = SQL & " where ID_bil =" & request.querystring("ID_bil") Set RS = Conn.Execute(SQL) %><font face="Verdana"><span style="font-size: 9pt"> <meta http-equiv="refresh" content="2;URL=lukker.asp"> <font color="#FF0000">Dine ændringer er nu gemt.</font></span></font><b><font face="Verdana"><span style="font-size: 9pt"> <% else %> <% set conn = server.createobject("ADODB.connection") path = Server.MapPath("db/fpdb/sha.mdb") conn.Open "DBQ="& path &";DefaultDir="& path & ";Driver={Microsoft Access Driver (*.mdb)}" SQL = "SELECT * from tblBILSALG where Id_bil = " & Request.Querystring("ID_bil") set RS = Conn.Execute(SQL) Session("editID") = Request.Querystring("ID_bil") %></span></font><form method="POST" action="fjernsalgsliste.asp?m=gem&id_bil=<%=rs("ID_bil") %>" enctype="multipart/form-data"> <div align="center"> <center> <table border="0" cellpadding="0" cellspacing="0" height="44"> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Oprettet:</font></td> <td height="22"><font face="Verdana"><span style="font-size: 9pt"><input type="text" name="oprettet" size="50" value="<%=rs("oprettet") %>"></span></font></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Mærke:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Mærke" size="50" value="<%=rs("Mærke") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Model:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="model" size="50" value="<%=rs("Model") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Type:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Type" size="50" value="<%=rs("Type") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Brændstof:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Brændstof" size="50" value="<%=rs("Brændstof") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Farve:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Farve" size="50" value="<%=rs("Farve") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Årgang:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Årgang" size="50" value="<%=rs("Årgang") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Kilometer:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Kilometer" size="50" value="<%=rs("kilometer") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Pris:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="Pris" size="50" value="<%=rs("Pris") %>"></span></font></b></td> </tr> <tr> <td height="22"><font face="Verdana" style="font-size: 9pt">Synet:</font></td> <td height="22"><b> <font face="Verdana"><span style="font-size: 9pt"> <input type="text" name="synet" size="50" value="<%=rs("synet") %>"></span></font></b></td> </tr> <tr> <td height="22" valign="top"> <font face="Verdana" style="font-size: 9pt">Beskrivelse:</font></td> <td height="22"><font face="Verdana"><span style="font-size: 9pt"><textarea rows="8" name="Beskrivelse" cols="40"><%=rs("Beskrivelse") %></textarea></span></font></td> </tr> <tr> <td height="22" valign="top"><font face="Verdana" style="font-size: 9pt">Billede 1:</font></td> <td height="22" valign="top"><font face="Verdana"><span style="font-size: 9pt"><INPUT TYPE="FILE" SIZE="35" NAME="FILE1"><br> </span><span style="font-size: 7pt"> <!--webbot bot="HTMLMarkup" startspan --><%=rs("Billede 1") %><!--webbot bot="HTMLMarkup" endspan --></span></font></td> </tr> <tr> <td height="22" valign="top"><font face="Verdana" style="font-size: 9pt">Billede 2:</font></td> <td height="22" valign="top"><font face="Verdana"><span style="font-size: 9pt"><INPUT TYPE="FILE" SIZE="35" NAME="FILE2"><br> </span><span style="font-size: 7pt"> <!--webbot bot="HTMLMarkup" startspan --><%=rs("Billede 2") %><!--webbot bot="HTMLMarkup" endspan --></span></font></td> </tr> <tr> <td height="22" valign="top"><font face="Verdana" style="font-size: 9pt">Billede 3:</font></td> <td height="22" valign="top"><font face="Verdana"><span style="font-size: 9pt"><INPUT TYPE="FILE" SIZE="35" NAME="FILE3"><br> </span><span style="font-size: 7pt"> <!--webbot bot="HTMLMarkup" startspan --><%=rs("Billede 3") %><!--webbot bot="HTMLMarkup" endspan --></span></font></td> </tr> </table> </center> </div> <p align="center"> <font face="Verdana"><span style="font-size: 9pt"> <br> <span style="font-size: 8pt"> <input type="submit" value="Gem" name="gem"></span> </span></font> </p> </form> </b> <font face="Verdana" style="font-size: 9pt"> <% end if %> </font> </body> </html>
19. april 2004 - 20:45
#21
Prøv at rette: SQL = SQL & "Beskrivelse='" & Upload.form("Beskrivelse") & "', " if fil1 <> "" then SQL = SQL & "[Billede 1]='" & fil1 & "', " if fil2 <> "" then SQL = SQL & "[Billede 2]='" & fil2 & "', " if fil3 <> "" then SQL = SQL & "[Billede 3]='" & fil3 & "' " SQL = SQL & " where ID_bil =" & request.querystring("ID_bil") Til dette sådan kommaet sætte før da filerne er de sidste kolonner så der er nok syntax fejl fodi der enten manglede eller var et komma for meget: SQL = SQL & "Beskrivelse='" & Upload.form("Beskrivelse") & "' " if fil1 <> "" then SQL = SQL & ", [Billede 1]='" & fil1 & "' " if fil2 <> "" then SQL = SQL & ", [Billede 2]='" & fil2 & "' " if fil3 <> "" then SQL = SQL & ", [Billede 3]='" & fil3 & "' " SQL = SQL & " where ID_bil =" & request.querystring("ID_bil")
19. april 2004 - 20:46
#22
det er stadig samme fejl med ,
19. april 2004 - 20:49
#23
ups min fejl... overså lige at du havde fjernet ,'et til sidst i linien.. nu virker det
19. april 2004 - 20:51
#24
Ok :) ja eller måtte du til at udskrive SQL sætningen hvis det stadig drillede, men det så ikke nødvendigt :)
19. april 2004 - 20:53
#25
har lige testet at alle info bliver opdateret... og det gør de... i første omgang havde jeg glemt to SQL sætninger... så de data der var blevet skrevet ind blev ikke vist Men nu tror jeg det kører
19. april 2004 - 20:57
#26
ok, Ja man skal lige havde det hele med :)
19. april 2004 - 21:00
#27
Jeps.... nu har jeg kopieret filen ind på den anden server.... så må vi håbe at det virker der..
19. april 2004 - 21:12
#28
Du fik lige points... Mange tak for hjælpen..
19. april 2004 - 21:13
#29
ja det gjorde jeg, tak :)
22. april 2004 - 14:28
#30
Eagleeye er du her stadig?? Har lige et spørgsmål til ovenstående ...... Skal lige have lavet så jeg kan slette hvert enkelt billede.. /Toke
Kurser inden for grundlæggende programmering