Cita:
Iniciado por hunagiator 
Hola a todos,
Estoy haciendo un formulario, en el cual uno de los campos es el numero de proyecto y esta relacionado con un campo de una base de datos que tengo vacia y lo que quiero es que al ejecutar el programa el campo numero de proyecto de formulario comienze con 1.....sin tener que meterlo a mano.
Y la siguiente vez que quiera meter otro me empiece por el numero que le toca en la base de datos...
espero haberme explicado.
un saludo
Hola, una forma podría ser esta (suponemos que la BD es de Access, si no lo es, cambia la cadena de conexión por la apropiada).
Código:
Dim rst As ADODB.Recordset
Dim i As Integer
Set rst = New ADODB.Recordset
With rst
.ActiveConnection = "Provider=Microsoft.jet.OLEDB.4.0;Data Source=" & App.Path & "\BaseDeDatos.mdb"
.CursorLocation = adUseClient
.Open "SELECT Count(*) AS Numero FROM TablaProyecto"
End With
i = rst!Numero + 1 ' si la tabla no tiene registros, "i" valdrá 1
rst.Close
El valor de "i" es el que tienes que grabar en el campo.
