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

mount = Function( {server},

	{Default Local},

	If( Host is( "Mac" ),

		// ボリュームをマウントするには、osascriptを使用

		// ユーザーは資格情報の入力を求められる

		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はUNCを使用してサーバーを自動的にマウント可能

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

	)

);

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

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