• Jueves 9 de Mayo de 2024, 20:48

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - J.M.Movilla

Páginas: 1 2 3 [4] 5 6 ... 17
76
Visual Basic 6.0 e inferiores / Para Movilla, sobre los colores en los grid...
« en: Martes 5 de Agosto de 2003, 18:17 »
Quiero manifestar mi público agradecimiento a Miguel por su interés en ayudarme en este tema, y muy especialmente a Pablo (chiaravel) que ha empeñado horas de dedicación para dejarme este tema completa y satisfactoriamente resuelto.  Muchas gracias a ambos.

77
VBA / ultimo dia de fecha
« en: Martes 5 de Agosto de 2003, 18:08 »
Estoy seguro de que existe una función que devuelve el último día del mes, pero hasta que alguien te indique cuál es, seguro que va a resulverte el problema esta función que se me ha ocurrido:


Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)

    '  TextBox en el que se introduce la fecha a valorar
    If KeyCode = 13 Then
        Dim nDias As Integer             ' Este será el valor del último día del mes
        nDias = DiasMes(Text1.Text)
    End If

End Sub

Private Function DiasMes(dFecha As Date) As Integer
    Dim nDias As Integer
    Dim dMes As Date
   
    On Error Resume Next
    nDias = 31
    Do
        dMes = Str(nDias) & Mid(dFecha, 3)
        If Err = 0 Then
            Exit Do
        End If
        Err = 0
        nDias = nDias - 1
    Loop
    DiasMes = nDias
End Function

Te adjunto el programita que he preparado para conseguir este cálculo.

También tengo que indicarte que este tema debías de haberlo planteado en el foro de Visual Basic, no en VBA...

Saludos y suerte

78
VBA / Ayuda nesecito presentar el proyecto
« en: Martes 5 de Agosto de 2003, 16:59 »
Amigo Chuvy:

1º.-  Este tema no es propio del foro VBA, sino del de Visual Basic.  Allí es donde tenías que haberlo presentado.

2º.-  No entiendo exactamente qué es lo que quieres, por eso la ayuda que te ofrezco probablemente no sea la que tú esperabas... pero pruebo fortuna a ver si acierto...

a)  Pudiera ser que cuando tú pulsas "grabar" en realidad no se graben tus datos, y por eso al volver a entrar en la aplicación no consten como grabados...  Si es éste tu problema, cuida estos detalles:

Si se trata de un registro nuevo, haz un AddNew
Si no es nuevo, haz un Edit
Asigna al campo el valor del textbox
Y finalmente NO OLVIDES hacer un Update

b)  Pudiera ser que lo que tú quieres es que cuando arranques la aplicación te aparezcan en pantalla los datos que introdujiste antes de cerrarla...

En este caso sólo tendrás que abrir la db, ir al último registro (Movelast) y asignar al textbox el valor del campo en el que grabaste ese dato...

c) Pudiera ser, y esto es lo más probable..., que NI LO UNO NI LO OTRO... En este caso, ya sabes... Aclaración al canto, de forma que te entendamos sin ninguna duda.

Saludos y suerte

79
Visual Basic 6.0 e inferiores / Como crear una lista del registro de windows
« en: Lunes 4 de Agosto de 2003, 16:02 »
Si tú ejecutas regedit.exe tienes la posibilidad de visualizar, editar, imprimir... todos los registros.

Saludos

80
Veo que llevas dos días sin que Brroz te responda, y me meto quizás donde nadie me llama, pero prefiero echarte una mano aunque para alguien pueda quedar mal...

Mira, la respuesta que te da Brroz creo que cumple totalmente tu necesidad, porque con esa instrucción "NO CUENTAS LOS REGISTROS QUE HAY ENTRE DOS FECHAS", como tú crees sino que "TE CALCULA EL TOTAL DE LA COLUMNA CORRESPONDIENTE AL IMPORTE" (SUM(Campo1)), que sería en tu caso SUM(Importe).

Para que lo comprendas mejor, puedes sustituir la fórmula que te dió Brroz por esta otra (que es lo mismo, pero quizás más didáctica):

