vs versie nummer herkenen

[hanonymouss]

Hallo allemaal,

Ik ben bezig met een programma dat er voorzorgt dat hij een bepaalde versie kan herkennen.

Voorbeeld: google versie 1.1, google versie 1.2 en google versie 1.3.

Als ik bijvoorbeeld de versie 1.1 installeer op mijn pc dat de button1 ineens actief wordt en de anders buttons van versie 1.2 en 1.3 inactief blijven.
Dus vraag ik aan jullie of het mogelijk is om dat de doen.

Alvast Bedankt.

 

[JoZ1]

Wat heb je al?

 

[hanonymouss]

Het enigste wat ik heb is deze code:

Dim procRunning() As Process
procRunning = Process.GetProcesses

For Each procs As Process In procRunning
 
If procs.ProcessName.Equals("Boostspeed") Then
 
MessageBox.Show("Het process avg pctuneup is actief")



End If

next

De boostspeed is het process van avg pctuneup



Het enigste wat die laat zien is de "msg"
Ik weet echt niet hoe ik eraan moet beginnen om naar die bepaalde versie te checken.

 

[CoD_NL]

http://msdn.microsoft.com/en-us/library/system.diagnostics.fileversioninfo.aspx

Met het bovenstaande kan je het versienummer achterhalen.

 

[JoZ1]

[CPP]For Each procs As Process In Process.GetProcesses
If procs.ProcessName = "Boostspeed" Then
MsgBox("Het process avg pctuneup is actief")
End If
Next

Dim a As FileVersionInfo = FileVersionInfo.GetVersionInfo("Pad_Naar_Bestand")
MsgBox(a.FileVersion)[/CPP]

Zo dus

 

[CoD_NL]

Je kan het pad ook gewoon het uit proces zelf halen:

[cpp]
foreach (Process proc in Process.GetProcesses())
{
if (proc.ProcessName == processName) // processName = "Boostspeed"
{
try
{
FileVersionInfo info = FileVersionInfo.GetVersionInfo(proc.Modules[0].FileName);

// info.FileVersion
}
catch
{
}
}
}
[/cpp]

 

[hanonymouss]

Jouw code is geschreven in c#

 

[hanonymouss]

[CPP]For Each procs As Process In Process.GetProcesses
If procs.ProcessName = "Boostspeed" Then
MsgBox("Het process avg pctuneup is actief")
End If
Next

Dim a As FileVersionInfo = FileVersionInfo.GetVersionInfo("Pad_Naar_Bestand")
MsgBox(a.FileVersion)[/CPP]

Zo dus

Dank u het werkt!!:thumb:
Heb je ook soms een code dat ik kan weten of mijn pc 64 of een 32 bit is?

Ik hb deze code geschreven:

Dim x As String = Environment.GetEnvironmentVariable("PROCESSOR_ARCHITECTURE")
If x = "x86" Then
MsgBox("Processor is 32 Bit")
Else
MsgBox("Processor is 64 Bit")
End If

Als ik dan op mijn button druk dan geef die aan dat mijn pc 32 bit is! maar mijn pc is 64 bit?

 

[JoZ1]

Dit zou moeten werken:

[cpp]Select Case IntPtr.Size
Case 4
MsgBox("x86!")
Case 8
MsgBox("x64!")
Case Else
MsgBox("?")
End Select[/cpp]

 

[hanonymouss]

Dit zou moeten werken:

[cpp]Select Case IntPtr.Size
Case 4
MsgBox("x86!")
Case 8
MsgBox("x64!")
Case Else
MsgBox("?")
End Select[/cpp]

Hij geeft steeds aan dat mijn pc x86 is terwijl hij x64 bit moeten zijn. Zou da ni komen omdat het programma in een x86 is gemaakt mijn platform is x86.