Créer un raccourci internet (.url)

2/5 (4 avis)

Vue 28 478 fois - Téléchargée 805 fois

Description

Comment puis-je créer un raccourci internet ?

Un raccourci URL a pour extension .url et contient un text de ce type :

[InternetShortcut]
URL=http://www.vbfrance.com/

Pour créer un raccourci de ce site en racine de C:\ , Utilisez ce code :

Source / Exemple :


Dim Fichier As String
Dim SiteURL As String
Dim Num As Integer

Fichier = "C:\Visual Basic Codes Sources.url"
SiteURL = "http://www.vbfrance.com/"
Num = FreeFile

Open Fichier For Output As Num
    Print #Num, "[InternetShortcut]"
    Print #Num, "URL=" & SiteURL
Close Num

Codes Sources

A voir également

Ajouter un commentaire Commentaires
dimitriusai Messages postés 76 Date d'inscription lundi 6 novembre 2006 Statut Membre Dernière intervention 7 mai 2009
8 mai 2008 à 10:45
Voici Comment je fais en VBNET(Visual Studio 2008)

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'Permet de trouver le chemin du bureau de l'utilisateur
Dim chemin As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop)
chemin = chemin + "\Nomdemonurl.url"
Dim objWriter As New System.IO.StreamWriter(chemin, False, System.Text.Encoding.Default)
Dim MysqlResult2 As New ArrayList()
objWriter.WriteLine("[InternetShortcut]")
objWriter.WriteLine("URL=http://monlien.html")
objWriter.WriteLine("IDList=")
objWriter.WriteLine("IconFile=C:\monicone.ico")
objWriter.WriteLine("HotKey = 0")
objWriter.WriteLine("IconIndex = 0")
objWriter.WriteLine("[{000214A0-0000-0000-C000-000000000046}]")
objWriter.WriteLine("Prop3=19,2")
objWriter.Close()
FileClose(1)
End Sub
hexenez Messages postés 35 Date d'inscription dimanche 10 août 2003 Statut Membre Dernière intervention 16 février 2008
31 mai 2007 à 14:58
exactement ce que cherchais! vive toi !
(mais pourquoi microsoft ne documente pas mieux pour ce genre de chose ?)
babeuk Messages postés 47 Date d'inscription jeudi 21 février 2002 Statut Membre Dernière intervention 30 septembre 2003
29 oct. 2002 à 20:24
oui on peut, il suffit d'ajouter les lignes suivantes :

IconIndex=0
IconFile=C:Mes documentsSans Titre.ico
cs_Turakam Messages postés 32 Date d'inscription samedi 31 août 2002 Statut Membre Dernière intervention 26 juin 2005
1 sept. 2002 à 23:54
Cool !!!
Ca fait 30 ans que je veux faire un raccourcis .lnk mais je n'y arrive pas donc j'ai pris ton code est mis l'adresse de mon fichier et sa marche !!! :)

Par contre on pourrai pas changer l'icon en meme temps qu'on le cree ??
Merci

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.