Slette i DB

lav en "global" SQL streng...

strSQL = "SELECT * FROM anmeldeser"
Set objRs = objConn.Execute(strSQL)

While Not objRs.EOF
  sql="delete * from anmeldelse where IDNUMMER='"&request.form("sletter")&"'"
  objConn.Execute(strSQL)
objRs.MoveNext()
Wend

//>Rune

Jeg får en fejl i linien :Set objRs = objConn.Execute(strSQL)

strSQL = "SELECT * FROM anmeldeser"
Set objRs = objConn.Execute(strSQL)

While Not objRs.EOF
  sql="delete * from anmeldelse where IDNUMMER='"&request.form("sletter")&"'"
  objConn.Execute(sql)
objRs.MoveNext()
Wend

//>Rune

Nope, giver:

Object required: ''

Jamen hvordan tilgår du din database?

Lad mig lige se din kode...

//>Rune

formen kommer fra dette udtræk:

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=c:\websider\service-info.dk\db\skadeanmeldelsetest.mdb"
Conn.Open DSN
sql="select * from skadeanmeldelse order by IDNUMMER"
set record=conn.execute(sql)


%>
<form name="slet" method="post" action="skadesletning.asp">
<select name="sletter" style="background-color: #ffffff"; style="font:bold 10px Ariel, sans-serif";><%do while not record.eof%>

<option value="<%=record("IDNUMMER")%>"><%=record("IDNUMMER")&" - "&record("nummer")%>
<%
record.movenext
loop%></option>


</select>
<input type="submit" name="Submit" style="background-color: #ffffff"; style="font:bold 10px Ariel, sans-serif"; value="Slet post">
</form>




Sletningen ser sådan ud:

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=c:\websider\service-info.dk\db\skadeanmeldelsetest.mdb"
Conn.Open DSN

sql="delete * from skadeanmeldelse where IDNUMMER='"&request.form("sletter")&"'"
set record=conn.execute(sql)

strSQL = "SELECT * FROM anmeldeser"
Set objRs = Conn.Execute(strSQL)

While Not objRs.EOF
  sql="delete * from anmeldelse where IDNUMMER='"&request.form("sletter")&"'"
  Conn.Execute(sql)
objRs.MoveNext()
Wend

//>Rune

Jeg ønsker at have en form for global sletning som rydder alt da denne kun bruges til test.

Normalt gør jeg det manuelt i access, men sidder jeg ikke ved en maskine med access giver det jo nogle problemer :)

Jamen er det ikke det den gør nu da? -det som står nu skulle gerne virke...

//>Rune

Halløj: bigtrouble

SQL Strengen for at slette alle rækker i din tabel er såmænd bare:
sql="DELETE * FROM anmeldelse"

og lige et lille tip, udtrykket:
sql="delete * from anmeldelse where IDNUMMER='"&request.form("sletter")&"'"

er RET umsmart, man kan lave en såkaldt SQL injection i dit script ... dvs du har et væsenligt sikkerhedsproblem !

PS: STOL ALDRIG PÅ BRUGERINPUT, kig evt på hvordan de prfessionelle gør:
http://www.computerworld.dk/default.asp?Mode=2&ArticleID=16634

--
!!

Ups, det skulle være:

sql="DELETE FROM anmeldelse"

--+
!?!

?? jeg kan ikke give dig point da din brugernavn er forsvundet !!!

Du hedder"0"

Jeg tager point selv, du kan få dem ved en anden lejlighed :)