Clarioneros

Les acerco una aplicación como ejemplo para trabajar con librerias y SQL, seguramente habrá muchos que ya han superado esta etapa, pero para los que no, les puede ser de utilidad, convengamos que es una aplicación muy basica como para un inicio.
Esta aplicación deben compilarla para lograr su ejecutable (por una cuestion de tamaño se subio solamente los app y el dct)
Hay un txt que indica algunos pasos a seguir, esta aplicación esta probada en MSSQL y en FIREBIRD.
Desarrollada con CL6.3
Saludos

Buenísimo! Gracias, Edu!

Muchas gracias por el aporte Eduardo, vamos a ver si empezamos con sql..., ya tenia casi todas las respuestas ahora me cambian las preguntas dijo alguien...
Saludos, Tito

Muy Buen ejemplo, yo lo hice funcionar y me quedo super claro el funcionamiento.

Muchas Gracias!!

Hola Edu, estoy tratando de hacer funcionar tu demo pero me encuentro con varios problemas, te cuento que tengo un server 2003 con motor sql2000 migrado a sql2008, todo bien pero no puedo conectar con el servidor, ese es el mensaje que me sale cuando trato de crear la base de datos, antes hago el cambio del nombre del servidor que tienes en la aplicacion (local) por MI-SERVER y la base de datos master por MI-BASE, usuario y contraseña. Pense que algo malo tenia, pero si conecto con otra base de datos con tablas que tienen datos, funciona bien la conexion. Existe algo que no este haciendo bien?

Cualquier aporte se agradece.

iovacom escribió:ese es el mensaje que me sale cuando trato de crear la base de datos, .... la base de datos master por MI-BASE, usuario y contraseña. Pense que algo malo tenia, pero si conecto con otra base de datos con tablas que tienen datos, funciona bien la conexion. Existe algo que no este haciendo bien?

Cualquier aporte se agradece.

Hola, entiendo que tu problema es CREAR UNA BASE, bueno primero creo que habría que revisar tu código o scrip para crear la base y ver donde esta el problema, deberías ejecutarlo en tu administrador de consultas y si ves que funciona recién ahí ponerlo en tu aplicación.

Justamente el tema de "CREAR UNA BASE" no lo puse en la aplicación.
Saludos
Pd: Avísame si entendí mal tu planteo.

No se si yo me explique mal, pero por lo que veo en tu codigo, si esta la creacion de la DB:

loc:connectstring = 'driver=sql server;server='&glo:server&';database=' & glo:database & ';'
open(window)
accept
case accepted()
of ?okbutton
do CreateIt
res = 1
post(event:closewindow)
of ?cancelbutton
post(event:closewindow)
end
end
close(window)
if res = 0
halt()
else
message('La base de datos ha sido creada.')
end

CreateIt routine
open(cwindow)
display
ff{prop:owner} = loc:connectstring
ff{prop:logonscreen} = 0
open(ff)
if errorcode() = 90
! somethis is bad wrong here
message('No puedo conectar con el servidor.'&error()) !siempre sale por esta opcion
halt()
end
ff{prop:sql} = 'create database ' & glo:database
close(cwindow)
if errorcode() <> 0
message('No puedo crear la base de datos.'&error())
halt()
end

Estoy yo entendiendo mal?, mi problema es que siempre me da un error de conexion con el servidor.

Saludos

Hola Iva, me podras indicar en cual de las aplicaciones encontras esa parte del código, gracias.

Edu, le di varias vueltas y encontre lo que buscaba, el codigo lo descargue de http://www.icetips.com/downloadfile.php?FileID=65, me funciono muy bien, gracias por responder.

Saludos.