(02-28-2026, 01:42 AM)ahenry3068 Wrote:

(02-28-2026, 01:34 AM)ahenry3068 Wrote:

(02-28-2026, 01:16 AM)NakedApe Wrote: Sorry, ahenry that didn't do it either.

SHELL "trash myfile.txt" works for me when the file is in the current working directory - QB folder here.

   Well hell.   Then do that !   It's certainly a lot simpler than Applescript.  

I would guess it should work with a full pathname too.   (adding Quotes around it if it has spaces in it !)

after the if FileExists I would add

    if Instr(File$, chr$(32)) > 0 then File$ = chr$(34) + File$ + Chr$(34) 

Space's in file names need to be quoted on the command line !

(02-28-2026, 02:10 AM)NakedApe Wrote: I tried the "mv" method first and it wouldn't work for me. Shrug.

OPEN "MyFile.txt" FOR OUTPUT AS #1

PRINT #1, "Test:" + DATE$ + " " + TIME$

CLOSE

PRINT "File created called MyFile.txt"



Recycle "MyFile.txt"

PRINT "MyFile.txt should now be recycled and in the Recycle Bin, instead of just erased permanently."

PRINT "Check your recycle bin to see if it exists there and contains a simple message of 'Test'."

END



SUB Recycle (file$)

  IF _FILEEXISTS(file$) THEN

    $IF WIN THEN

            ps$ = "powershell -NoLogo -NoProfile -Command "

            ps$ = ps$ + Chr$(34) + "Add-Type -AssemblyName Microsoft.VisualBasic; "

            ps$ = ps$ + "[Microsoft.VisualBasic.FileIO.FileSystem]:eleteFile('"

            ps$ = ps$ + file$

            ps$ = ps$ + "','OnlyErrorDialogs','SendToRecycleBin')" + Chr$(34)

            Shell _Hide ps$

    $ELSEIF MAC THEN

            cmd$ = "mv " + Chr$(34) + file$ + Chr$(34) + " ~/.Trash/"

            Shell cmd$

    $ELSE

      'Assume Linux-like environment with gio available

      SHELL _HIDE "gio trash " + CHR$(34) + file$ + CHR$(34)

    $END IF

  END IF

END SUB