begin process at 2008 07 06 20:05:57
1 205 742 membres
305 nouveaux aujourd'hui
14 119 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

CRÉER UN RACCOURCI INTERNET (.url)


Information sur la source

Catégorie :Réseau & Internet Classé sous : raccourci, internet, url Niveau : Débutant Date de création : 22/05/1999 Vu / téléchargé: 11 168 / 335

Note :
5,4 / 10 - par 5 personnes
5,40 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (4)
Ajouter un commentaire et/ou une note


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

  • 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
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
Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

  • signaler à un administrateur
    Commentaire de Turakam le 01/09/2002 23:54:37

    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

  • signaler à un administrateur
    Commentaire de babeuk le 29/10/2002 20:24:26

    oui on peut, il suffit d'ajouter les lignes suivantes :

    IconIndex=0
    IconFile=C:Mes documentsSans Titre.ico

  • signaler à un administrateur
    Commentaire de hexenez le 31/05/2007 14:58:17

    exactement ce que cherchais! vive toi !
    (mais pourquoi microsoft ne documente pas mieux pour ce genre de chose ?)

  • signaler à un administrateur
    Commentaire de dimitriusai le 08/05/2008 10:45:35

    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

Ajouter un commentaire

Pub



Appels d'offres

WEB DESIGN
Budget : 1 000€
Plugin Dialer outlook
Budget : 2 000€
Travail graphique- ill...
Budget : 1 000€

CalendriCode

Juillet 2008
LMMJVSD
 123456
78910111213
14151617181920
21222324252627
28293031   

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS