The simplest form of what you specified you need is:
Names Default To Here( 1 );
file = Pick File(
"Select csv File",
"$HOME",
{"csv Files|csv", "All Files|*"},
1,
0
);
If( file != "",
dt = Open( file )
);
Look in the Scripting Index for the definitions and examples of the Pick File and Open functions.
Jim