• Viernes 8 de Noviembre de 2024, 23:02

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 - xZextorx

Páginas: [1]
1
Bases de Datos / Conectar Bases *.dbf Con Visual Basic 6.0
« en: Domingo 9 de Julio de 2006, 04:48 »
Hola gente, para conectar VIsual Basic y Acces seria:

Código: Text
  1. myData.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=_ruta de la BD.mdb_;Persist Security Info=False"
  2.  

*esa es una cadena de coneccion OLEDB.

luego vendria el tratamiento de los Recordsets, etc, etc...

Sql es relativamente más facil creo yo, pero,

como se conecta desde visual basic con tablas de FoxPRO, he buscado en Google y no he enconctrado nada, porfa gente alguien que sepa como hacerlo deme una manito, poniendo a disposición una pequeña explicación del tratamiento.

he trabajado siempre con ambos Gestores de Base de Datos, pero nunca con ese formato, es por eso que pido ayuda.

2
VBA / Re: Generar Numeros Pseudoaleatorios...
« en: Viernes 7 de Julio de 2006, 19:20 »
Hola gente...

Código: Text
  1.  
  2. Private Sub btnGenerar_Click()
  3. 'SALIDA=(A*X+INC)%Mod   ---> Formula para calcular números pseudoaleatorios
  4. Mult = Val(Trim(txtMulti.Text))
  5. Modul = Val(Trim(txtMod.Text))
  6. '--------------------------------------------
  7. Increm = Val(Trim(txtIncrem.Text))
  8. Total_Gen = Val(Trim(txtCantNumGen.Text))
  9.  
  10. Do While (X < Total_Gen)
  11.    Dim Salida As Integer
  12.    Salida = (Mult * X + Increm) Mod Modul
  13.    Xsub = Salida / Modul
  14.    List1.AddItem FormatNumber(Xsub, 4)    
  15.    X = X + 1
  16. Loop
  17. End Sub
  18.  
  19.  

Hola amigo, probe tu sugerencia pero no es la correcta ya que solo me arroja un número y la intension y el motivo por el cual es una instruccion repetitiva es para encontrar varios numeros hasta que el indice "X" ya no sea  menor que Total de numeros a generar...donde salida va a tomar el valor de la formula y seria el valor entero, para luego aplicarlo en la division con el modulo y asi encontrar el numero P.A. y poder pasarselo al List. el motivo del porque esta X=X+1 es porque va a ir sumando el indice y pasarselo a SAlida....el resto ya es solo SEGUIR EL CODIGO...la verdad no se si yo o tu estaremos en ERROR, si me codigo fuente esta equivocado, pero he probado de mi forma y la tuya y la que me dio resultados fue la mia, lamento contradecirte ya que has sido de gran ayuda...Saludos.


PD. del formulario Omiti la caja de texto semilla.

3
VBA / Re: Generar Numeros Pseudoaleatorios...
« en: Jueves 6 de Julio de 2006, 04:30 »
Hola gracias por responder...esta es una imagen del programa.



Código: Text
  1. Private Sub btnGenerar_Click()
  2. 'X_i+1=(A*X_i+INC)%Mod   ---> Formula para calcular números pseudoaleatorios
  3. Semilla = Val(Trim(txtSemilla.Text))
  4. Mult = Val(Trim(txtMulti.Text))
  5. Modul = Val(Trim(txtMod.Text))
  6. '--------------------------------------------
  7. Increm = Val(Trim(txtIncrem.Text))
  8. Total_Gen = Val(Trim(txtCantNumGen.Text))
  9.  
  10. Do While (X < Total_Gen)
  11.     Dim Salida As Integer
  12.     Salida = (Mult * X + Increm) Mod Modul
  13.     Xsub = Salida / Modul
  14.     List1.AddItem FormatNumber(Xsub, 4)    
  15.     X = X + 1
  16. Loop
  17. End Sub
  18.  
  19.  

este es el código que he tratado de hacer, la verdad no se si estara bien o mal a ver Uds. que tienen más experiencia porfa una manito...Gracias

4
VBA / Generar Numeros Pseudoaleatorios...
« en: Miércoles 5 de Julio de 2006, 06:27 »
Hola gente, alguien podria porfavor darme una pequeña explicacion de como crear un programa en el cual genere una determinada cantidad de números Pseudoaleatorios, la verdad que allí estoy perdido he buscado en el google, pero no he encontrado nada...

Sé que necesito un formulario con

un campo:
                   ____
Semilla ---> |___|
       
                          ____
Multiplicador ---> |___|

                  ____
Modulo ---> |___|

                         ____
Incremento ---> |___|

                                                ____
Cant. de numros a generar ---> |___|

de momento se que la formula para generarlos es

Rn+1=(Multiplicador * R0 + Incremento)%Modulo

la pregunta es como se utilizaria en una instrucción ?...

porfavor gente una manito...

5
Bases de Datos / Re: Abrir Una Tabla En Modo Exclusivo
« en: Martes 4 de Julio de 2006, 07:32 »
El contro ADO tiene una propiedad locktype si mal no recuerdo pruebala y avisas ojala haya sido de ayuda. Saludos.

6
Bases de Datos / Re: Nuevo Registro
« en: Martes 4 de Julio de 2006, 07:26 »
Hola, te recomiendo no programes  esa instruccion en el evento load, programala en el evento Activate de form. prueba y avisas...suerte.

Páginas: [1]