Novità

NUOVO AMBIENTE SCRIPT AREA TECNICA

  • Creatore Discussione Creatore Discussione LuigiB
  • Data di inizio Data di inizio
ciao non so se ho fatto tutto giusto ,
ma l'ultimo codice di luigi ,
che ho modificato cosi
Codice:
Module MyScript
   Sub test()
  
     Dim c As New VSDLLGiochi.clsScript
  
    If c.Init("C:\Users\Admin\Desktop\FrameworkScriptGiochi\DDLLScript\Archivio\EstrazioniLotto.csv", 5, 11, 90, 5, 0) Then
        MsgBox c.DataEstrazione(c.EstrazioniArchivio)
      
        MsgBox c.Ritardo(1, c.EstrazioniArchivio, 1, 1)
      
        Dim ret As STRUCT_FRZ_STATISTICA_TUTTI_GLI_ESITI
      
        Call c.Statistica(1, 7000, c.EstrazioniArchivio, ret, 1)
          
        MsgBox ret.RetValori(1).Ritardo
          
          
          
 
      
      
    End If
  
    Set c = Nothing
  
End Sub
  
 
End Module
dice error linea 3

ciao Giomi , in questo caso i ltest va fatto partendo da un nuovo progeto twinbasic


apri twin basic

metti la referenza


metti su un for il pusante


incolli il codice , salvi tutto , riapri e lanci .. l'unica cosa da modificare è il percorso dell'archivio

Codice:
Private Sub Command1_Click()
        test
    End Sub
    Sub test()
            Dim c As New VSDLLGiochi.clsScript
            If c.Init("E:\PROGETTI_TWINBASIC\FrameworkScriptGiochi\Archivi\Lotto\estrazionilotto.csv", 5, 11, 90, 5, 0) Then
            MsgBox c.DataEstrazione(c.EstrazioniArchivio)
            MsgBox c.Ritardo(1, c.EstrazioniArchivio, 1, 1)
            Dim ret As STRUCT_FRZ_STATISTICA_TUTTI_GLI_ESITI
            Call c.Statistica(1, 7000, c.EstrazioniArchivio, ret, 1)
            MsgBox ret.RetValori(1).Ritardo





            End If
            Set c = Nothing
    End Sub
 
Ok domani allora si riprova con il progetto del file rar ma caricando tutto come questo di prova a 64 bit ho capito bene? Anche la versione a 64 bit è gratis ma c'è uno spot di 5 secondi quando si esegue il run giusto? O è meglio che ci scarichiamo tutti la versione 237 di tweenbasic e facciamo tutto a 32 bit senza spot? Ad ogni modo.. grazie a entrambi, buona notte e a domani (y)👌👋 :)
 
io lo lanci a 32 bit senza problemi...

secondo me devi eseguire questi passi.

1 prendere il progeto che hai nel file zip

2 aprire levare la referenza alla dll salvare e chiudere

3 aprire mettere referenza alla dll selezionandola dalal lista , salvare e chiudere

4 riaprire e riprvare a 32 bit ,io lo lancio e l'ho compilato a 32 bit ..

ti funziona a 64 perhce la dll è compilata con l'opzione any cpu ... quindi tutto sommato lo puoi compilare come vuoi
 
Ok domani allora si riprova con il progetto del file rar ma caricando tutto come questo di prova a 64 bit ho capito bene? La versioen a 64 bit è gratis ma c'è uno spot di 5 secondi quando si esegue il run giusto? O è meglio che ci scarichiamo tutti la versione 237 di tweenbasic e facciamo tutto a 32 bit senza spot? Ad ogni modo.. grazie a entrambi, buona notte e a domani (y)👌👋 :)
Si, prima verifica che tutto continui a funzionare come win64 e poi dopo, salvi tutto su qualche altra cartella, e se vuoi provare cosa succede con win32 lo puoi fare
 
Ok domani allora si riprova con il progetto del file rar ma caricando tutto come questo di prova a 64 bit ho capito bene? Anche la versione a 64 bit è gratis ma c'è uno spot di 5 secondi quando si esegue il run giusto? O è meglio che ci scarichiamo tutti la versione 237 di tweenbasic e facciamo tutto a 32 bit senza spot? Ad ogni modo.. grazie a entrambi, buona notte e a domani (y)👌👋 :)
Perfetto, hai colto ogni dettaglio. Grazie a te per aver chiarito una cosa che finora era un rebus!
Buona notte a te

