Avatar billede vester Novice
13. december 2001 - 20:36 Der er 1 løsning

\"Slet\" fra database option

Jeg fik for ca. to måneder siden eagleeye til at hjælpe mig med denne kode:

<table border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"0\">
    <tr>
        <td colspan=\"5\"><div class=\"Overskrift\">Se alle nyheder:<br><br></div></td>
    </tr>
               
    <tr>
        <td><div class=\"Black\">Vis</td>
        <td><div class=\"Black\">Dato:</td>
        <td><div class=\"Black\">Headline:</td>
        <td><div class=\"Black\">&nbsp;</td>
        <td><div class=\"Black\">Overskrift:</td>
    </tr>

    <tr>    <form method=\"Post\" action=\"UpdateView.asp\">
        <td colspan=\"5\" align=\"Left\"><hr width=\"90%\"></td>
    </tr>

<%
set ObjConn = Server.CreateObject (\"ADODB.Connection\")
strConnDriver=\"Driver={Microsoft Access Driver (*.mdb)};\"
strConnPath=\"DBQ=\" & Server.MapPath (\"../../db/data.mdb\")
objConn.Open strConnDriver & strConnPath
set RS = Server.CreateObject (\"ADODB.RecordSet\")

    strSQL = \"SELECT * FROM news ORDER BY ID\"
    RS.Open strSQL, objConn, 3, 1
    if RS.EOF then
    Response.Write \"<div class=\'Text\'>Der er endnu ingen nyheder.</div>\"
    else
    Do until rs.eof
%>
    <tr>
        <td valign=\"top\"><input type=\"checkbox\" name=\"visstatus\" value=\"<%=rs(\"ID\")%>\" <% if rs(\"vis\") = true then Response.Write \"checked\"%>></td>
        <td valign=\"top\"><div class=\"Text\"><a href=\'./EditNews.asp?Id=<%=rs(\"ID\")%>\'><%=RS(\"Dato\")%></a></td>
        <td valign=\"top\"><div class=\"Text\"><a href=\'./EditNews.asp?Id=<%=rs(\"ID\")%>\'><%=RS(\"Headline\")%></a></td>
        <td valign=\"top\"><div class=\"Text\">&nbsp;</td>
        <td valign=\"top\"><div class=\"Text\"><a href=\'./EditNews.asp?Id=<%=rs(\"ID\")%>\'><%=RS(\"Overskrift\")%></a></div></td>                            </tr>
    <tr>
        <td colspan=\"5\" align=\"Left\"><hr width=\"90%\"></td>
    </tr>
<%   
    RS.MoveNext
    loop
    end if
    RS.Close
    objConn.Close
    set RS = nothing
    set objConn = nothing
%>
    <tr>
        <td><input type=\"submit\" value=\"Opdatér\"></td>
    <td colspan=\"4\" align=\"Left\">&nbsp;</td>                               
    </tr></form>
</table>

Nu vil jeg så gerne inkludere muligheden for at slette fra databasen.
Det skal foregå ved at man markerer checkboxen slet og trykker opdater.
Avatar billede vester Novice
13. december 2001 - 20:57 #1
Jeg har fået en anden idé, så glem alt om dette spørgsmål.



Undskyld
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