Non credo che sia lo script, perchè ha sempre fuonzionato bene inoltre lo fa anche con altri script per il 10 e lotto serale, ma comunque eccolo:
Option Explicit
Sub Main
Call ImpostaArchivio10ELotto(1)
Dim casi,nn(20),x(20)',nn(16),nn(40)
casi = 00
Dim Ini,fin,es,a,b,n1,n2,n3,n4,i
Ini =...