Salut, en un peu plus simple 😉 (defun load-lsp () (foreach file (vl-directory-files "C:/.../" "*.lsp" 1) (load file (strcat file " did not load")) )) (load-lsp)

Bonjour le forum, J'utilise depuis un moment un lisp (de gile si je me souviens bien). Ce lisp charge tous les programmes d'un répertoire donné. Ca évite de rajouter une application à liste de démarrage à chaque fois que j'en collecte un (_appload > Démarrage contenu > Ajouter ...) Sauf qu'il ne fonctionne plus 😭 J'ai voulu changer son appel par S::STARTUP pour que le chargement de tous mes LISPS se fasse automatiquement à chaque ouverture de dessin. Je suis bien revenu en arrière mais le mal était fait. Note : le repertoire en question est dans la liste des répertoires approuvés. TOUTCHARGER.LSP : (defun c:cg () ; load lisps (setq *lsppath* "C:\\Users\\studi\\OneDrive - Studiplan\\Documents\\PRO\\Sources\\Autocad\\Lisp") (mapcar '(lambda (x) (princ (strcat "\n" x)) s) (acad_strlsort (vl-remove "toutcharger.lsp" (apply 'append (mapcar '(lambda (x) (vl-directory-files *lsppath* x)) '("*.lsp" "*.fas")))) ;'("*.lsp" "*.dvb" "*.arx" "*.fas")))) )) (princ)) Le "Princ" me renvoie bien la liste complète des programmes, mais il ne les charge pas. J'ai l'impression qu'il manque un "load" quelque part, l'aurais-je supprimer par mégarde ? Merci d'avance pour votre aide

Merci Starlyon pour ton retour !

Bonjour @barbichette Oui, tout à fait, mais je ne sais que dire tellement il y a de pistes de recherche.

Ok, Si vous ne reproduisez pas mes erreurs, en effectuant les mêmes tâches, c'est que nous devons avoir un paramètre qui change entre votre PC et le mien...