Files in Directory( "\\myserver.company.com/source/Users/Smith" );

mount = Function( {server},

	{Default Local},

	If( Host is( "Mac" ),

		// Use osascript to mount the volume.

		// The user will be prompted for credentials.

		Run Program(

			Executable( "/usr/bin/osascript" ),

			Options( {"-e", Eval Insert( "mount volume \!"smb://^server^\!"" )} ),

			Read Function( "text" )

		);

		server = Concat Items( Remove( Words( server, "/" ), 1 ), "/" );

		Eval Insert( "/Volumes/^server^" );

	,

		// Windows can use UNC to auto-mount the server.

		Eval Insert( "\!\\!\^server^" )

	)

);

users = Mount( "myserver.company.com/Users" );

Files In Directory( Eval Insert( "^users^/Smith" ) );