Control de Errores????

Utilizas las siguientes lineas:

Set conn = server.createobject("ADDB.xxxxxx")
conn.conectionstring="xxxxxxx"
on error resume next
Set rs = conn.execute("Select * from tabla")
if err.number <> 0 then
'Hubo error en el programa
Response.write err.description
End if

if conn.errors.count > 0 then
'Hubo error en la sentencia SQL
Response.write conn.errors.item(0,1,2,3 los que se
necesiten).Description
End if





"Omar Valdovino" escribió en el
mensaje news:

cual es la manera de manejar los errores que puede causar la interaccion

con

la base de datos?

Yo siempre uso esta rutina:

If Err Then
Response.Write "<p><b>Objeto Err de VBScript:</b><br>" & _
"Number: " & Err.Number & "<br>" & _
"Description: " & Err.Description & "<br>" & _
"Source: " & Err.Source & "<br>" & _
"HelpFile: " & Err.HelpFile & "<br>" & _
"HelpContext: " & Err.HelpContext & "</p>"

For i = 0 To cnn1.errors.count - 1
Response.Write "<p><b>Objeto Error de ADO:</b><br>" & vbCrLf & _
"Number: " & cnn1.errors(i).Number & "<br>" & vbCrLf & _
"Description: " & cnn1.errors(i).Description & "<br>" & vbCrLf & _
"Source: " & cnn1.errors(i).Source & "<br>" & vbCrLf & _
"HelpFile: " & cnn1.errors(i).HelpFile & "<br>" & vbCrLf & _
"HelpContext: " & cnn1.errors(i).HelpContext & "<br>" & vbCrLf & _
"SQL State: " & cnn1.errors(i).SQLState & "<br>" & vbCrLf & _
"NativeError: " & cnn1.errors(i).NativeError & "</p>" & vbCrLf
Next

FF
www.francofigun.com.ar
www.microsofties.com.ar
Yahoo MSN:

"Omar Valdovino" escribió en el
mensaje news:

cual es la manera de manejar los errores que puede causar la interaccion

con

la base de datos?

Gracias a ambos

"Omar Valdovino" escribió en el
mensaje news:

cual es la manera de manejar los errores que puede causar la interaccion

con

la base de datos?