"SELECT SUM(Importe) AS Total FROM Tabla WHERE Fecha BETWEEN #" & Text1.Text & "# AND #" & Text2.Text & "#"

De esta forma luego podrás tratar el campo Total, que será el resultado de sumar todos los importes de fecha "comprendida entre" (BETWEEN) las dos indicadas en tus textboxes.

Saludos

81
Dudas informáticas / A SOLOCODIGO
« en: Jueves 31 de Julio de 2003, 19:21 »
Con vosotros da gusto...  Por eso Solocodigo va como va...

Me parece estupenda la solución, pero todavía sería mejor si en lugar de aparecer por encima del banner publicitario pusiéseis esa línea por debajo del banner...  Y no me llaméis quejica o triquismiquis...

Repito mi agradecimiento y mi afectuoso saludo,  José María

82
Me alegro de haber puesto en escena lo poco apropiado que está el tema de los Mensajes personales (U2U) en Solocodigo.

Miguel P. NI SIQUIERA SE HABÍA ENTERADO DE QUE EXISTÍA ESE SERVICIO, y en todos estos últimos días no ha visto el letrero que le estaba informando de que tiene mensajes pendientes de leer...  Por cierto, vamos a esperar a ver si este tema me lo soluciona Pablo; en caso negativo (y también para otros problemas "de peso" que tengas en el futuro) te aconsejo que utilices WINRAR, con el que haces automáticamente comprimidos fragmentados de cualquier grupo de ficheros, y te va enviando automáticamente esos fragmentos (de 1 Mb. o del tamaño que definas).  Si es muy largo el envío tendrás que soportar varios e-mails... pero funciona.

Por lo mismo reitero a Solocodigo la solicitud de que MEJOREN ESE ANUNCIO, poniéndolo en español, en una línea más llamativa que el borde superior donde nadie se fija, parpadeante y con una duración mayor a los 3 segundos actuales.

Y a Pablo... además de agradecerle su apoyo, le ruego QUE REVISE EL CITADO SERVICIO DE MENSAJERÍA, donde tendré el gusto de dirigirle la palabra... agradecida...

Saludos a todos.

83
Lo que sí veo claramente es que tú no has leído los mensajes que te he puesto a través de Solocodigo... Y por eso he solicitado que modifiquen la forma como notifican de su existencia... porque nadie se entera.

Incluso en el mensaje relacionado con tu propuesta sobre el polémico tema de confirmar el resultado de las consultas, hacía referencia a esta cuestión y ponía que tú mismo te sorprenderías del tiempo que llevabas sin enterarte de que tenías un mensaje sin leer...

El hecho de usar los U2U, en mi caso al menos, se debe a que te comunico mi correo electrónico privado, cosa que no me conviene hacer público...

Muchas gracias por tu recuerdo y por tus atenciones, y un afectuoso saludo.

84
Visual Basic 6.0 e inferiores / Re: Imagen con contorno
« en: Miércoles 30 de Julio de 2003, 22:56 »
Y yo que estaba tan contento porque todavía recuerdo el algoritmo de Euclides para obtener el m.c.d....

Entre Miguel y Acalanto me han dado un repaso que tengo que dar un suspiro para que me entre el aire...

Ya decía yo que este foro tiene enjundia. Para mí que es muy difícil encontrar otro con tanta masa gris.  Sigamos comunicando nuestros conocimientos, aunque nadie nos diga que nos han comprendido o que somos incomprensibles...  (yo, de paso, a Acalanto y Miguel tengo que decirles me han parecido catedráticos los dos; porque, sin haberles entendido ni palabra, me ha encantado su disertación...  Para otro día más, por favor).

85
Dudas informáticas / Re: A SOLOCODIGO
« en: Miércoles 30 de Julio de 2003, 19:34 »
Hola, amigos:

La verdad es que ese mensaje lo he considerado siempre como una ventana propagandística... Nunca he intentado buscar en ella otra cosa...

Hoy me he enviado dos automensajes y compruebo que efectivamente aparece en la parte superior una línea indicando que tengo mensajes nuevos, pero aparte de que aparece en inglés cuando todo el resto de la página está en español... la duración es tan corta que O SABES PREVIAMENTE DE SU EXISTENCIA O NO TE ENTERAS....

Por ello os ruego que veáis de corregir ambos inconvenientes, si ello es posible y no excesivamente molesto.

En todo caso os pido que me perdonéis las molestias causadas por mi ignorancia.

Afectuosos saludos,   José María

86
Visual Basic 6.0 e inferiores / Re: Por favor, confirmar si funciona...
« en: Miércoles 30 de Julio de 2003, 14:42 »
Puede uno ser claro y justo respetando a la persona, pero diciéndola que su comportamiento es incorrecto...

En una ocasión yo le puse a un miembro del foro los puntos sobre las íes, y me lo aceptó tan sumamente bien, reconociendo su fallo, que ahora somos excelentes amigos...  Eso ocurrió cuando yo empecé a mover este tema con el planteamiento de la encuesta de marras, que ya véis que no ha surtido mucho efecto...

Ahora le he planteado a Solocodigo una mejora que creo os parezca buena a todos... Que cuando conectemos nos aparezca el aviso de "Tiene usted un U2U en su bandeja de entrada", sin necesidad de entrar en el "panel del control"... Porque a todos se nos pasa este detalle, y luego nos encontramos con que tenemos mensajes pendientes de leer desde el año pum... como le va a pasar a Miguel P. cuando se le ocurra echarle un vistazo a su mensajería... y como me ha pasado a mí montones de veces...

Bueno ruego disculpas....  Solocodigo me indica que esa moción ya está resuelta... y YO SIN ENTERARME... Al parecer aparece arriba una línea indicando la contingencia... pero es POCO SIGNIFICATIVA.  Ya les solicito que modifiquen su formato... y que la pongan tan en español como está el resto de la página...

87
Dudas informáticas / Re: A SOLOCODIGO
« en: Miércoles 30 de Julio de 2003, 10:43 »
Estimados amigos:

A ver si esta vez tengo tan buena respuesta por vuestra parte como en solicitudes anteriores...

Vengo comprobando que la mayoría de los usuarios del foro tenemos el mismo problema: NO ENTRAMOS SISTEMÁTICAMENTE EN "panel de control" PARA COMPROBAR SI TENEMOS MENSAJES U2U".  Y esto nos hace quedar mal con aquéllos que utilizan esta vía para contactar con nosotros usando datos que no conviene publicar (dirección privada, etc.)

Os hago la siguiente propuesta: ¿Sería complicado insertar el mensaje de aviso sobre "Tiene un U2U en la bandeja de entrada" cuando se haga la conexión al foro, sin necesidad de entrar en el "panel de control"?

Muchas gracias por vuestras atenciones, y un afectuoso saludo,

José María Movilla Cuadrado

88
Visual Basic 6.0 e inferiores / Re: Por favor, confirmar si funciona...
« en: Martes 29 de Julio de 2003, 21:35 »
Hola a todos:

Sabéis que hace unos 3 meses propuse la encuesta http://foros.solocodigo.com/viewthread.php?tid=3181 en la que hacía referencia a mis 17 intervenciones, prácticamente todas sin respuesta...  Hoy, con 333 intervenciones (que "hasta vergüenza me da de haberos aburrido tanto...") puedo comprobar que los que respondéis sois siempre los mismos, justamente los que os doléis de que haya tanto aprovechado que no se digne no ya dar las gracias sino ni siquiera participar con su conformidad, para que las respuestas tengan utilidad con vistas a futuras preguntas; pero no pasamos de 10 ó 15...

El caso es que este foro es de lo más "vivo" que conozco, y si se consiguiera un buen porcentaje de respuestas podría ser más que excelente...  Hay que lograrlo, aunque sea con métodos "moderadamente coercitivos" mediante cierto control por parte del propio "Solocodigo"..., digo yo...

Saludos.

89
A ver si te sirve este código...
Saludos

90
Visual Basic 6.0 e inferiores / Como imprimir reportes
« en: Viernes 25 de Julio de 2003, 01:02 »
Te adjunto el código para que puedas  utiliza el DataReport, que es como el Crystal aunque con potencial limitado... pero con la ventaja de que es parte integrante de Visual Basic, sin necesidad de instalar el CR.

Saludos y suerte

91
Visual Basic 6.0 e inferiores / Re: Configuracion Regional
« en: Miércoles 23 de Julio de 2003, 23:08 »
Hola Pablo:

Puedes definir una variable

Public carDec as String

y en el Main() escribes

carDec = IIf (InStr(1 / 2, ".") > 0 , ".", ",")

De esta forma podrás a lo largo de la aplicación cambiar en los inputs la coma por punto o el punto por coma, según te interese, dependiendo del valor de carDec.

De todas formas, el código que te adjunto te va a dar mucha más luz, valiéndote de la función Val().

Saludos

92
Amigo Miguel:
Me ha pasado lo mismo que a Pablo... que me sentí atraído por tu invitación, pero luego me desilusionaron los resultados al fallar el registro de los ocx.  A ver si nos aclaras dónde está el error.
Saludos

93
Hoy ha caído en mis manos este código, con el que espero puedas dar solución al problema que planteaste.

Saludos y suerte

94
Visual Basic 6.0 e inferiores / Re: hacer programa para una PC 486...
« en: Lunes 21 de Julio de 2003, 23:03 »
Mi mejor consejo:
No te fíes de recomendaciones teóricas... Toma el programa e intenta instalarlo en ese PC.  Después... tú mismo...

Saludos y ojalá obtengas el milagro.

95
Visual Basic 6.0 e inferiores / Imagen en Excel
« en: Domingo 20 de Julio de 2003, 21:10 »
Con este código insertarías una imagen en la celda C7 de la hoja de cálculo que estés tratando:

   Range("C7").Select
    ActiveSheet.Pictures.Insert("RutaImagen" & "NombreImagen").Select


Saludos

96
Visual Basic 6.0 e inferiores / Re: AYUDA PARA RECONOCER CARACTERES
« en: Sábado 19 de Julio de 2003, 18:41 »
A ver si es esto lo que querías...

Saludos

97
Visual Basic 6.0 e inferiores / Re: Hacer gráficos
« en: Viernes 18 de Julio de 2003, 18:25 »
A ver si te sirve este código que me bajé hace tiempo de "no sé dónde"...

Saludos

98
Que no, hombre, que no...
Ya se ve que no estás al tanto de una de nuestras canciones más en boga "No me llames iluso porque tenga una ilusión..." Yo reconozco que la solución que te proponía era un tanto quimérica, por eso "te cantaba" esa canción de moda... Pero en ningún momento se me ocurrió sospechar que tú me ofendieras o me insultaras... Perdona el que te haya inducido involuntariamente a pensar en esa posibilidad...
Gracias por las soluciones que apuntas, totalmente desconocidas para mí, y un afectuoso saludo

99
Visual Basic 6.0 e inferiores / Re: Renombrar ficheros
« en: Sábado 12 de Julio de 2003, 22:00 »
Muchas gracias a los dos que habéis aportado la solución.
En realidad el link sobre FileSystemObject creo que no añade nada nuevo respecto a lo que contiene la MSDN (probablemente sea repetición...)

Saludos y nuevamente gracias por mi parte

100
Visual Basic 6.0 e inferiores / ADO
« en: Viernes 11 de Julio de 2003, 14:45 »
Depende del tipo de conexión que estés usando; pero en todo caso acostúmbrate a cerrarla antes de abrirla.

Para evitar que te dé error, la instrucción de cerrar la conexión hazla condicionada a que esté abierta, por ejemplo:
If DataEnvironment1.rsComand.State Then DataEnvironment1.rsComand.Close

Esta instrucción nunca va a darte error y te va a evitar que te dé error la apertura...

Saludos y suerte

Páginas: 1 2 3 [4] 5 6 ... 17