error al guardar el formulario rs.open sql,con,1,2

[TurKa]

Estás intentando agregar un nuevo registro???
Si es así, no tienes que "consultar" (select) los registros, sino "abrir" la tabla.

set con = server.CreateObject("ADODB.Connection")
con.open "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & server.MapPath("datos_registros.mdb")
set rs = server.CreateObject("ADODB.Recordset")
rs.open "Datos_Vehiculo",con,1,2
rs.addnew
rs("rut") = irun
rs.upadate