encontrar el maximo en una sentencia de sql
buen dato, pero la verdad es que utilizo DataEnvironment1, esto utilizado el siguiente codigo:
Private Sub Command1_Click()
Dim r25 As New ADODB.Recordset
sql5 = " select max(Num_Sol) from Informacion "
DataEnvironment1.Connection1.Execute sql5
If r25.State = adStateOpen Then r25.Close
r25.CursorLocation = adUseClient
r25.Open sql5, DataEnvironment1.Connection1, adOpenStatic, adLockReadOnly, adCmdText
DataEnvironment1.Connection1.Execute sql5
If r25.AbsolutePosition > 0 Then
MsgBox " Se Encontro "
Text1.Text = Val(r25("Num_Sol"))
Else
MsgBox "nada"
End If
End Sub
" el encuentra la consulta pero no me la muestra en el text1 y manda un error, no se como mostrar en el text1 la consulta "