29. september 2002 - 23:46
Der er
13 kommentarer og 1 løsning
Hvorfor virker det her nu ikke??
Jeg har skrevet det her... men der kommer ikke en form frem????? Det gir da ingen mening! <% ' ADODB connection objektet Set Conn = Server.CreateObject("ADODB.Connection") ' Husk at angive den rigtige sti til din database DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../database/nyheder.mdb") ' Åben databaseforbindelsen Conn.Open DSN %> <% ' SQL Forespørgsel strSQL = "Select * from nyheder" 'Udfør forespørgsel (rs indeholder nu resultatet) Set rs = Conn.Execute(strSQL) %> <% If Request.Querystring("change") = " & rs(""ID"") & """ Then %> <form action="start.asp?mode=changed" method="post"> <a>Overskrift:</a><br> <input type="text" name="navn" value="<% rs("navn") %>"><br><br> <a>Nyheden:</a><br> <textarea rows="10" cols="15" name="nyhed" value="<% rs("nyhed") %>"></textarea><br><br> <a>Dit Navn:</a><br> <input type="text" name="opretter" value="<% rs("opretter") %>"><br><br> <input type="submit" value="Ændr"> </form> <% End If %>
Annonceindlæg fra HP
29. september 2002 - 23:49
#1
<% ' ADODB connection objektet Set Conn = Server.CreateObject("ADODB.Connection") ' Husk at angive den rigtige sti til din database DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../database/nyheder.mdb") ' Åben databaseforbindelsen Conn.Open DSN %> <% ' SQL Forespørgsel strSQL = "Select * from nyheder" 'Udfør forespørgsel (rs indeholder nu resultatet) Set rs = Conn.Execute(strSQL) %> <% If Request.Querystring("change") = rs("ID") Then %> <form action="start.asp?mode=changed" method="post"> <a>Overskrift:</a><br> <input type="text" name="navn" value="<% rs("navn") %>"><br><br> <a>Nyheden:</a><br> <textarea rows="10" cols="15" name="nyhed" value="<% rs("nyhed") %>"></textarea><br><br> <a>Dit Navn:</a><br> <input type="text" name="opretter" value="<% rs("opretter") %>"><br><br> <input type="submit" value="Ændr"> </form> <% End If %> //>Rune
29. september 2002 - 23:50
#2
rs("ID") men kun hvis den angivne ID er den første din tabel i databasen. Mener du ikke at den blot skal være et sted i tabellen?
29. september 2002 - 23:50
#3
Nope... intet virker :-/
29. september 2002 - 23:51
#4
<% ' ADODB connection objektet Set Conn = Server.CreateObject("ADODB.Connection") ' Husk at angive den rigtige sti til din database DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../database/nyheder.mdb") ' Åben databaseforbindelsen Conn.Open DSN %> <% ' SQL Forespørgsel strSQL = "Select * from nyheder" 'Udfør forespørgsel (rs indeholder nu resultatet) Set rs = Conn.Execute(strSQL) %> <% If Request.Querystring("change") = rs("ID") Then %> <form action="start.asp?mode=changed" method="post"> <a>Overskrift:</a><br> <input type="text" name="navn" value="<%= rs("navn") %>"><br><br> <a>Nyheden:</a><br> <textarea rows="10" cols="15" name="nyhed"><%= rs("nyhed") %></textarea><br><br> <a>Dit Navn:</a><br> <input type="text" name="opretter" value="<%= rs("opretter") %>"><br><br> <input type="submit" value="Ændr"> </form> <% End If %> I det hele taget så har du en masse data der ikke bliver udskrevet... Men det skulle været rettet nu.. //>Rune
29. september 2002 - 23:51
#5
Jo!!! lige precis!
29. september 2002 - 23:52
#6
men det virker ikke... der kommer intet frem på skærmen!
29. september 2002 - 23:53
#7
Jamen hvad er det du vil ha' tjekket? -For du skal jo finde et valid ID i databasen! fx. ' SQL Forespørgsel strSQL = "Select * from nyheder WHERE [ID] =" & Request.QueryString("change") 'Udfør forespørgsel (rs indeholder nu resultatet) Set rs = Conn.Execute(strSQL) %> <% If Request.Querystring("change") = rs("ID") Then %> <form action="start.asp?mode=changed" method="post"> <a>Overskrift:</a><br> <input type="text" name="navn" value="<%= rs("navn") %>"><br><br> <a>Nyheden:</a><br> <textarea rows="10" cols="15" name="nyhed"><%= rs("nyhed") %></textarea><br><br> <a>Dit Navn:</a><br> <input type="text" name="opretter" value="<%= rs("opretter") %>"><br><br> <input type="submit" value="Ændr"> </form> <% End If %> //>Rune
29. september 2002 - 23:55
#8
hmm det skal være sådan at den tager den querystring der hedder change og derefter at man så kan ændre det
29. september 2002 - 23:57
#9
kan ændre hvad? Hvad dævlen Erik, er du tilbage igen :o) rart at se dig! //>Rune
29. september 2002 - 23:57
#10
Jeg fatter bjælde af det hele... og ham erik har lige andmelt mig for spam pga jeg skrev kilden et andet sted... :-/ fair nok..... finder hjælp et andet sted..... TAK FOR HJÆLPEN!
29. september 2002 - 23:59
#11
Hmm weird, det plejer skam ik' ligne Erik! Men well, Thx 4 Poinz //>Rune
29. september 2002 - 23:59
#12
Ahh, jamen det er jo pga. du har oprettet 2 spm's! -Det må man ikke, det bliver som sagt anmeldt for SPAM..! //>Rune
30. september 2002 - 00:06
#13
Jeg er ikke tilbage, medions, og du er vel så rar ikke at fylde andres spørgsmål med irrelevante personlige bemærkninger,
30. september 2002 - 07:03
#14
Der var dog utroligt sikke et humør du er i! //>Rune
Kurser inden for grundlæggende programmering