Ex. concrets ! ouvir une page web

Soyez le premier à donner votre avis sur cette source.

Snippet vu 2 952 fois - Téléchargée 42 fois

Contenu du snippet

Cette série de noyaux de code ou d'outils, peuvent être utilisés pour créer des programmes entiers, beaucoup plus simplement.
Très peu sont directement de moi, mais souvent décortiqués afin de les rendre beaucoup plus compréhensible et simple de ré-utilisation.

Mettez ça dans une frm ...

Source / Exemple :


Declare Function GetDesktopWindow Lib "user32" () As Long
Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Integer

Function OuvrirPageWeb(Adresse As String)
Dim handle As Long
Dim Retour As Long
handle = GetDesktopWindow()
Retour = ShellExecute(handle, vbNullString, Adresse, "", vbNullString, 0)
End Function

Conclusion :


Et voilà !

A voir également

Ajouter un commentaire Commentaires
Messages postés
138
Date d'inscription
samedi 11 mai 2002
Statut
Membre
Dernière intervention
17 mai 2007

C'est clair, qu'a relire mon code, il est tt merdeux... lol ! pfff... ça ce vois que j'étais jeune à l'époque ;-)
Non, sérieusement, ça fais quelques années que j'ai posté ça, et à vrai dire, je fais plus de VB à l'heure actuelle, mais c'est vrai que ce code est franchement nul !
Messages postés
13
Date d'inscription
vendredi 28 décembre 2001
Statut
Membre
Dernière intervention
18 octobre 2004

c'est bien le basic, ça laisse une certaine flexibilité à écrire, mais le retour d'une fonction ne se fait pas avec le nom de la fonction ?
Un peu plus de rigeur svp...
Messages postés
13
Date d'inscription
vendredi 28 décembre 2001
Statut
Membre
Dernière intervention
18 octobre 2004

c'est bien le basic, ça laisse une certaine flexibilité à écrire, mais le retour d'une fonction ne se fait pas avec le nom de la fonction ?
Un peu plus de rigeur svp...
Messages postés
14
Date d'inscription
lundi 5 août 2002
Statut
Membre
Dernière intervention
30 août 2004

C'est deja sur le site !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Un peu d'originalité bordel

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.