Version del proyecto
Miguel
26 de Abril del 2004
Hola quería saber como puedo recojer el valor de la version del proyecto.
Es decir crearme una propiedad del proyecto que me facilite esta informacion.
Es decir crearme una propiedad del proyecto que me facilite esta informacion.
en?
26 de Abril del 2004
Esta función te devuelve la versión del fichero que le pases (.exe, .dll, etc...) si el fichero existe, sinó existe o es un fichero que no tiene versión, te devuelve ""
Public Function VersionProducto(ByVal RutaFichero As String) As String
Dim Fso
Set Fso = CreateObject("Scripting.FileSystemObject")
If Fso.FileExists(RutaFichero) Then
VersionProducto Fso.GetFileVersion(RutaFichero)
End If
Set Fso = Nothing
End Function
Public Function VersionProducto(ByVal RutaFichero As String) As String
Dim Fso
Set Fso = CreateObject("Scripting.FileSystemObject")
If Fso.FileExists(RutaFichero) Then
VersionProducto Fso.GetFileVersion(RutaFichero)
End If
Set Fso = Nothing
End Function
ice_old
26 de Abril del 2004
muchas gracias, ya me funciona
Saludos
Saludos
ice_old
26 de Abril del 2004
muchas gracias, ya me funciona
Saludos
Saludos