dim passwort as string
passwort="ich bin das passwort"
passwort = passwort + "\n"
winsock1.senddata passwort