Convertir Mac a Windows y viceversa para compartir con colegas [cerrado]

4

Quería compartir quizás una respuesta más completa a esta pregunta: Cómo traducir entre Windows y el archivo de estilo Mac ubicaciones?

Pero como soy nuevo y no tengo credibilidad en este sitio, lo publico como una nueva pregunta. Lo siento, solo quería devolverlo, ya que la respuesta anterior fue útil, pero aún requería un poco de pirateo. Quería salvar a otros la molestia.

PROBLEM

Desde una Mac, quiero copiar una ruta de archivo en un recurso compartido de red en un correo electrónico para que los destinatarios pobres de Windows puedan hacer clic en él. Actualmente, copio / pego la ruta, por ejemplo:      smb: //servername/MLS/Timbers/IrrefutableProofTimbersAreBestTeamInMLS.pdf

en un correo electrónico, luego conviértelo manualmente en una ruta de Windows:      \\ servername \ MLS \ Timbers \ IrrefutableProofTimbersAreBestTeamInMLS.pdf

Pero eso es una cosa estúpida de hacer una y otra vez, así que encontré algunos ejemplos en línea (este foro y otros) y lo piraté hasta que funcionó de varias maneras (vea más abajo).

Un problema relacionado es cuando los usuarios de Windows me envían una ruta de archivo y quiero acceder a ella rápidamente. Actualmente, navego manualmente hacia él traduciendo el camino en mi cabecita, lo que duele. Entonces, invirtí el truco anterior y agregué una llamada para abrir la carpeta en el archivo.

SOLUTION

En Mac OS Automator, creé tres scripts de Apple que se ejecutan como un servicio. Esto me permite seleccionar una ruta, hacer clic con el botón derecho y elegir el servicio apropiado en el menú "Servicios ...", que nombré:

  • “Convierta la ruta de Windows a Mac y ábrala”
  • “Convertir la ruta de Windows a Mac”
  • "Convertir Mac a la ruta de Windows"

DETAILS

**Script:“ConvertWindowstoMacpathandopenit”**onsearchReplace(theText,SearchString,ReplaceString)setOldDelimstoAppleScript'stextitemdelimiterssetAppleScript'stextitemdelimiterstoSearchStringsetnewTexttotextitemsoftheTextsetAppleScript'stextitemdelimiterstoReplaceStringsetnewTexttonewTextastextsetAppleScript'stextitemdelimiterstoOldDelimsreturnnewTextendsearchReplaceonrun{input,parameters}setmyCliptotheinputsetmytexttosearchReplace(myClip,"<", "")
            set mytext to searchReplace(mytext, ">.", "")
            set mytext to searchReplace(mytext, ">", "")
            set findIt to "\"
            set replaceIt to "/"
            set mylocation to searchReplace(mytext, findIt, replaceIt)
            set mylocation to "smb:" & mylocation
            tell application "Finder"
                open location mylocation
            end tell
            return input
 end run

 -- Thanks to: https://apple.stackexchange.com/questions/144916/how-to-change-filepath-structure-using-automator-windows-to-mac --


 **Script: “Convert Windows to Mac path”**

 on searchReplace(theText, SearchString, ReplaceString)
            set OldDelims to AppleScript's text item delimiters
            set AppleScript's text item delimiters to SearchString
            set newText to text items of theText
            set AppleScript's text item delimiters to ReplaceString
            set newText to newText as text
            set AppleScript's text item delimiters to OldDelims
            return newText
 end searchReplace

 on run {input, parameters}
            set myClip to the input
            set mytext to searchReplace(myClip, "<", "")
            set mytext to searchReplace(mytext, ">.", "")
            set mytext to searchReplace(mytext, ">", "")
            set findIt to "\"
            set replaceIt to "/"
            set mylocation to searchReplace(mytext, findIt, replaceIt)
            set mylocation to "smb:" & mylocation
            return mylocation            
 end run


 **Script: “Convert Mac to Windows path”**

 on searchReplace(theText, SearchString, ReplaceString)
            set OldDelims to AppleScript's text item delimiters
            set AppleScript's text item delimiters to SearchString
            set newText to text items of theText
            set AppleScript's text item delimiters to ReplaceString
            set newText to newText as text
            set AppleScript's text item delimiters to OldDelims
            return newText
 end searchReplace

 on run {input, parameters}
            set myClip to the input
            set mytext to searchReplace(myClip, "<", "")
            set mytext to searchReplace(mytext, ">.", "")
            set mytext to searchReplace(mytext, ">", "")
            set mytext to searchReplace(mytext, "smb://", "\\")
            set findIt to "/"
            set replaceIt to "\"
            set mylocation to searchReplace(mytext, findIt, replaceIt)
            return mylocation
 end run

Capturas de pantalla del último script:

    
pregunta Matt Deniston 12.03.2017 - 22:36

0 respuestas

Lea otras preguntas en las etiquetas