Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Try Exception Zconnection (https://www.clubdelphi.com/foros/showthread.php?t=50412)

JcTaztoman 16-11-2007 21:26:49

Try Exception Zconnection
 
hola que tal, necesito un poco de ayuda de uds. bueno estoy haciendo un modulo de mi aplicacion, en el cual necestio hacer 2 conexiones a distintos servers para verificar las tablas de alguna base de datos.

al usuario le pido:Hostname, Databasename y nada mas. Despues con un boton hago la conexion a la base de datos del servidor que hayan puesto, eso ya lo hace, ya logro comparar la informacion. ahora lo que me detiene es hacer la validacion de los errores que de el Zconnection si llega el caso que el usuario teclee el nombre de la base de datos mal o si no tiene acceso a esa DB.

espero me hayan entendido y que puedan ayudarme :)

Gracias, por cierto uso:

PostgreSQL 7
Delphi 7
y ZEOSDBO-6.6.1-beta

Caral 16-11-2007 22:01:48

Hola
No tengo instalados los componentes zeos pero creo que el asunto lo tienes claro, lo unico que hay que buscar es el procedimiento que acepte el Zconnection.
Try
Busca la base de datos
except
Lo que se necesite, puede ser un mensaje.
normalmente en el caso de transacciones seria asi:
Código Delphi [-]Try // lo que sea
except on E:Exception do DataModule1.AC1.RollbackTrans;
end;



Saludos

JcTaztoman 16-11-2007 22:08:05

Gracias por responder
 
Cita:

Empezado por Caral (Mensaje 246721)
Hola
No tengo instalados los componentes zeos pero creo que el asunto lo tienes claro, lo unico que hay que buscar es el procedimiento que acepte el Zconnection.
Try
Busca la base de datos
except
Lo que se necesite, puede ser un mensaje.
normalmente en el caso de transacciones seria asi:
Código Delphi [-]Try // lo que sea
except on E:Exception do DataModule1.AC1.RollbackTrans;
end;



Saludos

Gracias Caral. Ya he probado con eso pero aun asi me marca el error de que no existe la base de datos, ya se que no existe, pero reuqiero que me pueda manejar este tipo de error para el usuario y no me tire el sistema.

A continuacion pongo el codigo que empleo..
Código Delphi [-]
Try
zconnection1.HostName:=NxEdit1.Text;
zconnection1.Database:=NxEdit3.Text;
zconnection1.Connect;
bandera:=1;
except
on E : Exception do
ShowMessage('no se pudo conectar'+E.Message );
end;

Caral 16-11-2007 22:23:10

Hola
Normalmente y esto lo digo gracias a que me lo recordó Egostar, estos errores suceden en tiempo de diseño, osea dentro del IDE de Delphi.
Lo as probado en el ExE, (el Ejecutable) ?
Comentanos?
Saludos

JcTaztoman 16-11-2007 22:28:28

Gracias!!
 
Cita:

Empezado por Caral (Mensaje 246730)
Hola
Normalmente y esto lo digo gracias a que me lo recordó Egostar, estos errores suceden en tiempo de diseño, osea dentro del IDE de Delphi.
Lo as probado en el ExE, (el Ejecutable) ?
Comentanos?
Saludos

Ya lo he probado, :eek: y si efectivamente estos errores suceden en tiempo de diseño, como lo mencionas, hoy he aprendido algo nuevo:rolleyes:.

Muchisimas Gracias de nuevo!!:D

Caral 16-11-2007 22:32:20

Hola
Que bueno, hoy he recordado algo, gracias a un amigo.
Saludos


La franja horaria es GMT +2. Ahora son las 07:11:39.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi