PureBoard

Verfasst: **06.10.2008 20:27**

Diese Meldung erhalte ich postwendend in Zeile 6 für folgenden Code bei 4.30ß3.

Dim nono.s(30)
Define jj.s
Define maxj = 0
Restore strdata
For i = 0 To 29
    Read jj
    If jj <> "<>"
       nono(i) = jj
       maxj + 1
    Else 
       Break
    EndIf 
Next
DataSection 
strdata:
Data.s "PROMOTION","CLIX","FREE","TRAFFIC","BUSINESS"
Data.s "TRACK","FARM","AD","CLICK","EBAY","CIAO","<>"
EndDataSection

Unter 4.20p kein Problem.

Kann das mal bitte jemand bei seinem 4.30ß3 prüfen und bestätigen (ODER widerlegen)? Boardsuche hier und im engl. Forum hat nix rechtes dazu gefunden.

Gruß
CJ

Verfasst: **06.10.2008 20:32**

Guck mal bei den Ankündungen zu Beta1. Read hat jetzt auch einen Typen (so weit ich das im Kopf habe)...

Verfasst: **06.10.2008 20:39**

marco2006 hat geschrieben:Guck mal bei den Ankündungen zu Beta1. Read hat jetzt auch einen Typen (so weit ich das im Kopf habe)...

Ach Mist aber auch, stimmt.
Hatte die ganze Zeit im Hinterkopf: Da war doch was ?
Aber da bei der Boardsuche nix kam, ...

Hab nach E-W-I-G-keiten mal wieder READ benutzt....

Danke jedenfalls, Marco.

PureBoard

[irrelevant]"'read' can't convert automatically a numbe

[irrelevant]"'read' can't convert automatically a numbe