Ajouter un élément au menu "envoyer à" pour tous les utilisateurs (winxp)
5
Comment ajouter un élément au menu "envoyer à" pour TOUS les utilisateurs (winxp)
Nous voulons avoir un lien vers une visionneuse de journal de débogage disponible pour tous les utilisateurs sur un serveur que je construis.
C'est assez simple de l'ajouter à un utilisateur (début- & gt; exécuter- & gt; sendto) mais je le veux pour tous.
Des idées merci?
Lorsque j’utilisais autrefois Windows, je personnalisais le menu SendTo à l’aide d’un joli petit programme appelé «Send To Toys». Vous pouvez toujours le télécharger ici . Je ne peux pas vous dire si cela fonctionne pour tous les utilisateurs ou non; cela peut très bien faire.
Le dossier SendTo est déterminé utilisateur par utilisateur (généralement sous C: \ Documents and Settings \ USER \ SendTo). Il s’agit d’un chemin absolu situé dans la base de registre. Il n’existe pas de dossier SendTo commun à tous les utilisateurs. Cependant, vous pouvez facilement changer l'emplacement du dossier SendTo sans vous embrouiller dans le registre.
Il suffit de cliquer avec le bouton droit de la souris sur le dossier SendTo et de le déplacer vers le nouvel emplacement, puis de sélectionner "Déplacer vers". L'entrée de registre sera mise à jour automatiquement pour cet utilisateur. Malheureusement, vous devez le faire pour chaque utilisateur ou charger la ruche de registre de cet utilisateur et la modifier manuellement (à nouveau, par utilisateur).
Il serait probablement préférable de mettre à jour le registre d'un utilisateur (en utilisant "Déplacer vers" ou manuellement), puis d'exporter cette clé de registre dans un fichier. Ensuite, distribuez ce fichier aux utilisateurs et demandez-leur de double-cliquer dessus, en fusionnant le nouvel emplacement SendTo dans leurs registres respectifs.
La clé est à HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders et mon emplacement par défaut était le chemin absolu, C:\Documents and Settings\Grant\SendTo
Le contenu du fichier what.reg qui pourrait être distribué ressemblerait à ceci:
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders]
"SendTo"="C:\\Documents and Settings\\Grant\\SendTo"
Si vous souhaitez faire les raccourcis
disponible pour tous les utilisateurs, ajoutez le
raccourcis vers C: \ Documents et
Paramètres \ Tous les utilisateurs. Depuis ce dossier
n'existe pas par défaut sous Windows
2000 ou XP, vous pouvez soit copier un
dossier de l'utilisateur existant et le renommer
"Tous les utilisateurs" ou créer un nouveau dossier
et entrez le nom du dossier comme Envoyé.
Si vous ne pouvez pas voir le dossier SendTo dans
Explorateur Windows, vous devrez peut-être activer
sur la capacité de voir caché et
dossier système en procédant comme suit:
Ouvrez l'explorateur Windows.
Sélectionnez Outils - & gt; Options des dossiers dans le menu.
Cliquez sur l'onglet "Affichage".
Dans la fenêtre "Paramètres avancés", une option est disponible pour "Fichiers cachés".
et dossiers ".
Sélectionnez "Afficher les fichiers et dossiers cachés".
Cliquez sur Appliquer, mais ne fermez pas le formulaire de dialogue.
Pour appliquer ces paramètres à tous les dossiers, cliquez sur "Appliquer à tous les
dossiers "dans la section" Vues des dossiers "
de ce dialogue (en haut).
Je pense que ce n'est que pour un seul utilisateur, pas tous les utilisateurs.
Grant
@Grant: pour un utilisateur, placez-le dans le dossier "Documents and Settings \ & lt; UserName & gt; \ SendTo".
JP Alioto
1
Essayé cette option, n'a pas fonctionné malheureusement
Chris
1
@ JP, j'ai essayé de créer ce dossier, mais rien ne figurait dans la liste SendTo, le dossier n'y était pas par défaut.
Grant
0
Essayez cette fonction, elle trouvera les dossiers SendTo pour tous les utilisateurs.
Private Function GetSendToPaths() As String()
Dim localsendto As String = Environment.GetFolderPath(Environment.SpecialFolder.SendTo)
Dim userpath As String = Environment.GetFolderPath(Environment.SpecialFolder.UserProfile)
Dim subuser As String = Path.GetDirectoryName(userpath)
Dim subsendto As String = localsendto.Substring(userpath.Length)
Dim dirinfo As New DirectoryInfo(subuser)
Dim paths As New List(Of String)
For Each dir As DirectoryInfo In dirinfo.GetDirectories
Dim path As String = dir.FullName & subsendto
If Directory.Exists(path) Then
Dim dirpath As String = dir.FullName & "\Contacts"
If Directory.Exists(dirpath) Then
If New DirectoryInfo(dirpath).GetFiles.Length > 0 Then
paths.Add(path)
End If
End If
End If
Next
Return paths.ToArray
End Function
Selon Utilisation du dossier "Envoyer vers" sous Windows 2000 ou supérieur ...
Modifier selon les commentaires: l'un de vos raccourcis SendTo personnalisés s'affiche-t-il? Il se peut qu'il manque une entrée de registre ou une inscription. Check-out Les raccourcis dans le dossier "Envoyer à" n'apparaissent pas dans le menu? , voyez si cela aide du tout.
la source
Essayez cette fonction, elle trouvera les dossiers SendTo pour tous les utilisateurs.
la source