boris/TPS1100-Convert
boris/TPS1100-Convert
1
1
Fork 0
Code Issues Pull Requests Packages Projects Releases 1 Wiki Activity

version.txt update

Browse Source
This commit is contained in:
Boris Bilc 2024-06-26 23:03:46 +02:00
parent fd680d1a74
commit 9dff3a66d8
6 changed files with 10 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Form1.vb
View File

@ -714,13 +714,16 @@ Public Class Form1
' Preveri verzijo programa iz Gitea - MultiBox ' Preveri verzijo programa iz Gitea - MultiBox
Dim infoVerzija As String = My.Application.Info.Version.Major.ToString + "." + My.Application.Info.Version.Minor.ToString + "." + My.Application.Info.Version.Build.ToString + "." + My.Application.Info.Version.Revision.ToString Dim infoVerzija As String = My.Application.Info.Version.Major.ToString + "." + My.Application.Info.Version.Minor.ToString + "." + My.Application.Info.Version.Build.ToString + "." + My.Application.Info.Version.Revision.ToString
Dim gitVerzija As String = "" Dim gitVerzija As String = ""
Dim verReader As StreamReader = New StreamReader("https://multibox.nohost.me/gitea/boris/TPS1100-Convert/raw/branch/main/version.txt") My.Computer.Network.DownloadFile("https://multibox.nohost.me/gitea/boris/TPS1100-Convert/raw/branch/main/version.txt", "version.txt")
Dim verReader As StreamReader = New StreamReader("version.txt")
' Branje datoteke ' Branje datoteke
Do Until verReader.EndOfStream Do Until verReader.EndOfStream
' Preberi vrstico z verzijo na git ' Preberi vrstico z verzijo na git
gitVerzija = verReader.ReadLine() gitVerzija = verReader.ReadLine()
Loop Loop
verReader.Dispose()
verReader.Close()
If gitVerzija = infoVerzija Then If gitVerzija = infoVerzija Then
Dim Msg, Style, Title, Response Dim Msg, Style, Title, Response
@ -732,7 +735,7 @@ Public Class Form1
' Display message. ' Display message.
Response = MsgBox(Msg, Style, Title) Response = MsgBox(Msg, Style, Title)
Else Else
Dim Msg, Style, Title, Response, MyString Dim Msg, Style, Title, Response
Msg = "Trenutna verzija: " + infoVerzija + vbCrLf + "Nova verzija: " + gitVerzija + vbCrLf + vbCrLf + "Odprem stran za prenos?" ' Define message. Msg = "Trenutna verzija: " + infoVerzija + vbCrLf + "Nova verzija: " + gitVerzija + vbCrLf + vbCrLf + "Odprem stran za prenos?" ' Define message.
Title = "Preverjanje posodobitev" ' Define title. Title = "Preverjanje posodobitev" ' Define title.
@ -746,8 +749,7 @@ Public Class Form1
End If End If
End If End If
My.Computer.FileSystem.DeleteFile("version.txt")
End Sub End Sub
End Class End Class

2
bin/Release/TPS1100 Convert.application
View File

@ -16,7 +16,7 @@
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" /> <dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms> </dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" /> <dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>fL9IZbgLltrDNiVT3j6xsCFFzLeOHuEhLd4qrrvX5NE=</dsig:DigestValue> <dsig:DigestValue>n+zx1gEh0CuKB5fumxQKwCN1rHbYEhvMHZOs2Wg4As0=</dsig:DigestValue>
</hash> </hash>
</dependentAssembly> </dependentAssembly>
</dependency> </dependency>

BIN
bin/Release/TPS1100 Convert.exe
View File

Binary file not shown.

4
bin/Release/TPS1100 Convert.exe.manifest
View File

@ -50,7 +50,7 @@
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" /> <dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms> </dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" /> <dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>2EdOprQDPWWzBpfUnVZGDGbK2kcMlkpfYfX+780uX2k=</dsig:DigestValue> <dsig:DigestValue>1tN/T1WgMLolPBdRxHnOOyo2gIhDebLBTe942nU6PpE=</dsig:DigestValue>
</hash> </hash>
</dependentAssembly> </dependentAssembly>
</dependency> </dependency>
@ -132,7 +132,7 @@
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" /> <dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms> </dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" /> <dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>mNmAlgFrhbUzVYOqihJIyFyJwHrZr0+dXBsUtIvCb9g=</dsig:DigestValue> <dsig:DigestValue>3WlZiOvKSdDuWOkD/fPjw3wjwx8twF6o655cVvG294Y=</dsig:DigestValue>
</hash> </hash>
</file> </file>
<compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1"> <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">

BIN
bin/Release/app.publish/TPS1100 Convert.exe
View File

Binary file not shown.

2
version.txt
View File

@ -1 +1 @@
2.7.0.3 2.7.0.4