Tak for hjælpen. :)
Det virker meget fint (efter jeg rettede rd til rs et enkelt sted)
Andreas
MooreHojer wrote in dk.edb.internet.webdesign.serverside.asp:
> > Jeg har et lille problem. Jeg skal slette en bruger med et Id
> > (autonummerering) som bruger indskriver, og det går da også fint.
> > Men hver gang der indskrives et id som ikke findes, så crasher
> > systemet. Hvad skal jeg gøre?
>
> Du laver en If...Then...Else-sætning som kunne se som noget i denne
> retning
>
> <--KODE START-->
>
> strdoe = request.form("bid")
>
> Dim Tilslut, Tilslutstr
> Set Tilslut = Server.Createobject("ADODB.Connection")
> Tilslutstr = "DRIVER={Microsoft Access Driver (*.mdb)}; "
> Tilslutstr = Tilslutstr & "DBQ=" & Server.MapPath("database.mdb")
> Tilslut.open Tilslutstr
>
> Set rs = Tilslut.Execute("Select ID from personer where ID = " & strdoe
> & "")
> If rs.EOF or rd.BOF Then
> Response.Write "Brugeren du vil slette eksisterer ikke"
> Else
> strSQL = "Delete from personer where Id = " & strdoe
> tilslut.Execute(strSQL)
>
> ' Luk databaseforbindelse
> tilslut.Close
> Set tilslut = Nothing
> response.write "Personen er slette. Vi er bare
> eksclusive....<br>"
> response.write "Men hvad var det nu nr." & strdoe & " hed?"
> response.write "hehe"
> %>
> <br>
> <br>
> <a href="hvemervi.asp">Tilbage</a>
> End If
>
> <--KODE SLUT-->
> --
> MooreHojer
>
--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials