elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Únete al Grupo Steam elhacker.NET


  Mostrar Mensajes
Páginas: [1] 2 3 4 5 6 7 8
1  Programación / Programación Visual Basic / Re: VB6 USB MSCOMM en: 16 Febrero 2019, 10:24 am
Hola!

El circuito está conectado al PC por USB o por el puerto COM?

Encontré ésto, pero no sé si es lo que estás buscando: http://www.vbforums.com/showthread.php?612756-RESOLVED-MSComm-connection-for-USB-to-Serial-Port

Saludos!

Gracias nuevamente!!! voy por ese camino... Esto me fue de mucha ayuda!!

Código:
Resolví el problema. El problema era con las señales DTR y RTS.
En la mayoría de los convertidores de USB a serie, estas señales no se activan automáticamente.


Así que si podemos cambiarlo mientras enviamos datos en el puerto.

El problema se puede resolver


con Port2
.DTREnable = False
.RTSEnable = True
End con

**** Enviar datos

con Port2
.RTSEnable = False
.DTREnable = True
End con

Salu2
2  Programación / Bases de Datos / Re: Consulta Inmuebles/Contratos en: 15 Febrero 2019, 20:53 pm
Bueno, no soy experto en SQL, pero para MySQL creo que podrías usar:

Asumiendo que tienes un campo idcontrato en INMUEBLES:

Código
  1. UPDATE CONTRATOS AS c
  2. INNER JOIN INMUEBLES AS i ON c.id = i.idcontrato
  3. SET montoinicial = IF(CURDATE() > DATE(fechavence), montoinicial, (montoinicial * porcentajedeaumento) / 100)
  4. -- aqui puede ir una clausula where

Ahora ya tienes una...

No entiendo el uso del campo tiempodeaumento, por eso no lo incluí en la consulta. Pero ya tienes una idea...

Saludos!

Aaa pero me alegraste el día! gracias por tu ayuda!

El campo tiempoaumento es para saber si el aumento del alquiler es de 2 6 o 12 meses en caso de que sea por ejemplo de 6 meses y pasados los 6 meses del valor que tiene el campo fechadealta hacemos un aumento del montoinicial por el porcentajedeaumento. Ahora te vuelvo a molestar, si el contrato es de 3 años y ya vamos por el segundo aumento (a los 12 meses) que sería el mismo porcentajeaumento pero sobre el montoinicial ya aumentado, como lograríamos esa consulta, ahí estoy trabado. Y como agregado final a mi consulta que sería lo primero que tendríamos que comprobar, es que la fechadealta no supere a la fechadevence.

Salu2 desde Argentina tmb!  :-*
3  Programación / Bases de Datos / Re: Consulta Inmuebles/Contratos en: 15 Febrero 2019, 09:10 am
Bueno, ya tienes una sugerencia...  ;D

Saludos!

Ya te dí gracias, espero alguna consulta armada en modo ejemplo como hacen los usuarios normalmente en foros, para que me ayude a salir adelante con mi proyecto.
4  Programación / Bases de Datos / Re: Consulta Inmuebles/Contratos en: 15 Febrero 2019, 00:58 am
Hola!

Creo que te falta establecer una relación entre el Inmueble y el contrato.

La table inmuebles debería tener un campo más, que haga referencia al id del contrato. O bien, agregarlo en la tabla de pagos. Lo que creas más conveniente.

Con eso ya puedes establecer una relación completa entre las 3 tablas y solicionar tu consulta.

Saludos!

Gracias por tu pronta respuesta MCKSys Argentina... pero aclaré que no puse las relaciones justamente para ver alguna idea o sugerencia de relación.

5  Programación / Programación Visual Basic / VB6 USB MSCOMM en: 14 Febrero 2019, 21:18 pm
Hola, mi consulta es la siguiente hay manera de enviar información mediante el control MSCOMM por medio de un USB (perdón por la ignorancia de mi consulta) si es así sería siempre un COM1 o 2 o 3. Ahora alguien tiene algún ejemplo, porque el objetivo de mi consulta es enviar un bit para que luego un circuito electrónico (evitando arduino, raspberry, etc) por medio de un "relee" lo establezca en 1 o 0 dependiendo el bit que envíe dicho software. Les pido disculpas por lo engorroso y rebuscado para explicar. Espero su ayuda Salu2.
6  Programación / Bases de Datos / Consulta Inmuebles/Contratos en: 14 Febrero 2019, 21:17 pm
Hola gente del foro, le comento mi siguiente cuestión para ver si alguien tiene alguna respuesta que me pueda ayudar a seguir con mi proyecto.

Tengo 3 Tablas:

Código:
PAGOS:
--------
id
idcliente
idinmueble
fdpaga (fechadepago)
fdvence
monto
paga
debe
aumento (boolean)

INMUEBLES;
-------------
id
nombre
direccion
piso
depto-of

CONTRATOS;
-------------
id
montoinicial
fechadealta
fechavence
porcentajedeaumento
tiempoaumento

Tengo algo así, sin especificar relaciones porque es justamente donde viene mi consulta. ¿Cómo puedo hacer una consulta que al ingresar un Pago, de un Inmueble me verifique si ese inmueble tiene el contrato vencido (fechavence) y a su ves que si no está vencido me haga el aumento del montoinicial sabiendo el tiempodeaumento (bimestral/semestral/anual por 2, 6 o 12 meses) teniendo en cuenta el porcentajedeaumento sombre el montoinicial ?

• Aclaro que no generé campos que relacionen las tablas, solo para ver que ideas surgen.

Gracias por su ayuda.
7  Programación / Programación Visual Basic / Re: [CONSULTA] Copiar carpeta de archivos con progresbar en: 30 Diciembre 2014, 22:14 pm
 ;D gracias! :D lo voy a investigar ya estoy en un 90% casi lo tengo!

Salu2
8  Programación / Programación Visual Basic / Re: [CONSULTA] Copiar carpeta de archivos con progresbar en: 30 Diciembre 2014, 19:47 pm
Hola amigos del foro, estoy intentando hace unos días obtener la lista de archivos de un directorio y copiarlos uno por uno a otra carpeta, y que por medio de un minimo y máximo de archivos un progressbar cargue.

Ejemplo:

Carpeta c:\[Numeros]
Archivos 1.num 2.num 3.num 4.num
Copiar esto en d:\[Numeros]\*.*

Espero que me puedan ayudar.
Salu2  :D

      

Estoy listando los archivos de la carpeta de esta manera por el momento...

Código:
   'Variable de tipo FILE y FOLDER para listar los archivos de un path
    Dim El_Archivo As File
    Dim El_Directorio As Folder

    'Si no hay items en el List sale
    If List1.ListIndex = -1 Then Exit Sub
    
    List2.Clear
    
    'Nuevo objeto FileSystemObject
    Set Fso = New FileSystemObject
    
    ' Obtiene el directorio
    Set El_Directorio = Fso.GetFolder("c:\[Numero]")
    
    
    ' Lista los ficheros de esta carpeta
    For Each El_Archivo In El_Directorio.Files
       'Añade la ruta
       List2.AddItem El_Archivo.Name
        
    Next El_Archivo

Utilizo la referencia Microsoft Scripting Runtime

Ahora voy a recorrer dicho listbox utilizando:

Código:
Call Shell("xcopy /S CARPETA DESTINO", vbMaximizedFocus)

Voy a seguir programando, sé que lo voy a lograr, pero me parece muy rebuscado mi metodo. Siempre aparece una mente brillante generando ideas muy originales.

Salu2
9  Programación / Programación Visual Basic / [SOLUCIONADO] Copiar carpeta de archivos con progresbar en: 30 Diciembre 2014, 18:11 pm
Hola amigos del foro, estoy intentando hace unos días obtener la lista de archivos de un directorio y copiarlos uno por uno a otra carpeta, y que por medio de un minimo y máximo de archivos un progressbar cargue.

Ejemplo:

Carpeta c:\[Numeros]
Archivos 1.num 2.num 3.num 4.num
Copiar esto en d:\[Numeros]\*.*

Espero que me puedan ayudar.
Salu2  :D

      
10  Programación / Programación Visual Basic / Re: Seprar datos en una variable en: 5 Abril 2013, 05:11 am
 ;D Gracias por tu respuesta Danyfirex
Páginas: [1] 2 3 4 5 6 7 8
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines