Zur Hauptseite ... Zum Onlinearchiv ... Zum Abonnement ... Zum Newsletter ... Zu den Tools ... Zum Impressum ... Zum Login ...

Put

Die Anweisung schreibt Daten in eine Datei.

Syntax:

Put(<FileNumber>, <RecNumber>, <VarName>)

Parameter:

FileNumber: Erwartet die beim ffnen der Datei verwendete Dateinummer.
RecNumber: Bei Dateien, die im Random-Modus geffnet wurden, kann ber diesen Parameter der Datensatz bestimmt werden, der mit dem Inhalt der Variablen VarName berschrieben werden soll. Wurde die Datei im Binary-Modus geffnet, bestimmt der Parameter die Position des zu schreibenden Bytes. Wenn Sie diesen Parameter auslassen, berschreibt die Anweisung das Byte beziehungsweise den Datensatz, der dem aktuellen Byte beziehungsweise Datensatz folgt. Die aktuelle Position wird hierbei ber den letzten Zugriff durch die Get- und Put-Anweisung oder die Funktion Seek ermittelt. Datenstze und Bytes werden sequentiell von 1 bis 2.147.483.647 durchnummeriert.
VarName: Erwartet den Namen der Variablen oder des Arrays, deren Inhalt in die Datei geschrieben werden soll. Es drfen keine Objektvariablen angegeben werden.

Beispiele:

Diese Funktion schreibt die Zahlen von 1 bis 100 in eine im Random-Modus geffnete Datei. Die Routine zum Auslesen der geschriebenen Werte finden Sie als Beispiel der Get-Anweisung.

Public Sub PutBeispiel()

    Dim strDateiname As String

    Dim i As Integer

    strDateiname = "c:\Put.txt"

    Open strDateiname For Random As #1

    Len = 2

    For i = 1 To 100

        Put #1, i, i

    Next i

    Close #1

End Sub

© 2003-2015 André Minhorst Alle Rechte vorbehalten.