Delete och select i samma

Javisst, separera dom med ";" bara. :)

strsql = "SELECT questiontableid FROM questiontable where headtableid ='"& vart1 "&'; DELETE from headtable where headtableid ='"& vart1 &"'; DELETE from questiontable where headtableid ='"& vart1 &"'; DELETE from responsetable where questiontableid ='"& vart2 &"';"

------------------
Doesn't 'expecting the unexpected' make the unexpected expected?
webeye.nu

Så enkelt det kan vara ibland:)
Men hur gör jag då när selectens värde ska in i variabeln "vart2"?

strsql = "SELECT questiontableid FROM questiontable where headtableid ='"& vart1 "&'; DELETE from headtable where headtableid ='"& vart1 &"'; DELETE from questiontable where headtableid ='"& vart1 &"'; DELETE from responsetable where questiontableid ='"& vart2 &"';"

------------------
Mvh:

Johan

Små grodor är också grodor, men inte lika stora.

strsql = "SELECT questiontableid FROM questiontable where headtableid ='"& vart1 "&'; DELETE from headtable where headtableid ='"& vart1 &"'; DELETE from responsetable where questiontableid IN(SELECT questiontableid FROM questiontable where headtableid ='"& vart1 "&'); DELETE from questiontable where headtableid ='"& vart1 &"'; "

Jag bytte plats på dina två sista DELETE-satser, eftersom det hade blivit lite krångligt annars.

Redigering: Behöver du verkligen din första SELECT-fråga där förresten? Ska du använda ID:t till något annat än till DELETE-satsen?

Mvh,

------------------
All your base are belong to me.

[Redigerat av @nders den 04 okt 2001]

Du kan sätta villkoret direkt i delete-satsen.

strsql = "DELETE from headtable where headtableid ='"& vart1 &"'; DELETE from responsetable where questiontableid in (SELECT questiontableid FROM questiontable where headtableid ='"& vart1 "&');DELETE from questiontable where headtableid ='"& vart1 &"'"

Jag ändrade på ordningen mellan dina delete-satser.

------------------
essentitia preter non sans multiplicandum

Vilka hjältar ni är!

Bara därför svänger jag iväg en snabbfråga.

behöver man stänga databasen om man använder denna?
Set rs = conn.Execute(strsql)

Tack å bock!

------------------
Mvh:

Johan

Små grodor är också grodor, men inte lika stora.

Databasen måste du alltid stänga, och skapar du ett recordset så skall det också stängas...

------------------
Doesn't 'expecting the unexpected' make the unexpected expected?
webeye.nu

Så här ser hela koden ut, tar jag bort stängningen så här funkar den, inte annars.
vad gör jag för fel?

vart1 =request.querystring("id")

strconn = MM_forum_STRING

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open strconn

strsql = "DELETE from responsetable where questiontableid in (SELECT questiontableid FROM questiontable where headtableid ='"& vart1 &"');DELETE from questiontable where headtableid ='"& vart1 &"'; DELETE from headtable where headtableid ='"& vart1 &"'"

Set rs = conn.Execute(strsql)
response.redirect"admin.asp"

------------------
Mvh:

Johan

Små grodor är också grodor, men inte lika stora.

I och med att du gör execute på ett statement som inte returnerar några poster så får du ett tomt och stängt recordset tillbaka.

conn.Execute strsql,,128
conn.close
response.redirect"admin.asp"

Du kan utelämna tilldelningen av recordsetet.

------------------
essentitia preter non sans multiplicandum