Hoe Open dBASE-tabel met de standaard bestandsextensie

Vertaalde artikelen Vertaalde artikelen
Artikel ID: 101742 - Bekijk de producten waarop dit artikel van toepassing is.
Alles uitklappen | Alles samenvouwen

Op deze pagina

Samenvatting

Om een bestand van dBASE tabel een standaardbestandsextensie heeft opent, opgeven de naam van de tabel als <filename>#<extension>. </extension></filename>

Meer informatie

De standaardbestandsextensie die wordt gebruikt door dBASE voor tabellen is.DBF. In Visual Basic versie 3.0 installeerbare dBASE met ISAMs, kunt u een tabel openen door de bestandsnaam zonder deze extensie geven omdat de dBASE installeerbare ISAM-bestand de extensie worden aangenomen.DBF standaard. Als u Geef de extensie <filename>.<extension>, dBASE installeerbare ISAM wordt niet herkend en geeft u het volgende foutbericht weergegeven: </extension></filename>
<filename>.<extension>is geen geldige naam. </extension></filename>
Om een bestand van dBASE tabel een standaardbestandsextensie heeft opent, opgeven de naam van de tabel als <filename>#<extension>. DBASE installeerbare ISAM het hekje (#) in de naam van de tabel op een periode interpreteert en opent de dBASE-tabel. </extension></filename>

Voorbeeld

In het volgende voorbeeld wordt gedemonstreerd hoe een dBASE-tabel openen die het bestand heeft de standaardbestandsextensie (auteurs.OUD) en het eerste veld afdrukken alle records in de tabel aan het formulier. In het volgende voorbeeld wordt ervan uitgegaan dat u hebt een dBASE III-tabel met de naam van de auteurs.OUDE bevindt zich in de De map C:\DBASEIII\OLDBOOKS. Mogelijk moet u het voorbeeld wijzigen en Maak een dBASE III-database met een tabel met de naam van de auteurs.Om deze oude correct werken.

  1. Start Visual Basic of kies Nieuw Project (ALT, F, N) in het menu bestand Als u Visual Basic wordt al uitgevoerd. Form1 wordt standaard gemaakt.
  2. Voeg een knop (Command1) toe aan Form1.
  3. De volgende code toevoegen aan de gebeurtenis Click van Opdracht1:
       Sub Command1_Click()
          Dim db As Database
          Dim OldAuthors As Table
    
          Connect$ = "dBASE III"          ' Specify database type
          dbName$ = "C:\DBASEIII\OLDBOOKS"      ' Specify database directory
    
          Set db = OpenDatabase(dbName$, False, False, Connect$)
          Set OldAuthors = db.OpenTable("Authors#Old") ' Open table
          While Not OldAuthors.EOF
             Print OldAuthors(0)           ' Print field(0) to the form
             OldAuthors.MoveNext           ' for all records.
          Wend
    
          OldAuthors.Close
          db.Close
       End Sub
    						
  4. Het voorbeeld uitvoeren.
  5. Klik op de knop Opdracht1.

Eigenschappen

Artikel ID: 101742 - Laatste beoordeling: donderdag 5 juli 2012 - Wijziging: 4.0
De informatie in dit artikel is van toepassing op:
  • Microsoft Visual Basic 3.0 Professional Edition
Trefwoorden: 
kbmt KB101742 KbMtnl
Automatisch vertaald artikel
BELANGRIJK: Dit artikel is vertaald door de vertaalmachine software van Microsoft in plaats van door een professionele vertaler. Microsoft biedt u professioneel vertaalde artikelen en artikelen vertaald door de vertaalmachine, zodat u toegang heeft tot al onze knowledge base artikelen in uw eigen taal. Artikelen vertaald door de vertaalmachine zijn niet altijd perfect vertaald. Deze artikelen kunnen fouten bevatten in de vocabulaire, zinsopbouw en grammatica en kunnen lijken op hoe een anderstalige de taal spreekt en schrijft. Microsoft is niet verantwoordelijk voor onnauwkeurigheden, fouten en schade ontstaan door een incorrecte vertaling van de content of het gebruik ervan door onze klanten. Microsoft past continue de kwaliteit van de vertaalmachine software aan door deze te updaten.
De Engelstalige versie van dit artikel is de volgende: 101742
Vrijwaring inhoud KB-artikelen over niet langer ondersteunde producten
Dit artikel heeft betrekking op producten waarvoor Microsoft geen ondersteuning meer biedt. Daarom wordt dit artikel alleen in de huidige vorm aangeboden en wordt het niet meer bijgewerkt.

Geef ons feedback

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com