Red de conocimientos turísticos - Información de alquiler - Algunas preguntas sobre la programación vb6.0. ¡¡¡Ayúdame a resolverlo para poder darte una recompensa!!! ¡¡¡No puede resolverlo todo, solo resuelve una parte!!!

Algunas preguntas sobre la programación vb6.0. ¡¡¡Ayúdame a resolverlo para poder darte una recompensa!!! ¡¡¡No puede resolverlo todo, solo resuelve una parte!!!

Se recomienda utilizar ADB para conectarse a la base de datos, es muy sencillo.

1. Proyecto-"Referencia-"Microsoft ActiveX Objct 2.8

2. Establezca una variable común, por ejemplo: DB1

3. la línea Código, por ejemplo, se conecta a la base de datos "Code Help!" en el mismo directorio que el programa actual, con el nombre de usuario "admin" y la contraseña "qwert12345". Establecer?DB1?=?Nuevo?ADODB.Connection

DB1.ConnectionString?=?" proveedor=microsoft.jet.oledb.4.0;"? amp;?" data?source="? App.Path?&?"\code auxiliar.mdb;jet?oledb:database?password=qwert12345;admin,qwert12345"

DB1.Open

En uso, su lenguaje SQL se puede utilizar para mejorar la consulta, como el siguiente código: (Contraseña de administrador de consulta, que se muestra en texto1)

Set?rs1?=?New?ADODB.Recordset

rs1.Open?" select?*?from?user", DB1, ?adOpenKeyset, ?adLockOptimistic

Con?rs1

For?x?=?1?To?.RecordCount

If?Fields("Nombre de usuario").Valor?=?"Entonces

text1.text?=?.Fields("Contraseña").Valor

Salir

Fin

Si

.MoverSiguiente

Siguiente

.Cerrar

¿Fin?