VBscripts generates SQL update stmt from txt

Greeting,

I need to generate a update stmt from a txt file which contains multiple columns(the white space between columns are unkown). Below is what I have but only populate 1st column in the sql file.

strInput = "ALL.txt"
strOutput = "UpdateALL.SQL"

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objInput = objFSO.OpenTextFile(strInput, 1, False)
Set objOutput = objFSO.CreateTextFile(strOutput, True)
While Not objInput.AtEndOfStream
   strLine = objInput.ReadLine
   arrNames = Split(strLine, " ")
   strStatement = "Update " & Trim(arrNames(0)) & " SET "&Trim(arrNames(1))&"='"&Trim(arrNames(3))&"' WHERE "&Trim(arrNames(1))&"='"&Trim(arrNames(2))&"';"
   objOutput.WriteLine strStatement
Wend
objInput.Close
objOutput.Close
WScript.Echo "Done"

Select allOpen in new window

Please provide code.

Thanks in advance.