Obtener informacion?

Iniciado por CAR3S?, 13 Febrero 2011, 12:52 PM

0 Miembros y 1 Visitante están viendo este tema.

CAR3S?

Buenos dias   ::)

Es posible obtener informacion de un archivo marcado en un listbox?

No importa lo del listbox, importa lo de obtener  informacion (Descripcion,organizacion,nombre interno,etc)

Hay alguna api o algo?

Saludos!

Psyke1


CAR3S?

#2
ok, tengo que usar FileSystemObject  , GetFile

Pero no encuentro lo que serian las "Propiedades" del getfile.

Osea, encontre algunas, pero no la de la organizacion  :xD

79137913

HOLA!!!

@Mr Frog: jajaja una de las mejores paginas que vi!!! XD

GRACIAS POR LEER!!!
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

79137913                          *Shadow Scouts Team*

seba123neo

La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

CAR3S?

#5
Seba, como ya sabes...
Me dirias como se usa :huh:

seba123neo

el ejemplo que te pase usa el evento drag & drop del formulario, por eso el codigo esta metido ahi en ese vento, pero vos lo podes sacar de ahi y meterlo donde quieras...la clase dejala igual, aca te paso un ejemplo de como obtener la organizacion de un archivo de algun path que vos le pongas:

Código (vb) [Seleccionar]
Dim oFileInfo As FileVersionInfo

Private Sub Form_Load()
    Set oFileInfo = New FileVersionInfo
   
    Dim vStr As String
   
    oFileInfo.GetFileVersionInfo "C:\proyecto1.exe"
   
    vStr = "Product Name : " & oFileInfo.ProductName
    vStr = vStr & vbCrLf & "Product Version     : " & oFileInfo.ProductVersion
    vStr = vStr & vbCrLf & "Company Name    : " & oFileInfo.CompanyName
    vStr = vStr & vbCrLf & "File Description   : " & oFileInfo.FileDescription
    vStr = vStr & vbCrLf & "File Version    : " & oFileInfo.FileVersion
    vStr = vStr & vbCrLf & "Internal Name    : " & oFileInfo.InternalName
    vStr = vStr & vbCrLf & "Original Filename    : " & oFileInfo.OriginalFilename
    vStr = vStr & vbCrLf & "Legal Copyright    : " & oFileInfo.LegalCopyright
    vStr = vStr & vbCrLf & "BuildID    : " & oFileInfo.BuildID
    vStr = vStr & vbCrLf & "Comments    : " & oFileInfo.Comments
   
    MsgBox vStr
   
    Set oFileInfo = Nothing
End Sub


saludos.

La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

CAR3S?

#7
Gracias seba,

Si tuviera que sacar la organizacion de cada path de un list o.o ?

osea, el codigo no me sirve, ya lei sobre listbox listview y esas cosas, no lose todo de memoria, pero algo se. Pido alguna orientacion, epro en español...  :P