After a whole weekend of headscratching finaly got the below to work in VBS.
Trouble is this overwrites the data already in column A as opposed to just adding to it. any body have any any anmmendments nessasry to make so this dosnt happen.
Paul
Dim i, objfso, objfile, strline, arrline, aFile...