Club Builder

[Christian]

Holas a todos.

He querido enlazar una tabla en access 2000 con Builder 6... pero no me resulta, me pregunta por unas contraseñas que no se de donde salen. He tratado de configurarla en los ODBC.. pero no pasa nada. Alguien me podría explicar como partir de 0 con una base en access. COn paradox no he tenido problemas.. pero el proyecto en que estoy requiere access.

De antemano gracias

[Fox_favre]

Yo tambien soy medio nuevo en esto de las BD. Pero casualmente los otros dias me conecte a una BD Access. Necesitas un ADO Connection
en donde le pasaras la cadena de conexion. La puedes generar haciendo doble click sobre el ado, en donde tienes que especificarle el motor con el que abriras la BD Acces (Algun Microsoft Jet, dependiendo del Office que tengas, creo que si es anterior al 2000 tienes que utilizar el 3.51, sino el 4), luego le das a siguiente, en donde tendras que especificar la ruta donde se encuentra la BD. Si la BD Access, no tiene contraseña, deberas tildar en Contraseña en blanco, y deja el nombre de usuario en blanco o de lo contrario el Admin, de lo contrario, deberas poner el usuario y la contraseña.
Para probar si se esta conectando bien, haz un click en "Probar Conexion", te deberia decir que la prueba se ha realizado con exito.
ahora, como acceder a la BD:
(Para esto voy a poner un pequeño ejemplo)

Primero un INSERT

//Primero paso la cadena de conexion
ADOQuery1->ConnectionString=ADOConnection1->ConnectionString;
ADOQuery1->SQL->Add("INSERT INTO tabla");
ADOQuery1->SQL->Add("VALUES ("+ IntToStr(Entero) + ",");
ADOQuery1->SQL->Add("'" + Texto + "')");
ADOQuery1->ExecSQL();
ADOQuery1->SQL->Clear();
ADOQuery1->Close();

Ahora un UPDATE
ADOQuery2->ConnectionString=ADOConnection1->ConnectionString;
ADOQuery2->SQL->Add("SELECT campo FROM tabla");
ADOQuery2->SQL->Add("WHERE campo = " + IntToStr(valor));
ADOQuery2->Open();
//***************
lo que se quiera hacer
//****************
ADOQuery2->SQL->Clear();
ADOQuery2->Close();

Ahora un UPDATE

ADOQuery3->ConnectionString=ADOConnection1->ConnectionString;
ADOQuery3->SQL->Add("UPDATE tabla");
ADOQuery3->SQL->Add("SET campo = " + IntToStr(Valor) + "");
ADOQuery3->SQL->Add("WHERE campoX = " + IntToStr(valorX));
ADOQuery3->ExecSQL();
ADOQuery3->SQL->Clear();
ADOQuery3->Close();


Espero te haya servido de algo.
Mucha suerte
bye'z
Fox.