Autore	Messaggio
Fabio 28/08/2023 08:57 Campo libero:	Fabio Mi dispiace ma non possiamo fornire un supporto personalizzato di questo tipo sul forum. Da una prima rapida occhiata è probabile che una riga del file non abbia tutti i campi che vi aspettate (e quindi l'operazione di Split restiuitsce un array columns con meno colonne del previsto) e questo potrebbe riguardare l'intero file, o potrebbe anche riguardare una linea vuota (ad esempio l'ultima riga del file) Se non riuscite a risolvere in autonomia il suggerimento è di fissare un appuntamento in teleassistenza per farvi aiutare nello sviluppo di uno script personalizzato da parte di un nostro tecnico (che in ogni caso non correggerebbe il vostro script, ma ne svilupperebbe uno nuovo)

Autore

Messaggio

Denny 27/08/2023 19:05

Denny

Script

Ciao Fabio,
ho creato lo script che comunico di seguito, che ha come fine quello di unire i valori della colonna G e della colonna H all'interno della colonna I separandoli dal simbolo " \ ", tenuto conto che non tutte le celle di tali colonne contengono valori:

Const ForReading = 1
Const ForWriting = 2

' Percorsi dei file
inputFilePath = "C:\Ready\Cataloghi\Azienda1\Azienda1.csv"
outputFilePath = "C:\Ready\Cataloghi\Azienda\Azienda-elaborato.csv"

' Creazione dell'oggetto FileSystemObject
Set fso = CreateObject("Scripting.FileSystemObject")
Set inputFile = fso.OpenTextFile(inputFilePath, ForReading)
Set outputFile = fso.CreateTextFile(outputFilePath, True)

' Leggi la prima riga (intestazioni) e scrivila nel file di output
outputFile.WriteLine(inputFile.ReadLine)

' Loop attraverso le righe rimanenti nel file di input
Do Until inputFile.AtEndOfStream
    line = inputFile.ReadLine
    columns = Split(line, ",")

    ' Ottieni i valori delle colonne G e H
    valueG = columns(6) ' Indice 6 per la colonna G (0-based)
    valueH = columns(7) ' Indice 7 per la colonna H (0-based)

    ' Concatena i valori e scrivi la riga modificata nel file di output
    newValue = valueG & " \ " & valueH
    columns( = newValue ' Indice 8 per la colonna I (0-based)

    ' Scrivi la riga modificata nel file di output
    outputFile.WriteLine Join(columns, ",")
Loop

' Chiudi i file
inputFile.Close
outputFile.Close

-----

purtroppo esce sempre tale errore:

Errore nell'esecuzione dello script

Riga : 23   Colonna : 4
Source : Errore di run-time di Microsoft VBScript
Dettaglio errore : Indice non incluso nell'intervallo: '[number: 6]'

------

potresti darmi una mano e correggere l'errore che non riesco a trovare.

Grazie.

Fabio 28/08/2023 08:57 Campo libero:

Fabio

Mi dispiace ma non possiamo fornire un supporto personalizzato di questo tipo sul forum.
Da una prima rapida occhiata è probabile che una riga del file non abbia tutti i campi che vi aspettate (e quindi l'operazione di Split restiuitsce un array columns con meno colonne del previsto) e questo potrebbe riguardare l'intero file, o potrebbe anche riguardare una linea vuota (ad esempio l'ultima riga del file)

Se non riuscite a risolvere in autonomia il suggerimento è di fissare un appuntamento in teleassistenza per farvi aiutare nello sviluppo di uno script personalizzato da parte di un nostro tecnico (che in ogni caso non correggerebbe il vostro script, ma ne svilupperebbe uno nuovo)