Attività ActiveX di script VB per pacchetto DTS SQL 2000

StackOverflow https://stackoverflow.com/questions/1032515

  •  06-07-2019
  •  | 
  •  

Domanda

Sto cercando di caricare i dati da un file CSV esterno che deve essere massaggiato prima di essere inserito in una tabella SQL. Leggere il file va bene, ma quando provo a scorrere il flusso e caricare un array usando la funzione SPLIT ottengo una "Dichiarazione di fine prevista" " di errore. 

Do While Not txtFile.AtEndOfStream

    strText = txtFile.ReadLine

    Dim dataArray() As String = Split(strText, ",")    -- Here's where it breaks

    ...

    build sql statement to insert using the zero based array

    RS.Open strSQL, dbConn, adOpenKeyset

Loop

txtFile.Close

Ho esaminato BOL e MSDN, ma sto ancora ricevendo l'errore.

È stato utile?

Soluzione

VBScript non supporta le variabili digitate. VBScript non supporta l'assegnazione di un valore nell'istruzione Dim. Uso: - 

Dim dataArray()
dataArray = Split(strText, ",")

Tuttavia, detto questo, poiché si tratta di un'attività DTS, perché non si sta creando un'origine dati CSV di testo nel transfrom piuttosto che creare manualmente il codice VBScript per consumare il CSV.

Altri suggerimenti

Dalla memoria SQL 2k DTS utilizza script vb, quindi nessun tipo. 

Dim dataArray = split(strText,",")
Autorizzato sotto: CC-BY-SA insieme a attribuzione
Non affiliato a StackOverflow
scroll top