Newsgroup: it.comp.lang.visual-basic
Titolo: Aggiungere numeri di linea mantenendo quelli esistenti

Avrei la necessit� di aggiungere i numeri di linea a tutto il codice di un 
vecchio progetto VB.
Se utilizzo MZTools, mi perdo i numeri di linea preesistenti e il codice non 
funziona pi� correttamente, perch� GoTo e GoSub non ritrovano pi� le proprie 
etichette. Qualcuno sa se esiste qualche addin che mi consenta di aggiungere 
i numeri di linea preservando quelli gi� inseriti?
Ciao!
    Alex

 ha
scritto:

Non credo che esista un tool del genere, sarebbe anacronistico.
I numeri di linea non servono pi� dal QuickBasic in poi.
Se devi modificare un programma VB puoi lasciare i vecchi numeri di linea e fare
in modo che diventino delle label, inserire le nuove linee senza numero e usare
le label come si fa in un Basic moderno.
--
ciao
  Stefano

     Alex
Ipotizzando che il tuo vecchio programma sia in BasicA o in GWBasic,
se la memoria non m'inganna esisteva il comando REN (abbreviazione di
RENumber), che si occupava di rinumerare il codice tenendo conto anche
dei GOTO-GOSUB. Accettava due parametri, il primo che indicava da che
numero di linea iniziare, ed il secondo che indicava lo step.
Bye by SixaM 8-]
P.S. Ridendo e scherzando, ancora nel 1999/2000 tutta la gestione
della fatturazione di una nota azienda italiana di formaggi, latticini
e simili era realizzata con exe scritti in GW-Basic che si chiamavano
l'un l'altro...e spendevano una cifra in manutenzione 8-)

 le label come si fa in un Basic moderno.
Il problema � che non volevo spulciarmi 36000 linee di codice...
Comunque grazissime!
    Alex

numero di linea iniziare, ed il secondo che indicava lo step.
Evidentemente, mi sono spiegato male. Il programma in questione � nato una 
ventina d'anni fa come programma Basic. Successivamente, per esigenze sulle 
quali sorvolo, � stato trasformato in un progetto VB4/VB6, ma il cuore del 
codice � sostanzialmente rimasto quello di vent'anni fa.
Ora, il programma funziona correttamente presso una quantit� di clienti. 
Presso un solo cliente, se il programma � eseguito in rete, dopo un corposo 
ciclo di elaborazione, si verificano errori dei quali non si riesce a 
identificare la causa.
Per non lasciare nulla di intentato, mi sarebbe piaciuto aggiungere i numeri 
di linea a tutto il progetto per identificare quantomeno l'ultima istruzione 
eseguita prima dell'errore.
Comunque grazissime!
    Alex

 Comunque grazissime!
Secondo me ci arrivi meglio a passi.
Loggo l'accesso alle varie routine, e poi rimetti i numeri a quelle 2/3 che
possono avere il problema.
Io valuterei di sostiuire i Goto Numero con Goto Testo, non so quanti ne
hai, ma con un Find secondo me ci metti meno di quello che pensi.
Io fra tutti i sw ho i numeri di linea su 4/5 routine che davano problemi
inspiegabili all'inizio. Ma poi non ce ne sono altri.
In molte routine integro l'autocomposizione di mztools cio�:
Private Sub Command1_Click()
On Error GoTo Command1_Click_Error
    'codice
    On Error GoTo 0
    Exit Sub
Command1_Click_Error:
    MsgBox "Error " & Err.Number & " (" & Err.Description & ") in procedura
Command1_Click di Form Form1"
End Sub
Cos� si individua subito la routine che da problemi.

Il problema � che non volevo spulciarmi 36000 linee di codice...
Se fai una gestione degli errori con qualche trucco � possibile evitarlo.
--
ciao
  Stefano

 Se fai una gestione degli errori con qualche trucco � possibile evitarlo.
S�, comunque non � banale mettere mano a quello che � uno dei programmi pi� 
vecchi che abbiamo: una delle routine principali, da sola, consiste in quasi 
2900 linee di codice.
    Alex