Funktioner

GetApplicationBitness (XAPI2000)

Deklaration
Function GetApplicationBitness (ByVal FName As String) As Integer

Beskrivning
Returnerar vilken bitstorlek (32 eller 64 bitar) som en programfil (.EXE-fil) är kompilerad i. Parametern FName specificerar sökvägen till programfilen som ska undersökas.

Returvärden
Returnerar bitstorlek för en programfil. Funktionen returnerar antingen 32 eller 64. Inträffar det ett fel eller om programfilen inte existerar vid angiven sökväg returnerar funktionen 0.

Se även
GetBinaryFileBitness

Exempel

Nedanstående exempel testar om installerad version av Microsoft Excel är 32-bitars eller 64-bitars. Funktionen GetExcelAppPath i VB Super Library används för att erhålla aktuell sökväg till Microsoft Excel.

Dim sExcelFilePath As String
Dim iBitness As Integer
' Hämta sökväg till installerad Microsoft Excel
sExcelFilePath = GetExcelAppPath()

If Len(sExcelFilePath) > 0 Then
   ' Undersök bitstorlek för installerad Microsoft Excel
   iBitness = GetApplicationBitness(sExcelFilePath)
   ' Meddela resultat
   If iBitness = 32 Then
      MsgBox "32-bitars Excel är installerad!"
   End If
   If iBitness = 64 Then
      MsgBox "64-bitars Excel är installerad!"
   End If
End If