Novità

NUOVO AMBIENTE SCRIPT AREA TECNICA

  • Creatore Discussione Creatore Discussione LuigiB
  • Data di inizio Data di inizio
Questo “normalmente” (in tB) significa che hai lanciato per la seconda volta lo stesso programma, mentre il primo é ancora in esecuzione. Guarda, minimizzando tB, se vedi un’altra istanza delle stesso programma che hai lanciato. In questo caso chiudilo. Oppure usa task manager, se é visibile solo lí, per fare lo stesso, ovvero chiuderlo. Poi lancia il programma per il quale hai ricevuto il messaggio di errore
 
Ciao a tutti io per adesso ho solo reinstallato office e scaricato la versione di TB 237. Ai prox aggiornamenti e good saturday 👋 :D

ps: piccolo aggiornamento... rifatto test su nuova versione 237 a me con l'opzione win32 continua a dirmi "Interfaccia non registrata" mentre se rifaccio il test con l'opzione win64 funziona... tutto... e per adesso non vedo nemmeno la pubblicità di 5 secondi... Forse è solo il mio s.o. WIN 11 PRO che non funzia con la win32...
 
Ultima modifica:
Luigi scusa per capire meglio :

Questa è il tuo percorso da modificare

E:\PROGETTI_DOTNET\VSGIOCHILIB\DLLGIochi\TestDLLGIochi\bin\Release

Per capire meglio

PROGETTI_DOTNET è una cartella : cosa contiene ?

VSGIOCHILIB è una cartella : cosa contiene ?

DLLGIochi è una cartella : cosa contiene ?

TestDLLGIochi è una cartella : cosa contiene ?
 
niente fatto come prima ma con un errore diverso :ROFLMAO:
Vedi l'allegato 2252180


Legend e Gennios ripartite dalla registrazione della dll e fai scrivere un log al file bat devi modificare cosi la riga dentro al file bat , salvarlo e poi lanciarlo da amministratore

naturalmente devi sostituire con i percorsi sdul tuo pc questi sono i miei e lo dico anche a Genios

ad esempio se uno ha messo il file VSDLLGiochi.dll nella cartella "c:\paperino\"

deve scrivere c:\paperino\ al posto del mio percorso che inizia con E:\ e diventa

c:\paperino\VSDLLGiochi.dll

va sostituito anche il percorso del log per vedere se la registrazione ha funzionato

e:\temp\log.txt


lanciare il file bat come amministratore epoi andare a leggere il log



Codice:
C:\Windows\Microsoft.NET\Framework64\v4.0.30319\RegAsm.exe "E:\PROGETTI_DOTNET\VSGIOCHILIB\DLLGIochi\TestDLLGIochi\bin\Release\VSDLLGiochi.dll" /tlb:VSDLLGiochi.tlb /codebase >> e:\temp\log.txt
 
indovinatoconqualeopzionetra32e64mifunzia.jpg


con la win32 nada 😶

con la win64 qualcosina... ma dopo un primo entusiasmo perchè non dava errori mi sono accorto che non fa un gran chè... mi da solo quel messaggio nell'immagine e stop... non fa altro... :rolleyes:
 
Ultima modifica:
ho aggiunto altre funzioni e fatto una revisione di quelle che avevo gia scritto.

è necessario aggiornare sia la dll che il progetto Twinbasic.

la dll basta sostituirla prendendola dal file che scaricate e copiandola al posto di quella precedente

stessa cosa per il progetto Twinbasic , va sostituito con quello nuovo presente nel file zip.




per chi vuole vedere le funzioni attualmente presenti metto qui il link dell'help



p.s.

questa volta il progetto twinbasic l'ho salvato levando la referenza alla dll , quindi la prima cosa da fare appena aperto è andarla ad impostare

1674926019522.png


N.B: Nel file rar non ho piu messo l'eseguibile compilato cosi non c'è problema di nessun virus vero o finto che sia.
 
Vedi l'allegato 2252183


con la win32 nada 😶

con la win64 qualcosina... ma dopo un primo entusiasmo perchè non dava errori mi sono accorto che non fa un gran chè... mi da solo quel messaggio nell'immagine e stop... non fa altro... :rolleyes:


non hai messo l'archivio giusto .. cancellalo e ricrealo con questo script di spaziometria

ora che sei stato promosso a chef non puoi fare piu i soliti casini se non vuoi ritornare alla velocità della luce al ruolo di aiuto-aiuto-aiuto-pasticcere