p.s. si, scaricare la beta 237 e' cosa buona e giusta
 
ciao Giomi , in questo caso i ltest va fatto partendo da un nuovo progeto twinbasic


apri twin basic

metti la referenza


metti su un for il pusante


incolli il codice , salvi tutto , riapri e lanci .. l'unica cosa da modificare è il percorso dell'archivio

Codice:
Private Sub Command1_Click()
        test
    End Sub
    Sub test()
            Dim c As New VSDLLGiochi.clsScript
            If c.Init("E:\PROGETTI_TWINBASIC\FrameworkScriptGiochi\Archivi\Lotto\estrazionilotto.csv", 5, 11, 90, 5, 0) Then
            MsgBox c.DataEstrazione(c.EstrazioniArchivio)
            MsgBox c.Ritardo(1, c.EstrazioniArchivio, 1, 1)
            Dim ret As STRUCT_FRZ_STATISTICA_TUTTI_GLI_ESITI
            Call c.Statistica(1, 7000, c.EstrazioniArchivio, ret, 1)
            MsgBox ret.RetValori(1).Ritardo





            End If
            Set c = Nothing
    End Sub

Buongiorno a Tutti,

In Questi giorni non sono intervenuto in quanto si era in una fase che non era comunque alla mia portata riuscendo comunque a capire le varie soluzioni proposte ma non essere in grado di applicarle appieno... poi vi era la fase di preparazione e quindi ho letto quanto fin ora fatto.
ho fatto qualche test incappando in errori così ho rifatto tutto perchè con reg64 ho comunque errori e quindi ripreso aggiornato all 237 è quindi passato a reg32 comunque...
tutto sembra ok le dll ci sono tutte e tre non vedo errori che vedevo prima e quindi penso che sia tutto ok.

non volendo restare indietro nel seguire e se mi sarà possibile intervenire anche con soluzioni pratiche vorrei fare il test se mi aiutate a capire come farlo perchè non comprendo come fare, cazziatemi pure ma se non vado oltre questo scoglio, resterò indietro spero che non accada.


anche se ti arrabbi Luigi o altri lo comprendo perchè anche io ero convinto di aver compreso ma a quanto pare...

apri twin basic ok

metti la referenza ???? purtroppo vado in tilt 🙏🙏


metti su un for il pusante ???? 🙏🙏

copiare e modificare stringa non è un problema 👌

Grazie 🙏
 
Ciao, scusate ieri sono crollato, stamattina ho letto tutto. La prima cosa che farò sarà disinstallare twinbasic e reinstallare l ultima versione.
Poi cercherò di rifare tutto d accapo o aspetto una versione rivisitata.?
Cmq leggendo tutti i post vorrei dirvi che nella sezione off topic c'è un 3D intitolato " Dai ridiamoci su" di cui sono un affezionato lettore , e a volte "partecipatore🤣" credo che anche voi avreste molto da dare 🤣🤣🤣🤣🤣
Anche Tom ogni tanto ci passa 🤣🤣🤣
 
buongiorno altri 3 minuti di video per spiegare i passaggi del test ..

 
buongiorno altri 3 minuti di video per spiegare i passaggi del test ..

Buongiorno e buon sabato!
Ottimo video, laconico, conciso, chiaro, lineare e credo anche molto efficace!
Le istruzioni illustrate nel video, sono valide anche per la beta 236 per i progetti win32. Ovviamente 'a fortiori' lavora bene per la beta 237 (ultima disponibile al momento)
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 21 gennaio 2025
    Bari
    78
    09
    70
    03
    23
    Cagliari
    32
    88
    30
    13
    45
    Firenze
    87
    23
    15
    39
    86
    Genova
    71
    48
    67
    59
    23
    Milano
    58
    50
    80
    85
    29
    Napoli
    90
    81
    79
    82
    62
    Palermo
    70
    33
    90
    05
    10
    Roma
    15
    71
    55
    85
    76
    Torino
    89
    09
    18
    33
    69
    Venezia
    44
    80
    82
    73
    58
    Nazionale
    80
    25
    13
    63
    17
    Estrazione Simbolotto
    Bari
    39
    36
    34
    14
    31

Ultimi Messaggi

Indietro
Alto