Mensajes

asi es, porque mejor no pones algo del codigo que tienes para darnos una mejor idea.....

no import si ya tienes una conexión puedes crear todas las conexiones que quieras


para lo del combo pues solo has un select
"SELECT * FROM Especies"

y luego llenas el combo

Código [Seleccionar] Expandir


while not tu_variable_de_la_tabla.EOF
       combo1.AddItem tb!Especie
       tu_variable_de_la_tabla.Movenext
wend


pues creo que para eso sería más facil que usaras una base de datos para almacenar los datos y luego con SQL sacar las consultas que quieras

Código [Seleccionar] Expandir


rs.Open "Select * from ANIMALES"
rs2.Open "Select * from ESPECIES"


....

ahora que si lo que quieres es sacar una consulta con las 2 tablas...

Código [Seleccionar] Expandir


rs.Open "SELECT A.Campo1, A.Campo2, B.Campo1, B.Campo2 " & _
             "FROM Animales as A, Especies as B " & _
             "WHERE A.Campox = B.Campox;"


que bueno que te funciono 

mira lo que se me ocurre es usar estructuras

primero declaras uns estructura para contener una matriz:

Código [Seleccionar] Expandir


Type otramatriz
    datos() As Variant
End Type


luego declaras una matriz que sea del tipo de la estructura que acabas de crear:

Código [Seleccionar] Expandir


Public matriz() As otramatriz



luego puedes redimensionar a tu gusto las matricez

Código [Seleccionar] Expandir


    ReDim matriz(1 To 10)
    ReDim matriz(1).datos(1 To 10)
    ReDim matriz(2).datos(1 To 10)
    ReDim matriz(3).datos(1 To 10).....


y no se, pero creo que para lo de pasar la matriz a la función puedes hacerlo asi:

Código [Seleccionar] Expandir


Function convertirBytes (ByRef una_matriz() As otramatriz) As Long
********
end function


Buenos días, alguien sabra como establecer permisos a un archivo, es decir lo que intento hacer es ponerle permisos a varios usuarios sobre un archivo, algo como esto

archivo.txt
y que tenga:
usuario1 -> leer
usuario2 -> leer, Modificar
usuario3 -> leer, Modificar, Borrar
usuario4 -> Control total

se que con el "SetAttr" pongo estos atributos, pero la duda es ¿¿¿como le hago para definirselos a cada usuario???? 

aqui encontraras un ejemplo:
http://vbasic.astalaweb.com/_inicio/Marco.asp?dir=Descargas/Treeview%20con%20imagen%20de%20fondo.zip

los items del list los puedes referenciar por medio de su indice:

Código [Seleccionar] Expandir


    List1.AddItem "item1"
    List1.AddItem "item2"
    List1.AddItem "item3"
   
   
    MsgBox List1.List(2)


ten encuenta que el primer item empieza con el indice 0

   strsql = "SELECT Max(mid(jerarquia, ["& P1 &"],2)) as Resultado FROM tbl_generaciones Where Mid(Jerarquia,1,1)=" & Mid(Me.txtpariente, 1, 1)

si esta función la tienes en un módulo te dará error porque usas el objeto "ME", que hace referencia al form en el que estas actualmente, lo que puedes hacer son 2 cosas

- enviale el dato como parametro de la funcion:

Código [Seleccionar] Expandir


Public Function BuscarHijos(P1 As Integer, Pariente as String) As Variant



- ó usa el nombre del form

Código [Seleccionar] Expandir


   strsql = "SELECT Max(mid(jerarquia, ["& P1 &"],2)) as Resultado FROM tbl_generaciones Where Mid(Jerarquia,1,1)=" & Mid(Nombredetuform.txtpariente, 1, 1)