Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Winsocks Chat Script + Loop Problem

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
NoNoob



Anmeldungsdatum: 17.07.2005
Beiträge: 14
Wohnort: Lüdenscheid

BeitragVerfasst am: 21.02.2006, 17:02    Titel: Winsocks Chat Script + Loop Problem Antworten mit Zitat

Morgn,
hab mal das WinSocks Chat Script umgeschrieben nur leider klappt es nicht

Code:
Do
      Input s_text
      senddata( s, s_text)                                  'Text zum Server senden
      s_text=""
      print
      s_text=s_text
      Print s_text;
Loop

Er sacht immer Excepted: LOOP, obwohl Loop vorhanden ist. Der Sinn meines umgeschriebenes ist das man einen Schreibbalken hat.

PLEASE HELP !!


Orginalcode:
Code:
   taste=Inkey$
   If taste=CHR$(13) then
      senddata( s, s_text)                                  'Text zum Server senden
      s_text=""
      print
   Else
      s_text=s_text+taste
      Print taste;
   End If
   Sleep 1
Loop Until taste=Chr$(27) or taste=Chr$(255,107)
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Michael712
aka anfänger, programmierer


Anmeldungsdatum: 26.03.2005
Beiträge: 1593

BeitragVerfasst am: 21.02.2006, 17:21    Titel: Antworten mit Zitat

Hallo.

So wie der Code dort steht klappt er. Wenn du darin jedoch IF oder sonstige sachen verwendest, dann könnte sein, dass END IF oder anderes fehlt. Lade den ganzen Code doch einmal bei http://nopaste.freebasic.de hoch.

Michael
_________________
Code:
#include "signatur.bi"
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz