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