Créer un raccourci internet (.url)

Soyez le premier à donner votre avis sur cette source.

Vue 27 249 fois - Téléchargée 708 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
-
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
-
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
-
oui on peut, il suffit d'ajouter les lignes suivantes :

IconIndex=0
IconFile=C:Mes documentsSans Titre.ico
cs_Turakam
Messages postés
35
Date d'inscription
samedi 31 août 2002
Statut
Membre
Dernière intervention
26 juin 2005
-
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.