GERAR VERSÃO DO SISTEMA COM CRIAÇÃO DE EXECUTAVEL
Bom dia pessoal...
Existe alguma forma de gerar no VB6 uma versão do meu sistema para cada executavel que eu gerar?
Imaginamos que na minha tela de login eu coloque um label assim: "Versão: 1.0"....
Ai faço "n" modificações no meu sistema e precise gerar outro exe... ai ele atualizaria para "1.1"
então cada vez que eu criasse um executavel, ele contaria um valor a mais na versão... automaticamente
Existe alguma forma de gerar no VB6 uma versão do meu sistema para cada executavel que eu gerar?
Imaginamos que na minha tela de login eu coloque um label assim: "Versão: 1.0"....
Ai faço "n" modificações no meu sistema e precise gerar outro exe... ai ele atualizaria para "1.1"
então cada vez que eu criasse um executavel, ele contaria um valor a mais na versão... automaticamente
Alterado em 22/05/2024 13:30:12
Colega,
Menu Project, última opção <nome do seu sistema> Properties, vá na guia (aba) Make.
Coloque lá o número de sua versão, Major, Minor e Revision.
No lalbel use App.Major e App.Minor para aparecer o número da versão.
Resumo, antes de compilar um .exe novo, apenas mude a versão no VB6 mesmo.
Na label irá sempre aparecer o número da versão de compilação do .exe
Menu Project, última opção <nome do seu sistema> Properties, vá na guia (aba) Make.
Coloque lá o número de sua versão, Major, Minor e Revision.
No lalbel use App.Major e App.Minor para aparecer o número da versão.
Resumo, antes de compilar um .exe novo, apenas mude a versão no VB6 mesmo.
Na label irá sempre aparecer o número da versão de compilação do .exe
Citação:Colega,Menu Project, última opção <nome do seu sistema> Properties, vá na guia (aba) Make.Coloque lá o número de sua versão, Major, Minor e Revision.No lalbel use App.Major e App.Minor para aparecer o número da versão.Resumo, antes de compilar um .exe novo, apenas mude a versão no VB6 mesmo.Na label irá sempre aparecer o número da versão de compilação do .exe
Entendi, obg
Dei uma procurada na internet como exibir no label essa versão e somente encontrei ele para .net
assim:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles MyBase.Load
With My.Application.Info.Version
VersionNumber.Text = "Version " & .Major & "." & .Minor & " (Build " & .Build & "." & .Revision & ")"
End With
End Sub
End Class
numeroVersao.Text = My.Application.Info.Version.ToString()
Como seria isso em vb6 ?
Alterado em 24/05/2024 09:34:00
Label1.Caption = Trim$(Str$(App.Major)) & "." & Trim$(Str$(App.Minor))
Funcionou perfeitamente meu amigo, obg
Tópico encerrado , respostas não são mais permitidas