I have run some tests and there is an error in your connection string. You have
Conn1 = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = D:\\Sample;""Extended Properties = ""text;HDR=Yes;FMT = Delimited(;)"";Persist Security Info = False"
But I used the following which works:
Conn1 = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = D:\\Sample;Extended Properties = ""text;HDR=Yes;FMT = Delimited(;);Persist Security Info = False""";
Note the positioning of the double quotes within the connection string; all the extended properties should be within the one set of quotes like:
Extended Properties = "<all extended properties go here>"