Mostrar ID de elemento antes de darlo de alta en BD (VB6) (SOLUCIONADO)

[Alexand3r]

Buenas foreros.

Aqui toy una vez más con mis dudas.

A ver si me explico bien.

Estoy haciendo una aplicacion en VB6 que conecta con una BD en MySQL, en el DataEnvironment tengo hechas todas las consultas. Y tengo una hecha para que me muestre el ID del elemento en el formulario antes de darlo de alta en la BD.

La consulta es la siguiente (se llama "count_entrada"):

SELECT COUNT(id_entrada) +1 FROM entrada

Cuando lo ejecuto desde el ejecutador SQL me muestra el 1 cuando aún no tengo ningún elemento, osea, que esta bien.

En el código del formulario donde quiero que me lo muestre, pongo lo siguiente:

BasedeDatos.Commands("count_entrada").Execute
BasedeDatos.rscount_entrada.Open
Text1.Text = BasedeDatos.rscount_entrada.Fields(0).Value
BasedeDatos.rscount_entrada.Close

Y es donde me da el error, me dice que "se requiere un objeto" al cargar la primera linea, y no sé como solucionarlo. Si podeis echarme una manita :P.

Bueno, gracias de antemano.

Un saludo.
Alex.

[Alexand3r]

Bueno, pues antes de nada dar las gracias por vuestra atención.

Por fin despues de 24 hras partiendome la cabeza, he dado con la solución, y la comparto con vosotros por si os surgiera el mismo problema.

El problema lo tenia porque estaba poniendo el nombre de la base de datos antes del Commands y antes del RS, cuando lo que tenia que poner para que conectara, era el nombre del DataEnvironment, que en mi caso, era tal cual "DataEnvironment".

Pues nada, espero que al menos mi duda, pueda servir para solucionar un posible problema similar a cualquier otro usuario.

un saludo.
Alex.