Saludos!
Alguien sabe por qué me pasa esto? este es mi código:
Cita: Dim oCn, oRs
Dim sSQL
sSQL = "SELECT COUNT (*) FROM tabla"
Set oCn = DBConexion
Function DBConexion ()
Dim oCn, sConnString
Set oCn = Server.CreateObject("ADODB.Connection")
sConnString = "Driver={SQL Server};Description={};SERVER=(local);UID=sa;PWD=x x;DATABASE=Desarrollo;"
On Error Resume Next
oCn.Open sConnString
On Error Goto 0
Set DBConnexion = oCn
End Function
Probé a conectarme a la bdd sin llamar a la función, y anda perfecto! pero si trato de hacer lo anterior, me sale esto:
Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8)
Se requiere un objeto: 'DBConexion'
/net/derco/visor.asp, línea 9
Alguna idea?
no he podido dar con la solucion
Gracias!
