Programación General > Visual Basic 6.0 e inferiores

 Obtener Primer Registro De Una Tabla

(1/1)

phantom24:
Hola a tod@s. Soy un novato trabajando con BBDD. Tengo una tabla de la cual a través de una consulta SQL quiero sacar el código numérico del primer registro de la tabla algo como SELECT First(camponumerico) from TABLA y luego asignarlo a una variable. Y es que ahora temporalmente "yo mismo" asigno ese código.

--- Código: Text --- CodLoc = 9frmficha.Show  
Donde CodLoc es el código numerico que quiero obtener a través de la consulta y frmficha.Show muestro la ventana con los datos correspondientes a ese código numérico.

Sé que se debe hacer con un RecordSet y tal, pero exactamente no sé como hacerlo.

Gracias por vuestra ayuda.

Un saludo,
 :lol:

fap1603:
Hola, yo utilizo lo absoluteposition del recordset y move, por ejemplo:

posision=basedatos.recorset.absoluteposition 'me da la posision del registro activo

basedatos.recorset.move = posision ' muevo a la posision que deseo

otra cosa que puedes hacer es usar el bookmark, pero debes añadirlo a una variable tipo variant, y la asignas depues de un basedatos.refresh. Espero te ayude en algo.

Jeremy:
Me había olvidado de decir que para trabajar con la BBDD utilizo ADO 2.5 . Ahora mismo lo tengo así, pero no me funciona:

--- Código: Text --- Private Sub mnuficha_Click()Set cn = New ADODB.ConnectionSet rs = New ADODB.RecordsetDim primcod As LongWith cn    .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Base de Datos.mdb;Persist Security Info=False"    .OpenEnd With With rs        .Open "SELECT First(codigol) FROM articulos", cn, adOpenDynamic, adLockOptimisticEnd WithCodLoc = rs.Fields("codigol") '--->aquí es dónde asigno el valor resultante de la consulta SQLfrmficha.showEnd Sub   
Pero como lo anterior no me funciona para continuar con el resto de procesos del programa estoy asignando temporalmente el código "a mano".

--- Código: Text --- Private Sub mnuficha_Click()CodLoc = 9frmficha.ShowEnd Sub  Parecer ser algo muy sencillo, pero la verdad es que estoy empezando a trabajar con el tema de vincular  Bases de datos.
Gracias por vuestra ayuda.

Un saludo,  :hola:

Navegación

[0] Índice de Mensajes