Avatar billede bartzzeh Nybegynder
15. marts 2003 - 18:49 Der er 18 kommentarer og
1 løsning

slet markerede?

Hejsa!
Jeg vil godt vide hvordan man laver en "slet markerede" funktion! ligesom på jubii.dk eller hotmail.com!
På forhånd tak!
Avatar billede eagleeye Praktikant
15. marts 2003 - 18:54 #1
Du kan lave en checkbox ud for hver og give dem samme navn og så give ID på den post som den tilhøre.

<input type="checkbox" name="slet" value="1">
<input type="checkbox" name="slet" value="2">
<input type="checkbox" name="slet" value="3">
<input type="checkbox" name="slet" value="4">


Så når du hendter Request.Form("slet") så får du en komma sepereret liste med ID i på dem som er valgt. Så hvis ud vælder den føste og sidste får du 1,4

Så kan du bruge det direte i en SQL sætning:

strID = request.form("slet")
if strID <> "" then
  SQL = "DELETE FROM tabel WHERE ID IN(" & strID & ")"
end if
Avatar billede mortrr Praktikant
15. marts 2003 - 18:54 #2
Groft sagt som:

<script>
function CheckAll(inpCnt) {
    newCheck=inpCnt.checked;
    inpElem=inpCnt.form.elements;
    for (i=0;i<inpElem.length;i++) {
        if (inpElem[i].type=="checkbox") {
            inpElem[i].checked=newCheck;
        }
    }
}
</script>

<input type="checkbox" name="chbDummy" onclick="CheckAll(this)" title="Select all messages">

Den afmærker alle checkboxe. Man kunne udvide den til kun at markere alle der hedder xxx
Avatar billede mortrr Praktikant
15. marts 2003 - 18:54 #3
Duh - Så lige at det var under asp.
Avatar billede bartzzeh Nybegynder
15. marts 2003 - 18:57 #4
takker
Avatar billede bartzzeh Nybegynder
15. marts 2003 - 19:02 #5
det hjælper jo ikke så meget! jeg kan ikke slette dem nu! kan kun markere ting! www.rovhul.dk/mobe/system
Avatar billede eagleeye Praktikant
15. marts 2003 - 19:04 #6
Hvordan udskriver du checkboxsene?
Avatar billede bartzzeh Nybegynder
15. marts 2003 - 19:07 #7
jeg har brugt mortrr's metode pga. jeg ikke lige forstod din! www.rovhul.dk/mobe/system
brugernavn: webmaster kode: login
også gå ind i indbakken så kan du se det!
Avatar billede bartzzeh Nybegynder
15. marts 2003 - 19:13 #8
jeg mangler en submit knap hvordan skal den se ud?
Avatar billede bartzzeh Nybegynder
15. marts 2003 - 19:14 #9
jeg spurgte om en slet markerede funktion ikke hvordan man sætter en masse knapper op!
Avatar billede eagleeye Praktikant
15. marts 2003 - 19:15 #10
<input type="submit" name="Slet" value="Slet dem">
Avatar billede bartzzeh Nybegynder
15. marts 2003 - 19:59 #11
eagleeye: skal det se sådan her ud?
<%
strID = request.form("slet")
if strID <> "" then
  SQL = "DELETE FROM tabel WHERE ID IN(" & strID & ")"
end if
%>

<input type="checkbox" name="slet" value="1">
<input type="checkbox" name="slet" value="2">
<input type="checkbox" name="slet" value="3">
<input type="checkbox" name="slet" value="4">

<input type="submit" name="Slet" value="Slet dem">

??
Avatar billede eagleeye Praktikant
15. marts 2003 - 20:03 #12
Når du udskriver alle beskeder har du et højst sansynligt et loop som skriver fra dato mm der skal du lave en checkbox som dette:

<input type="checkbox" name="slet" value="<%=rs("ID")%>">
Avatar billede eagleeye Praktikant
15. marts 2003 - 20:04 #13
Så laver du en kanp som denne den skal havde et andet navn en slet som føsrt vist.:

<input type="submit" name="sletdem" value="Slet dem">
Avatar billede eagleeye Praktikant
15. marts 2003 - 20:05 #14
På den side som du angiver i dein action skal du havde det kode som sletter fra database og den SQL som sletter fra databasen er dette:

<%
strID = request.form("slet")
if strID <> "" then
  SQL = "DELETE FROM tabel WHERE ID IN(" & strID & ")"
