Hallo,

Du hast geschrieben, dass Du Winsock über "Projekt>>Komponenten eingefügt hast.
Das läst vermuten, dass Du nicht mit Access sondern mit VB 6 arbeitest.

Dann musst Du bei

Eingang() = Split(Eingangstext, Chr$(9))

das Klammerpaar hinter Eingang weglassen, also

Eingang = Split(Eingangstext, Chr$(9))

Bei

Dim Eingang() As String

muss es aber stehen bleiben!

Gruss Ralf