[VB6] uitlezen van een bepaalde locatie in binaire file.

[Verwijderd]

Als beheerder van telefooncentrales heb ik de opdracht gekregen om voor een bepaald type centrale een applicatie te ontwikkelen, dat de instellingen kan uitlezen. De centrale slaat zijn instellingen op in een binair bestand.

Als ik dit binair bestand uitlees met een hexeditor. dan zie ik herkenbare stukken die de parameters voorstellen.

Nu zoek ik een methode om deze file in te laden. Naar de speciefieke offset te gaan waar een bepaalde parameter staat. deze uit te lezen, en in te voegen in een textbox.

lezen vanaf een bepaald adress tot een ander bepaald adress is dus het probleem.
zoeken in google of got levert niet veel op.

wat ik vind is ofwel voor .NET of word te vaag omschreven
begrijp me niet verkeerd, ik zoek geen volledige code

alleen tips, ervarringen, voorbeelden of dingen waar ik achter kan zoeken.
dingen die me verder velpen.

[curry684]

Hmmmm klik hier eens?

En heb je uberhaupt wel enige ervaring met VB6 want als je post lees heb ik een knagend gevoel van niet...?

[Verwijderd]

oh yawel ik heb zeker ervaring met vb6, ik heb bewust mijn vraag simpel gehouden
ik heb echter relatief weinig ervaring met directe bestandstoegang

[ Voor 4% gewijzigd door Verwijderd op 22-09-2003 12:46 ]

[curry684]

Maar hit 1 op die Google-query van mij doet toch al exact wat je wilt en meer?

[farlane]

Seek ?

[MrC4u]

Gebruikt die telefooncentrale geen MS-Acces database? Hier gebruikten we SWAN en Ringmaster en die draaiden op een Access database.

[RayNbow]

Een basic voorbeeldje:

Visual Basic 6:

    Dim FileNum As Integer
    Dim Temp As Byte
    Dim TienTekens As String * 10
    FileNum = FreeFile
    
    Open "C:\JeBinairBestand.Ext" For Binary As FileNum
        'Schrijf naar Byte 1 het getal 100
        Put #FileNum, 1, 100
        
        'Lees van Byte 10
        Get #FileNum, 10, Temp
        
        'Lees 10 tekens in vanaf Byte 20 (Dus Byte 20 tot 29)
        Get #FileNum, 20, TienTekens
    Close FileNum

Ff een NB, VB telt vanaf 1. Dus de eerste byte in het bestand is 1 en niet 0

Als je wat meer wilt weten, zoek ff in de MSDN naar Put Statement, Get Statement en Open Statement

[Sponge]

RayNbow schreef op 22 September 2003 @ 23:56:
Een basic voorbeeldje:

Visual Basic 6:

    Dim FileNum As Integer
    Dim Temp As Byte
    Dim TienTekens As String * 10
    FileNum = FreeFile
    
    Open "C:\JeBinairBestand.Ext" For Binary As FileNum
        'Schrijf naar Byte 1 het getal 100
        Put #FileNum, 1, 100
        
        'Lees van Byte 10
        Get #FileNum, 10, Temp
        
        'Lees 10 tekens in vanaf Byte 20 (Dus Byte 20 tot 29)
        Get #FileNum, 20, TienTekens
    Close FileNum

Ff een NB, VB telt vanaf 1. Dus de eerste byte in het bestand is 1 en niet 0

Als je wat meer wilt weten, zoek ff in de MSDN naar Put Statement, Get Statement en Open Statement

Die 2e Get kan beter een "Seek" worden. Deze manier is niet echt een optimaal .

[Verwijderd]

Mrc4U schreef op 22 September 2003 @ 23:12:
Gebruikt die telefooncentrale geen MS-Acces database? Hier gebruikten we SWAN en Ringmaster en die draaiden op een Access database.

neen;
de machine slaat deze op in binair formaat.

[Verwijderd]

dank je wel;
ik begin al aardig op weg ter geraken

[RayNbow]

41.6C.6D.61.72 schreef op 23 september 2003 @ 12:31:
[...]


Die 2e Get kan beter een "Seek" worden. Deze manier is niet echt een optimaal .

Dus het volgende is dan beter/sneller/etc?

Visual Basic 6:

Seek #FileNum, 20
Get #FileNum, , TienTekens