end if
%>
Avatar billede bartzzeh Nybegynder
15. marts 2003 - 20:06 #15
k.... prøver lige en gang og hvis det ikke virker så får du lige hele lortet !
Avatar billede bartzzeh Nybegynder
15. marts 2003 - 20:10 #16
det virker ikke!
Avatar billede bartzzeh Nybegynder
15. marts 2003 - 20:11 #17
<% if mode = "inbox" then

                        'Tjecker om brugeren er logget ind
                        if session("brugernavn") = "" then
                            Response.Redirect("default.asp?mode=login")
                        end if
                       
                       
                        'Opbygger recordset
                        set rs = Conn.Execute("select * From mail where mailModtager = '" & Session("brugernavn") & "' order by mailDato desc")
                        %>
                            <%
                            strID = request.form("slet")
                            if strID <> "" then
                              SQL = "DELETE FROM tabel WHERE ID IN(" & strID & ")"
                            end if
                            %>
                        <font face="verdana" size="1">Klik på emnet for at læse en email:</font><br><br>
                        <table border="0">
                            <tr>
                                <td bgcolor="#D2D0D0"><font face="verdana" size="1"><b>Fra</b></font></td>
                                <td bgcolor="#D2D0D0"><font face="verdana" size="1"><b>Emne</b></font></td>
                                <td bgcolor="#D2D0D0"><font face="verdana" size="1"><b>Dato</b></font></td>
                                <td bgcolor="#D2D0D0"><font face="verdana" size="1"><b>Slet</b></font></td>
                                <td bgcolor="#D2D0D0"></td>
                            </tr>
                            <% if rs.eof or rs.bof then %>
                            <tr>
                                <td colspan="3" align="center"><font face="verdana" size="1">Ingen meddelser</font></td>
                            </tr>
                            <% else
                                Do until rs.eof %>
                                <tr>
                                    <td bgcolor="#D2D0D0"><font face="verdana" size="1"><a href="default.asp?mode=read_mail&mailid=<%=rs("mailid")%>"><%=rs("mailAfsender")%></a></font></td>
                                    <td bgcolor="#D2D0D0"><font face="verdana" size="1"><%=rs("mailEmne")%></font></td>
                                    <td bgcolor="#D2D0D0"><font face="verdana" size="1"><%=rs("mailDato")%></font></td>
                                    <td bgcolor="#D2D0D0"><font face="verdana" size="1"><input type="checkbox" name="slet" value="<%=rs("mailid")%>"></font></td>
                                    <td bgcolor="#D2D0D0">
                                        <%
                                        'Forskelligt billede alt efter om emailen er læst/ulæst
                                        if rs("mailread") <> True then %>
                                        <img src="images/mail_unread.gif">
                                        <% else %>
                                        <img src="images/mail_read.gif">
                                        <% end if %>
                                    </td>
                                </tr>
                                <% rs.movenext
                                loop
                            end if %>
                        </table>
                       
                        <br>
                        <br>
                        <a href="default.asp?mode=ny_email"><font face="verdana" size="1">Ny email</font></a><br>
                        <input type="submit" name="sletdem" value="Slet dem">
                       
                <%
                rs.close
                end if %>

<% if mode = "delete_email" then
               
                    'Tjecker om brugeren er logget ind
                    if session("brugernavn") = "" then
                    Response.Redirect("default.asp?mode=login")
                    end if
               
                    ' sletter emailen!
                    strID = request.form("slet")
                    if strID <> "" then
                      SQL = "DELETE FROM tabel WHERE ID IN(" & strID & ")"
                    end if
                       
                        'Tjecker om mailen tilhører brugeren
                        if rs("mailModtager") = Session("brugernavn") then
                        conn.Execute("delete from mail where mailid = " & Request.QueryString("mailid") & "")
                        end if
                       
                    Response.Redirect("default.asp?mode=inbox")
                end if %>
Avatar billede eagleeye Praktikant
15. marts 2003 - 20:16 #18
Du skal havde en <form> for du kan slette dem:


Den kan sættes ind mellem disse på linjer:

                          <% else
                                Do until rs.eof %>

Sådan her:
                          <% else  %>
                              <form action="ENSIDE.asp" method="POST">
                              <% Do until rs.eof %>



Og så skal den slutte melle disse linjer:


                                <% rs.movenext
                                loop
                            end if %>


Sådan her:

                                <% rs.movenext
                                loop %>
                              </form>
                          <% end if %>
Avatar billede bartzzeh Nybegynder
15. marts 2003 - 20:18 #19
oki! kan ikke find ud af det !
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

IT-JOB