Slet

Jeg har dette script som sletter en varegruppe i en db.
Det virker fint, hvis der ikke er oprettet nogle vare i denne varegruppe.
Hvis der er varer i denne varegruppe får jeg selvfølgelig en fejl da de to tabeller \"produkter og varegrupper\" er relateret til hinanden.
Hvordan fanger jeg denne fejl. så jeg kan skrive til brugeren at det ikke kan lade sig gøre da der findes varer under varegruppen.

<%
Set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"../db/varer.mdb\")

id = request.querystring(\"ID\")
SQLstmt = \"DELETE * from undergrupper where ID=\" & id
Set RS = myConn.execute(SQLstmt)
 
myConn.Close
Response.Redirect(\"varegrupper.asp?slet=undergruppe\")
%>

//Mekaniker