Oracle Forms

/* Formatted on 2012/04/24 13:26 (Formatter Plus v4.8.8) */
DECLARE
  v_file        VARCHAR2 (150)  := NULL;
  client_file   VARCHAR2 (150);
  server_file   VARCHAR2 (150);
  blnret        BOOLEAN;
BEGIN
  client_file := :B2.FILE_NAME;
  v_file := SUBSTR (:B2.FILE_NAME, INSTR (:B2.FILE_NAME, '\', -1) + 1);
  client_file :=  'igotit';
  server_file :=   '\\ip_address\u02\fifapps\Forms\logo.gif'; 
  
  Client_host('net use  \\ip_address \user:abs "mypass"');


  blnret := webutil_file.copy_file ( server_file,client_file);

  IF blnret
  THEN
    MESSAGE ('file copied');
  ELSE
    blnret := webutil_file_transfer.as_to_client (server_file,client_file);

    IF blnret
    THEN
      MESSAGE ('file copied by transfer');
    ELSE
      MESSAGE ('file not copied by transfer');
    END IF;
  END IF;
EXCEPTION
  WHEN OTHERS
  THEN
    MESSAGE ('Error Loading File');
END;