ASP - borrar registros al cargar

Buenas a todos... a ver si alguien me puede ayudar...

En una pagina web, quiero que al cargarse me borre los registros que contiene una tabla, a la que posteriormente añadire otros en su caso.

Unicamente quiero eso... el borrado de todos los datos.

Utilizo Dreamweaver y he añadido el codigo insertado entre asteriscos..

No me funciona y entiendo que si debe hacerlo....lo incluyo en este foro pues es un tema de ASP.

<%
Dim RSINFORMEPGR
Dim RSINFORMEPGR_numRows

Set RSINFORMEPGR = Server.CreateObject("ADODB.Recordset")
RSINFORMEPGR.ActiveConnection = MM_ConectaRRLL_STRING
RSINFORMEPGR.Source = "SELECT * FROM VERINFORMEPGR"
RSINFORMEPGR.CursorType = 0
RSINFORMEPGR.CursorLocation = 2
RSINFORMEPGR.LockType = 1
RSINFORMEPGR.Open()

RSINFORMEPGR_numRows = 0

' *********************************
RSINFORMEPGR.MoveFirst
while (Not RSINFORMEPGR.EOF)
RSINFORMEPGR.Delete
RSINFORMEPGR.MoveNext
Wend
' ***********************************

%>

El mensaje de error es el siguiente:

************************************************** *****
ADODB.Recordset error '800a0cb3'

El Recordset actual no admite actualizaciones. Puede ser una limitación del proveedor o del tipo de bloqueo seleccionado.

/RRLL/PIRYPGR/VerPgr.asp, line 305
************************************************** ******

La linea 305 corresponde a -------> RSINFORMEPGR.Delete

Alguien me puede hechar una mano....

Gracias y Saludos.......

En vez de crear un recordset, ¿porque no haces una consulta SQL?
miconsulta = " Delete * from verinformepgr "
y haces un execute utilizando el objeto "connection"