<%
Dim Conn, registros
Set Conn = Server.CreateObject("ADODB.Connection")
Set registros = CreateObject("ADODB.Recordset")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("alarmas.mdb")
SQL = " SELECT * FROM alarmas "
registros.open SQL, Conn, 2, 3
registros.AddNew
registros("central") = "ubica"
registros.update
registros.Close
Set registros = Nothing
Conn.Close
Set conexion = Nothing
%>
Este código debería funcionarte correctamente, pero me intriga saber que es "ubica". ( a lo mejor falla por eso ) Tal como lo tienes solo te insertaría el valor "ubica" en la base de datos, si es una variable o algo de un formulario, avisame.
Sin embargo, podrías leerte:
http://www.aspfacil.com/articulos/040401.asp
Saludos.