delete fejl

hvad er der galt med denne

den skal slette alt hvad der ligger i beskeder, så det er en TOM tabel
<%
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source="& Server.MapPath("db.mdb")
Set Conn = Server.CreateObject("ADODB.Connection")
strSQL = "Delete From beskeder"
Conn.Execute(strSQL)
Conn.Close
Set Conn = Nothing
%>
<% end if %>