🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #8032

Boolean => 2 x Byte in VB

#8032
From: Tim A.
Date: Thu, 01 Aug 2002 15:45
45 lines
2433 bytes
Hoi,

In een programma gebruik ik een gegevensbestand met records sequentieel
achter elkaar met de volgende structuur:

Type tpCrossmember
    InternalID As Long
    Firstname As String * 20
    LastName As String * 30
    username As String * 30
    Echelon As String * 5
    Email As String * 49
    Badgenumber As String * 11
    LastBirthdaycard As Date
    LastModified As tpLastModified
    Comments As String * 255
    Banned As Boolean             <================ Hier gaat het om!!
    Deleted As Boolean
    PosterStatus As Long
    Mailsettings As Long
    DataLink As Long                  ' link to record of other data
    dumInt As Integer
    dumLong As Long
    KeyString As String * 30
    dumCurrency As Currency
End Type

Nu zou ik die 'Banned' (=boolean, 2 bytes) willen vervangen met 2 keer een
variabele van 1 byte

Dus:
        Banned as boolean
Zou dan worden:
        Flag1 as byte
        Flag2 as byte

Kan dit zonder problemen? Ik bedoel maar... mijn programma zou ook de oudere
versie van de database correct moeten kunnen lezen zonder problemen. Dat de
inhoud van flag1 en flag2 dan onjuist is is normaal maar de rest moet wel
blijven kloppen.

Volgens mij is hetgene ik wil doen zeker geen probleem, maar ik zou toch
even graag een bevestiging horen voordat ik verder ga....

Bedankt!!!!!!
Technical Details
Message-ID: <HIc29.40100$8o4.5183@afrodite.telenet-ops.be>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-05!sn-xit-01!sn-xit-04!supernews.com!diablo.theplanet.net!diablo.netcom.net.uk!netcom.net.uk!fr.clara.net!heighliner.fr.clara.net!proxad.net!skynet.be!skynet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: fcea4,bbc704fbf159d5c3,start
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2002-08-01 09:04:44 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-05!sn-xit-01!sn-xit-04!supernews.com!diablo.theplanet.net!diablo.netcom.net.uk!netcom.net.uk!fr.clara.net!heighliner.fr.clara.net!proxad.net!skynet.be!skynet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail
From: "Tim A." <tj@y_ucom.be>
Newsgroups: be.comp.programming
Subject: Boolean => 2 x Byte in VB
Lines: 47
Organization: .
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <HIc29.40100$8o4.5183@afrodite.telenet-ops.be>
Date: Thu, 01 Aug 2002 15:45:43 GMT
NNTP-Posting-Host: 213.119.133.200
X-Complaints-To: abuse@telenet.be
X-Trace: afrodite.telenet-ops.be 1028216743 213.119.133.200 (Thu, 01 Aug 2002 17:45:43 MET DST)
NNTP-Posting-Date: Thu, 01 Aug 2002 17:45:43 MET DST