I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
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
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!
'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>
'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 %>
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.