Casa
Top.Mail.Ru Yandeks.Metrika
Foro: "Bases";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

abajo

¿Cómo crear una cadena de conexión TADOConnection? Encontrar ramas similares


Aleksandr   (2001-12-05 13:26) [0]

Estimados colegas!
Era necesario cambiar a componentes ADO para tablas Paradox (para abandonar el BDE). Pero en el BDE, el problema de la ruta a las tablas en las que se instalaron ellos y el programa se resolvió simplemente configurando la ruta en la propiedad Table.DataBaseName.
¿Y cómo hacer para ADOConnection. ConnectionString?



Eduard   (2001-12-05 13:36) [1]

usa ADOConEd; ... ... EditConnectionString



Aleksandr   (2001-12-05 14:04) [2]

2 Eduard
No hay tal ...



olden   (2001-12-05 15:15) [3]

en ADOConnection en el inspector de objetos, cree una cadena para acceder a su base de datos. Haz una prueba de conexión. Si todo está bien, ahora mire cuidadosamente la estructura de la línea y escriba sus propios procedimientos para cambiar los parámetros en la línea.

Aquí hay un pequeño ejemplo para comunicarse con MSSQL (recién horneado, probablemente con fallas)

hay una cadena (ConnectionString)
"Proveedor = SQLOLEDB.1; Contraseña = pobut; Información de seguridad persistente = Verdadero; ID de usuario = pobutadm; Catálogo inicial = pobut; Fuente de datos = antiguo"

primero lo llenamos con campos abstractos de tipo
% por ejemplouser%
para esto es el procedimiento AbstrADOStr

y luego en el lugar correcto en el momento correcto FillADOStr inserta los datos necesarios en estos campos

procedimiento AbstrADOStr (var AStr: cadena);
var i, aPos: entero;
tmpStr: cadena;
comenzar
AStr: = LowerCase (AStr);

aPos: = Pos ("contraseña =", AStr) + 9;
si APos> 9 entonces comience
tmpStr: = "contraseña =";
para i: = aPos a la longitud (AStr) comienzan
si AStr [i] = ";" luego descanso;
tmpStr: = tmpStr + AStr [i];
fin
AStr: = AnsiReplaceStr (AStr, tmpStr, "contraseña =% PASS%");
fin

aPos: = Pos ("id de usuario =", AStr) + 8;
si APos> 8 entonces comience
tmpStr: = "id de usuario =";
para i: = aPos a la longitud (AStr) comienzan
si AStr [i] = ";" luego descanso;
tmpStr: = tmpStr + AStr [i];
fin
AStr: = AnsiReplaceStr (AStr, tmpStr, "ID de usuario =% USER%");
fin

aPos: = Pos ("catálogo inicial =", AStr) + 16;
si APos> 16 entonces comience
tmpStr: = "catálogo inicial =";
para i: = aPos a la longitud (AStr) comienzan
si AStr [i] = ";" luego descanso;
tmpStr: = tmpStr + AStr [i];
fin
AStr: = AnsiReplaceStr (AStr, tmpStr, "catálogo inicial =% BASE%");
fin

aPos: = Pos ("fuente de datos =", AStr) + 12;
si APos> 12 entonces comience
tmpStr: = "fuente de datos =";
para i: = aPos a la longitud (AStr) comienzan
si AStr [i] = ";" luego descanso;
tmpStr: = tmpStr + AStr [i];
fin
AStr: = AnsiReplaceStr (AStr, tmpStr, "fuente de datos =% SERV%");
fin

fin;

procedimiento FillADOStr (var AStr: cadena; AServ, ABase, AUser, APass: cadena);
comenzar
AStr: = StringReplace (AStr, "% PASS%", APass, [rfIgnoreCase]);
AStr: = StringReplace (AStr, "% USER%", AUser, [rfIgnoreCase]);
AStr: = StringReplace (AStr, "% SERV%", AServ, [rfIgnoreCase]);
AStr: = StringReplace (AStr, "% BASE%", ABase, [rfIgnoreCase]);
fin;



Aleksandr   (2001-12-05 17:02) [4]

Lo siento, eso probablemente no hizo la pregunta.
Bueno, el problema no es la cadena, sino el hecho de que requiere un DataSource, que el usuario, por supuesto, no necesita ni puede ...



olden   (2001-12-06 12:41) [5]

En los Archivos del Reino de Delfos hay un artículo sobre cómo trabajar a través de ADO con bases de datos DBase y Paradox



asafr   (2001-12-06 12:46) [6]

var
strs: cadena;
comenzar
......
strs: = ADODB.PromptDataSource (0, Form1.ADOConnection1.ConnectionString);
......
fin;



Axel   (2001-12-06 13:13) [7]

Sdelai knopku dlja zapuska Microsoft Data Link,
Tam usuario sam mozet vybrat "nuznyi DataSource
i sohranjay gde-nib. poluchennye dannye.



Cheburek   (2001-12-06 14:37) [8]

1. Cree un archivo Connect.udl.
2. Lanzalo.
3. Configurar la ubicación de los archivos
4. En ConnectionString, escriba "FILE NAME = Connect.udl"



Páginas: 1 rama entera

Foro: "Bases";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

arriba









Memoria: 0.84 MB
Tiempo: 0.163 c
1-22083
Dennis
2001-12-19 12:06
2002.01.08
¡Ayuda por favor!


7-22431
Pachá
2001-09-21 15:58
2002.01.08
Cómo quitar de la tarjeta de sonido, la forma de onda.


14-22343
Esmerejón
2001-11-02 14:17
2002.01.08
Con la risa casi caigo al suelo!


6-22291
leviatán
2001-10-09 22:02
2002.01.08
Pregunta sobre el componente NMFTP


1-22017
Albañil
2001-12-17 19:45
2002.01.08
¿Cómo poner tu línea en la edición actual?





africaans albanés Arabic armenio Azerbaiyán vasco Bielorruso Bulgarian Catalán Chino (simplificado) Chino (tradicional) Croata Checo Danés Dutch Inglés Estonia filipina Finnish Francés
gallego georgiano Alemán Griego criollo haitiano hebreo hindi Húngaro islandés Indonesian irlandés Italiana Japonés Korean letón lituano macedonio Malay maltés Noruego
persa polaco Portuguese rumano Ruso Serbio Slovak Esloveno Spanish swahili Sueco Thai turco ucranio Urdu vietnamita galés yídish bengalí bosnio
cebuano esperanto gujarati hausa hmong igbo javanés kannada khmer lao latín maorí marathi mongol nepali punjabi somalí Tamil telugu yoruba
zulú
Английский Francés Alemán Italiano portugués Русский Español