Hola,
En una página ASP, necesito acceder a una base de datos, pero desde un Script de CLIENTE.
Con Vbscript lo he conseguido que funcione correctamente de esta forma:
Dim Cn, Rs
set Cn = CreateObject("ADODB.Connection")
Cn.Open "Provider=SQLOLEDB.1;Password=xxx;Persist Security Info=True;User ID=xxx;Initial Catalog=xxx; <%=Application("Maquina")%>"
Set Rs = CreateObject("ADODB.Recordset")
strSQL = "SELECT * FROM TABLA " _
& "WHERE TIPO=" & vTipoBien & " " _
& "AND ID_MEDIDA =" & <%=vMedida%>
'msgbox(strSQL)
Rs.Open strSQL, Cn
If Rs.EOF then
...
Pero necesito hacer esto mismo desde un Script de Cliente (runat=client) de JavaScript. He probado con esto:
Cn = Server.CreateObject("ADODB.Connection")
Rs = Server.CreateObject("ADODB.RECORDSET")
Cn.Open("Provider=SQLOLEDB.1;Password=xxx;Persist Security Info=True;User ID=xxx;Initial Catalog=xxx; <%=Application("Maquina")%>")
...
pero me da error, me dice que: "Server no esta definido"
Probé con esto:
cn = new Connection();
rs = new Recordset();
cn.open("dsn=pubs", "sa", "");
rs = cn.execute("SELECT * FROM authors")
...
pero me da error, me dice que: "Connection no esta definido"
¿Como puedo acceder a la base de datos desde JavaScript, en un Script de cliente?
Saludos.

La solución es la
La solución es la siguiente:
var Cn=new ActiveXObject("ADODB.Connection");
Cn.Open("Provider=SQLOLEDB.1;Password=xxx;Persist Security Info=True;User ID=xxx;Initial Catalog=xxx; <%=Application("Maquina")%>");
var rs=new ActiveXObject("ADODB.Recordset");
var strSQL="SELECT * FROM TABLA WHERE TIPO=" + vTipoBien + " AND ID_MEDIDA =" + <%=vMedida%>;
rs.open(strSQL,Cn);
if(rs.EOF){ //Condición IF }
Saludos