potin

sruizg respondió: Esta respuesta la dio otro experto a tu misma pregunta Public Function FechaActual() As String Dim rs As New Recordset Set rs = cn.Execute("select Now()") If rs.EOF Then Exit Function FechaActual = Format(CStr(rs.Fields(0).Value), "dd/mm/yyyy hh:mm...