g.silent |
|
| CITAZIONE Questo esclude che gli archivi abbiano tutti la stessa ampiezza, cioč lo stesso numero
di estrazioni. Porto su avendo fatto una modifica allo script PDR MASTER di Joe HTML If mem(1)=1 Or mem(2)=1 Or mem(3)=1 Or mem(4)=1 Or mem(5)=1 Then c(r)=c(r)+1
If c(r)>0 Then
For P= 1 To 5 :
fileout.write Format2 (Mem(P))&"."
Next
Else
fileout.write "00.00.00.00.00."
End If Saluti |
| | |
