Importing Text file from a server
 

I need to import text files from a server which requires an ID and password. I tried using ActiveSheet.QueryTables.Add(Connection:= "TEXT; ftp://10.83.238.151 " , Destination:=Range("A1")) to do it but everytime when I try running the macro again after closing the excel application, I will get an error msg which I believe is due to the password being removed. I need to enter the password again at DataImport External DataImport Data Add/Modify FTP Location ... before I can import the text file. Is there any way I can incorporate this into my macro so that I do not have to keep entering the password everytime?? Any form of help is appreciated. Thanks