Cita:
Iniciado por fenix4 
aquí esta la conexión!! pero no entiendo que es lo que debo quitar?? podrían explicar mejor??
Código:
<%
set conn=server.createObject("adodb.connection")
On Error resume next
servername = "ctsi-tech-sv001.cnu.gov.ve"
db = "ccnpg_test"
conn.open "DRIVER={SQL Server};SERVER="+servername+";DATABASE="+db+";UID=usuario;PWD=contrasena"
MM_Intranet_STRING = conn
%>
Así funciona de maravilla!!! pero cuando des comento la función, y debería entrar en mensaje error, no lo hace.. ayuda ya no se que probar!!!
Código:
<%
'FUNCTION ver_objeto()
Msg1= "<SPAN class=tAlertNorm >No se encontro el objeto </SPAN>"
Msg2=" Registros fueron encontrados "
SoundAlerta = "<embed src=/sound/alerta.wav autostart=true hidden=true loop=4 >"
sql = "SELECT id FROM VwSys_instituciones"
objeto = "Areas"
set Rs = Server.CreateObject("ADODB.Recordset")
Rs.CursorType=1
Msg ="-->"
Rs.Open sql, conn
if Rs.EOF then
Msg = SoundAlerta+Msg1 ' Mensaje error
ELSE
Msg="<b>"&Rs.RecordCount&"</b>"&Msg2 'Mensaje OK
end if
Rs.close
ver_objeto = "<br>"+objeto&": "+Msg
'response.write "<br>"+Icon+" "+objeto&": "+Msg
'END FUNCTION
response.write ver_objeto
%>
Lo único que alcanzo a ver es que en la función no tienes el error handler, cosa que si pasa en en el código que no está dentro de la función, por lo tanto, ma prece que ninguno de los dos funcionan, solamente que en el primer código, estás escondiendo el error y en la función no lo haces así, s i nos das el error que te envía creo que podremos ayudarte mejor.
Saludos