El 24/09/13 23:57, José María Terry Jiménez escribió:
> El 24/09/13 20:13, Christian Schmitz escribió:
>> I'm not aware of any problems. So if you have a problem, please email.
>>
>>
> Hello again
>
> I got the RecordSet thing working, tomorrow i'll go with the timer.
>
Hello
I have it nearly finished but have a problem:
If the timer is in mode 2, then it seems is triggered before the fill of
20 lines in listbox finishes and then appears that black window with
this error: (many lines):
Could not execute returned javascript: 'null' is not an object
Source: Xojo.controls['BJxZ3pvI'].insertRow(2680,["t062006"]);
Xojo.controls['BJxZ3pvI'].setCellContents(2680,1,"2013-05-15 18:30:00");
Xojo.controls['BJxZ3pvI'].setCellContents(2680,2,"36");
Xojo.controls['BJxZ3pvI'].setCellContents(2680,3,"m3");
Xojo.controls['BJxZ3pvI'].insertRow(2681,["t062006"]);
So i guessed that and changed the period to 200 and fill 10 lines every
action, and it works more or less (after a while in large RS, the same
error appears).
Then tried to change to mode 1, i put mode=1 when the recordset is ready
(and tested is not Nil) and changed again to mode 1 when the fill (20
items) ends. But the action code is only executed one time.
Here is what i have in the Timer's action (For mode 1):
Dim counter as Integer = 0
While counter < 20 and not RS.EOF
ListBox1.AddRow(RS.Field("punto_medida_id").StringValue)
Listbox1.Cell(ListBox1.LastIndex,1)=RS.Field("hora").DateValue.SQLDateTime
Listbox1.Cell(ListBox1.LastIndex,2)=RS.Field("valor").StringValue
Listbox1.Cell(ListBox1.LastIndex,3)=RS.Field("codigo_unidad_id").StringValue
RS.MoveNext
counter=counter+1
wend
Timer1.mode=1
'Run the timer again...
Can you help me to solve? Thanks!
Best
_______________________________________________
Mbsplugins_monkeybreadsoftware.info mailing list
[email protected]
https://ml01.ispgateway.de/mailman/listinfo/mbsplugins_monkeybreadsoftware.info
