Microsoft OLE DB Provider for ODBC Drivers error '80040e31' Tengo un problema con una aplicación , os paso a comentar toda la situación....
Al acceder a la ficha de un cliente y un agente querer actualizarla le sale este error...
Microsoft OLE DB Provider for ODBC Drivers error '80040e31'
[Microsoft][SQL Native Client]Se ha superado el tiempo de espera de la consulta
/......../ges_clientes.asp, línea 658
Da problemas al ejecutar un UPDATE de la tabla de los clientes.... pero... FUNCIONA SI LO HACE OTRA PERSONA!!!, es decir... si ese agente lo intenta actualizar no le deja... pero si lo hace un administrador o lo hace otro agente funciona...
Ahora pensaréis... pues son problemas de permisos... pues el agente que tiene problemas puede actualizar otros clientes suyos pero hay algunos que no...
Me direis... revísalo, pues ya ta revisado.... jajajaja... y no le encuentro ni pies ni cabeza a la lógica del ordenador.... os pongo el codigo para que veáis...
Cita:
Como veis lo unico que hay es una session de que sea un administrador y ya ta... no hay ninguna complicacion... sql=" UPDATE CLIENTES SET AG = '"& AG &"' , FECHA_ACTUALIZACION = '"& FECHA_ACTUALIZACION &"', DEPARTAMENTO = '"& DEPARTAMENTO &"', ASA = '"& ASA &"' , NIF = '"& NIF &"' , COD = '"& COD &"' , DIREC = '"& DIREC &"' , NUM = '"& NUM &"' , PISO = '"& PISO &"' , CP = '"& CP &"' , PIND = '"& PIND &"' , POBL = '"& POBL &"' , PROV ='"& PROV &"' , TFNO = '"& TFNO &"' , TFNOB = '"& TFNOB &"' , FAX = '"& FAX &"' , AC = '"& AC &"' , PLANT = '"& PLANT &"' , CLASEMP = '"& CLASEMP &"' , E_MAIL = '"& E_MAIL &"' , URL = '"& URL &"' , GRUPO = '"& GRUPO &"' , ZONAA = '"& ZONAA &"' , PROMOPRESENT = '"& PROMOPRESENT &"' , OBSFLYER = '"& OBSFLYER &"' , OBSCAMPANIAS = '"& OBSCAMPANAS &"' , PROVISIONAL = '"& PROVISIONAL &"', COMENTARIOS='"& OBSCIA &"', TIPODESCUENTO = '"& tarifa &"' , FVIS = '"& semana_contacto &"', OBS_ESTRATEGIA = '"& OBS_ESTRATEGIA &"' "
if session("nlevel") = USER_LEVEL_LOCAL_ADMIN then
sql = sql & ", EMP = '"&EMP &"'"
end if
sql = sql & "WHERE ID = '" & id_cliente & "'"
BD_Conectar
dbConn.Execute( sql )
BD_Desconectar
if session("nlevel") = USER_LEVEL_LOCAL_ADMIN then
sql = sql & ", EMP = '"&EMP &"'"
end if
sql = sql & "WHERE ID = '" & id_cliente & "'"
BD_Conectar
dbConn.Execute( sql )
BD_Desconectar
Esto es mas un poltergeist que un problema de programacion...