Codice:
Option Explicit
Sub Main
   Dim nEstrInizio,nEstrFine
   Dim DataIni,DataFin
   Dim sFile
   Dim sChrSep
   Dim sDirDest
   
   'sDirDest = "C:\dovemipare\"
   sDirDest = GetDirectoryAppData
   
   
   sChrSep = ";"
   sFile = AddSlash(sDirDest) & "EstrazioniLotto.csv"
   If EliminaFile(sFile) Then
      nEstrInizio = 1
      nEstrFine = EstrazioniArchivio
      Call EsportaEstr(nEstrInizio,nEstrFine,sFile,sChrSep)
   End If
End Sub
Sub EsportaEstr(nEstrInizio,nEstrFine,sFile,sChrSep)
   Dim k,f,idEstr
   Dim sRecord
   Dim nProgr
   Dim sDataCorr
   Dim r,e
  
  
   For k = nEstrInizio To nEstrFine
      Call Messaggio("Estrazione : " & k)
      idEstr = k
      ReDim aNum(0)
      If GetEstrazioneCompleta(idEstr,aNum) Then
         nProgr = nProgr + 1
         sDataCorr = Replace(DataEstrazione(idEstr),".","/") & " 00:00:00"
         sRecord = ""
         sRecord = sDataCorr & ";" & FormattaStringa(IndiceAnnuale(idEstr),"0000000") & ";" & FormattaStringa(IndiceMensile(idEstr),"0000000") & ";0000000;"
       '  sRecord = FormatSpace(nProgr,9,True) & sChrSep
       '  sRecord = sRecord & IndiceAnnuale(idEstr) & sChrSep
       '  sRecord = sRecord & sDataCorr & sChrSep
         
         For r = 1 To 11
            For e = 1 To 5
               sRecord = sRecord & Format2(aNum(r,e)) & sChrSep
            Next
         Next
         sRecord = RimuoviLastChr(sRecord,sChrSep)
         Call ScriviFile(sFile,sRecord,False,True)
      Else
         Exit For
      End If
      If ScriptInterrotto Then Exit For
      Call AvanzamentoElab(nEstrInizio,nEstrFine,k)
   Next
   Call CloseFileHandle(sFile)
  ' Call LanciaFile(sFile)
  Scrivi "Esportato file " & sFile
  MsgBox "Fine",vbInformation
End Sub

Function AddSlash(s)
   If Right(s,1) <> "\" Then
      AddSlash = s & "\"
   Else
      AddSlash = s
   End If
End Function
 
non hai messo l'archivio giusto .. cancellalo e ricrealo con questo script di spaziometria

ora che sei stato promosso a chef non puoi fare piu i soliti casini se non vuoi ritornare alla velocità della luce al ruolo di aiuto-aiuto-aiuto-pasticcere

" come è umano lei... " 🤣

Ad ogni modo...

l'archivio usato è l'ultimo che ha condiviso lei Shifu Master 😆
 
cavolo sti antivirus sono contro di me a quanto pare .. comunque è falso allarme di sicuro , esorto chi non si fida ad usare per le prove una macchina virtuale..

usa l'archivio ricrealo con lo script ..

e stai attento che alal pasticceria ti mando i nas ..:)
 
cavolo sti antivirus sono contro di me a quanto pare .. comunque è falso allarme di sicuro , esorto chi non si fida ad usare per le prove una macchina virtuale..

usa l'archivio ricrealo con lo script ..

e stai attento che alal pasticceria ti mando i nas ..:)

lo tolgo dalla quarantena e ricreo l'archivio a modo con lo script che ha creato lei a tale scopo presumo... 😜 Windows defender in effetti lo faceva passare.. E' norton che è piuttosto intransigente... nei tuoi confronti... ;)
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 23 novembre 2024
    Bari
    33
    80
    86
    52
    25
    Cagliari
    67
    57
    59
    05
    80
    Firenze
    31
    32
    58
    88
    77
    Genova
    40
    39
    23
    36
    81
    Milano
    28
    58
    45
    25
    38
    Napoli
    20
    82
    23
    44
    57
    Palermo
    76
    56
    88
    62
    31
    Roma
    12
    81
    59
    74
    72
    Torino
    46
    53
    72
    45
    23
    Venezia
    04
    12
    42
    64
    20
    Nazionale
    63
    44
    78
    10
    55
    Estrazione Simbolotto
    Torino
    43
    42
    12
    39
    22

Ultimi Messaggi

Indietro
Alto