Test Foro de elhacker.net SMF 2.1

Programación => .NET (C#, VB.NET, ASP) => Programación General => Programación Visual Basic => Mensaje iniciado por: CAR3S? en 13 Febrero 2011, 12:52 PM

Título: Obtener informacion?
Publicado por: CAR3S? en 13 Febrero 2011, 12:52 PM
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!
Título: Re: Obtener informacion?
Publicado por: Psyke1 en 13 Febrero 2011, 13:41 PM
http://goo.gl/ZTPXS

DoEvents! :P
Título: Re: Obtener informacion?
Publicado por: CAR3S? en 13 Febrero 2011, 14:04 PM
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
Título: Re: Obtener informacion?
Publicado por: 79137913 en 13 Febrero 2011, 18:49 PM
HOLA!!!

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

GRACIAS POR LEER!!!
Título: Re: Obtener informacion?
Publicado por: seba123neo en 13 Febrero 2011, 19:32 PM
FileVersionInfo (http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=73058&lngWId=1)
Título: Re: Obtener informacion?
Publicado por: CAR3S? en 13 Febrero 2011, 22:57 PM
Seba, como ya sabes...
Me dirias como se usa :huh:
Título: Re: Obtener informacion?
Publicado por: seba123neo en 13 Febrero 2011, 23:34 PM
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.

Título: Re: Obtener informacion?
Publicado por: CAR3S? en 13 Febrero 2011, 23:54 PM
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