[R] Nom de fichier avec espace

arnaud1035 · #1

Bonjour à tous

Suite à un petit script qui
ouvre une fenetre de dialogue, je selectionne
le fichier qui s'ouvre dans openoffice.

Si le nom de fichier ne contient pas d'espace
tout va bien
mais si il y un espace comme : avec espace.odt
j 'ai un message d'erreur d'openoffice, n' arrive pas à
ouvrir d:\avec puis n'arrive pas à ouvrir d:\espace.odt

Code : Tout sélectionner

Dim $message, $Var, $nom

$message="CHOIX DU FICHIER A OUVRIR"
$Var=FileOpenDialog($message, "D:\", "fichiers (*.odt)", 1 + 4)
$nom=StringTrimLeft($var, StringInStr($var, "\", 1, -1))

If $nom = " " Then
    MsgBox(4096, "", "AUCUN FICHIER SELECTIONNE - BYE")
Else
    ShellExecute("C:\Program Files\OpenOffice.org 3\program\swriter.exe", $nom, "", "open", @SW_MAXIMIZE)
EndIf

Je ne sais pas si j' ai été clair ? merci d'avance

#2

Bonjour

rajoute des " autour de la variable $nom:

ShellExecute("C:\Program Files\OpenOffice.org 3\program\swriter.exe", '"' & $nom & '"', "", "open", @SW_MAXIMIZE)

en fait j'ai ajouter 1simple ' autour d'un double " => '"' ou sinon tu le double:
ShellExecute("C:\Program Files\OpenOffice.org 3\program\swriter.exe", """" & $nom & """", "", "open", @SW_MAXIMIZE)

ou sinon tu prends le nom court:
FileGetShortName ( "file" [, flag] )

arnaud1035 · #3

Voila ce que j'appelle une réponse rapide et efficace

La premiere solution meme erreur
mais la deuxieme avec FileGetShortName fonctionne

mille mille mille merci

au plaisir de vous lire, car je suis vraiment debutant dans la matiere.

Bonne journee a tous

AutoIt Français