Création d'un raccourci avec un nom aléatoire
Résolu
fefe_du_973
Messages postés
13
Date d'inscription
Statut
Membre
Dernière intervention
-
fefe_du_973 Messages postés 13 Date d'inscription Statut Membre Dernière intervention -
fefe_du_973 Messages postés 13 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Après de nombreuses recherches peu fructueuses sur l'Internet moderne 2.0 je voulais savoir comment générer un raccourci avec un nom aléatoire avec un vbs et ce script.Me dire ci ce n'est pas possible.
Merci pour votre réponse
Cordialement
Après de nombreuses recherches peu fructueuses sur l'Internet moderne 2.0 je voulais savoir comment générer un raccourci avec un nom aléatoire avec un vbs et ce script.Me dire ci ce n'est pas possible.
Dim Shell, DesktopPath, INK
Set Shell = CreateObject("WScript.Shell")
DesktopPath = Shell.SpecialFolders("Desktop")
Set Ink = Shell.CreateShortcut(DesktopPath & "\nombre aléatoire.lnk")
Ink.TargetPath = "E:\ancienne clée\xxxx\xxxx\xxxx\lance.exe"
Ink.Save
Merci pour votre réponse
Cordialement
A voir également:
- Création d'un raccourci avec un nom aléatoire
- Creer un raccourci clavier - Guide
- Création d'un compte google - Guide
- Creation compte gmail - Guide
- Raccourci retourner écran - Guide
- Création site web - Guide
5 réponses
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
bonjour, tes nombreuses recherches t'ont-elles menées à lire ceci?
https://docs.microsoft.com/fr-ch/office/vba/language/reference/user-interface-help/rnd-function
https://docs.microsoft.com/fr-ch/office/vba/language/reference/user-interface-help/rnd-function
merci pour ta réponse mais je veux que le nom du raccourci soit le nombre aléatoire choisi par ton programme peut t'on faire un programme qui choisi un nombre avec ça :
et une fois le nombre choisi l'applique au nom du raccourci :
peut t-on fusionner les codes pour faire ce que je veux ?
Si possible m'écrire le code nécessaire (je suis débutant)
dim nombrealeatoire
randomize
nombrealeatoire=rnd
msgbox nombrealeatoire
et une fois le nombre choisi l'applique au nom du raccourci :
Dim Shell, DesktopPath, INK
Set Shell = CreateObject("WScript.Shell")
DesktopPath = Shell.SpecialFolders("Desktop")
Set Ink = Shell.CreateShortcut(DesktopPath & "\nombrealeatoire.lnk")
Ink.TargetPath = "E:\ancienne clée\xxxx\xxxx\xxxx\lance.exe"
Ink.Save
peut t-on fusionner les codes pour faire ce que je veux ?
Si possible m'écrire le code nécessaire (je suis débutant)
pour te permettre de ne pas rester débutant, il me semble préférable que tu fasses une partie du travail.
par ailleurs, merci d'utiliser les balises de code quand tu postes du code sur le forum: https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
pour fusionner les deux codes, ajoute les trois premières lignes de mon code après la première ligne de ton code.
ensuite, modifie la ligne
par ailleurs, merci d'utiliser les balises de code quand tu postes du code sur le forum: https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
pour fusionner les deux codes, ajoute les trois premières lignes de mon code après la première ligne de ton code.
ensuite, modifie la ligne
Set Ink =de ton code, ainsi:
Set Ink = Shell.CreateShortcut(DesktopPath & "\" & cstr(nombrealeatoire) & ".lnk")
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question