how to copy from the string to the structure ?? it can be using win API
and different how to copy from sctructure to string
Every time i am using operations on files to be able to fill correctly the structures
How works function "Get"? It attributes nice to the structure
Buf=010000000800000004004E6F6E6501000000
How to copy a data from the variable "Buf" to Header and data each after another?? without operating on files and without get method.
Thanks for helping, Greetings

Private Type Header
Typ As Long
Length As Long
End Type
Private Type Dane
Nick As String
IP As Long
End Type

Private Sub Form_Load()
Dim H As Header
Dim D As Dane
Dim Buf As String
D.Nick = "None"
D.IP = 1
H.Typ = 1
H.Length = Len(D)
Open "C:\FullTxt.txt" For Binary As 1
Put #1, 1, H
Put #1, , D
Buf = Space$(LOF(1))
Get #1, 1, Buf
Close 1
End Sub