Hola que tal!
Bueno básicamente es esto lo que no me convence:
Código:
<%
Dim Conexion,Tabla
Set Conexion=Server.CreateObject("adodb.connection")
Set Tabla1=Server.CreateObject("adodb.recordset")
Set Tabla2=Server.CreateObject("adodb.recordset")
Set Tabla3=Server.CreateObject("adodb.recordset")
Conexion.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=H:\inetpub\base de datos\Data.mdb"
%>
Porque estás cargando el recordset en vano, además no se porqué directamente no creras una sola variable TABLA, puesto que le estás asignando el mismo valor a todas las variables, osea que da lo mismo que utilices tabla1, tabla2, tabla3 por eso mas vale definí una variable tabla, y llamala cuando la necesites.
Otra cosa, te recomiendo que utilices conexión a la BD sin DNS, es mucho mejor.
También si podrías editar el mensaje y poner el código dentro de etiquetas ["codigo"][/"codigo"], así resulta mucho más fácil de leer, y también poner cual es la linea en donde te marca tu error.
Saludos!
