|
| ASP + checkboks Fra : Bjørn |
Dato : 15-12-02 00:03 |
|
Hallo...
Er der nogen der kan hjælpe mig med et ASP/checkboks problem.
Jeg har en DB med en tabel kaldet medarbejdere indeholdende id, fornavn,
efternavn, tlf. Jeg ønsker at skrive alle medarbejdere ud. Derefter skal der
være en checkboks efter hver person. Hvis man så sætter kryds i checkboksen
bliver personen slettet fra DB?
Er der nogen af jeg kloge hoveder der kan løse dette.
Jeg har følgende kode. I må meget gerne komme med svar eller rette
nedenstående. Den checkboks jeg forsøger at oprette holder jo ikke.
Tak
Bjørn
<TABLE border="2" width="0" cellspacing="2" cellpadding="2" align="center">
<tr>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/medarb.mdb")
Conn.Open DSN
strSQL = "Select Fornavn, Efternavn, Tlf order by Fornavn"
Set rs = Conn.Execute(strSQL)
Do While Not rs.EOF
%>
<tr><td><%Response.Write rs("Fornavn")%></td>
<td><%Response.Write rs("Efternavn")%></td>
<td><%Response.Write rs("Tlf")%></td>
<td><input type="checkbox" name="check1"></td></tr>
<%
rs.MoveNext
Loop
Conn.Close
Set Conn = Nothing
%>
</tr>
</table>
| |
Finn Elmgaard (15-12-2002)
| Kommentar Fra : Finn Elmgaard |
Dato : 15-12-02 16:52 |
|
"Bjørn" wrote:
> Jeg har en DB med en tabel kaldet medarbejdere indeholdende id, fornavn,
> efternavn, tlf. Jeg ønsker at skrive alle medarbejdere ud. Derefter skal der
> være en checkboks efter hver person. Hvis man så sætter kryds i checkboksen
> bliver personen slettet fra DB?
>
> <TABLE border="2" width="0" cellspacing="2" cellpadding="2" align="center">
> <tr>
> <%
> Set Conn = Server.CreateObject("ADODB.Connection")
> DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
> DSN = DSN & "DBQ=" & Server.MapPath("/medarb.mdb")
> Conn.Open DSN
>
> strSQL = "Select Fornavn, Efternavn, Tlf order by Fornavn"
>
> Set rs = Conn.Execute(strSQL)
>
> Do While Not rs.EOF
> %>
>
> <tr><td><%Response.Write rs("Fornavn")%></td>
> <td><%Response.Write rs("Efternavn")%></td>
> <td><%Response.Write rs("Tlf")%></td>
> <td><input type="checkbox" name="check1"></td></tr>
>
> <%
> rs.MoveNext
>
> Loop
>
> Conn.Close
> Set Conn = Nothing
> %>
> </tr>
> </table>
Jeg ved ikke helt nøjagtig, hvor dit problem er, men først ville jeg nok for god
ordens skyld tilføje et FROM tabelnavn i din strSQL.
Dernæst kunne du f.eks. give hver checkbox forskellige navne ved at anvende dit
ID i databasen:
<td><input type="checkbox" name="check<%=RS("id")%>"></td></tr>
Så bliver de lettere at referere til, hvilket du jo nok har behov for.
Det kræver naturligvis, at du inkluderer feltet ID i din strSQL.
Håber det kan give inspiration til en løsning.
mvh
Finn
| |
|
|