Tipo de error:
ADODB.Recordset (0x800A0BB9)
Argumentos incorrectos, fuera del intervalo permitido o en conflicto con otros.
/compured/admin/check.asp, línea 43
y la linea 43 es la que les marco en
rojo:
<!--#include file = "..\conexiondb.asp"-->
Set rsCheck = Server.CreateObject("ADODB.Recordset")
sSQL="SELECT usuario,password FROM tblusuarios WHERE usuario ='" & sUsername & "' AND password ='" & sPassword & "'"
rsCheck.Open sSQL, adoCon
La UNICA forma que tengo para que ande es poner la conexion directamente en el archivo que se quiere conectar, no en un include:
Dim adoCon
Set adoCon = Server.CreateObject ("ADODB.Connection")
adoCon.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("../dbgeneral.mdb")
Set rsCheck = Server.CreateObject("ADODB.Recordset")
sSQL="SELECT usuario,password FROM tblusuarios WHERE usuario ='" & sUsername & "' AND password ='" & sPassword & "'"
rsCheck.Open sSQL, adoCon
Intente hacer lo que dice JuanRAPerez; crear un nuevo archivo para incluir que se ubique dentro de la carpeta admin:
Este el el codigo de conexionadmin.asp
Código PHP:
Dim adoCon
Set adoCon = Server.CreateObject ("ADODB.Connection")
adoCon.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("../dbgeneral.mdb")
Y asi es como lo llamo:
Código PHP:
<!--#include file = "conexionadmin.asp"-->
Set rsCheck = Server.CreateObject("ADODB.Recordset")
sSQL="SELECT usuario,password FROM tblusuarios WHERE usuario ='" & sUsername & "' AND password ='" & sPassword & "'"
Pero me tira el error que mas arriba les dije tambien.
Esto es raro...