Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Général VBA
Général VBA Forum général VBA . Pour les logiciels spécifiques (Access, Excel, Word, ...), postez dans les bons sous forums.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 18/11/2010, 22h56   #1
Expert Confirmé
 
Avatar de patricktoulon
 
patrick
Inscription : avril 2009
Messages : 1 820
Détails du profil
Informations personnelles :
Nom : patrick
Âge : 42
Localisation : France, Var (Provence Alpes Côte d'Azur)

Informations professionnelles :
Secteur : Bâtiment

Informations forums :
Inscription : avril 2009
Messages : 1 820
Points : 2 844
Points : 2 844
Envoyer un message via MSN à patricktoulon
Par défaut detecter quel "Fai" on utilise par vba

bonjour a tous

je voudrais savoir si en vba on peu determiner quel fournisseur d'acces on utilise sur l'ordi sur lequel le classeur est ouvert

exemple moi j'ai "alice" je voudrais que des le depart une variable prenne le nom de "alice "

est ce que cela est possible


merci d'avance


au plaisir
__________________
mes fichiers dans les contributions:
mon formulaire mail avec CDO en vba et mon formulaire mail avec CDO en vbs dans un HTA
mon nouveau mouse in out pour les boutons dans un userform
mon addin pour prendre un cliché de selection de cellules

si ton problème est résolu n'oublie pas de pointer :résolu:ça peut servir aux autres
et n'oublie pas de voter
patricktoulon est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 20/11/2010, 11h03   #2
Membre du Club
 
Inscription : août 2010
Messages : 51
Détails du profil
Informations forums :
Inscription : août 2010
Messages : 51
Points : 67
Points : 67
Bonjour,

Il me semble que ce soit possible mais pas trés simple.

Il faut utiliser les fonctions gethostbyaddr ou gethostbyname de la dll Wsock32

Un exemple d'utilisation est disponible ici http://allapi.mentalis.org/apilist/g.shtml

Microsoft conseille d'utiliser la fonction getnameinfo de la dll Ws2_32

Je n'ai pas trouvé d'exemple mais le principe doit être le même.

Bon courage.

ctac
ctac_ est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 23/11/2010, 17h27   #3
Membre confirmé
 
Inscription : février 2008
Messages : 201
Détails du profil
Informations forums :
Inscription : février 2008
Messages : 201
Points : 203
Points : 203
Bonjour

En suivant les liens j'ai découvert un petit code qui devrait te donner satisfaction. Au cours des tests j'ai eu une fois ou deux un nom de FAI erroné : pourquoi ? Je ne sais pas.
à plus.
Fichiers attachés
Type de fichier : xls Nom_du_FAI.xls (26,0 Ko, 6 affichages)
Le Pierre est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 23/11/2010, 17h52   #4
Expert Confirmé
 
Avatar de patricktoulon
 
patrick
Inscription : avril 2009
Messages : 1 820
Détails du profil
Informations personnelles :
Nom : patrick
Âge : 42
Localisation : France, Var (Provence Alpes Côte d'Azur)

Informations professionnelles :
Secteur : Bâtiment

Informations forums :
Inscription : avril 2009
Messages : 1 820
Points : 2 844
Points : 2 844
Envoyer un message via MSN à patricktoulon
Par défaut re

merci le pierre


a ma grande surprise je suis chez alice et il me sort tiscali


j'avoue que je ne comprend pas tres bien


je te remercie je vais essayer de le modifier pour voir


au plaisir
__________________
mes fichiers dans les contributions:
mon formulaire mail avec CDO en vba et mon formulaire mail avec CDO en vbs dans un HTA
mon nouveau mouse in out pour les boutons dans un userform
mon addin pour prendre un cliché de selection de cellules

si ton problème est résolu n'oublie pas de pointer :résolu:ça peut servir aux autres
et n'oublie pas de voter
patricktoulon est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 23/11/2010, 18h01   #5
Membre confirmé
 
Inscription : février 2008
Messages : 201
Détails du profil
Informations forums :
Inscription : février 2008
Messages : 201
Points : 203
Points : 203
Bonjour

Effectivement, au cours de mes tests le FAI erroné était Tiscali aussi.
Est-ce un bug ou une erreur en cas de non connexion sur "http://xml.showmyip.com/" ?
à plus
Le Pierre est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 23/11/2010, 19h43   #6
Expert Confirmé
 
Avatar de patricktoulon
 
patrick
Inscription : avril 2009
Messages : 1 820
Détails du profil
Informations personnelles :
Nom : patrick
Âge : 42
Localisation : France, Var (Provence Alpes Côte d'Azur)

Informations professionnelles :
Secteur : Bâtiment

Informations forums :
Inscription : avril 2009
Messages : 1 820
Points : 2 844
Points : 2 844
Envoyer un message via MSN à patricktoulon
Par défaut re

re
c'est bien une erreur en fonction de l'adresse car l'abre de l'xml n'a aucune relation (obsolete)
essai d'aller directement avec le lien tu verra

au plaisir
__________________
mes fichiers dans les contributions:
mon formulaire mail avec CDO en vba et mon formulaire mail avec CDO en vbs dans un HTA
mon nouveau mouse in out pour les boutons dans un userform
mon addin pour prendre un cliché de selection de cellules

si ton problème est résolu n'oublie pas de pointer :résolu:ça peut servir aux autres
et n'oublie pas de voter
patricktoulon est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 23/11/2010, 20h10   #7
Membre confirmé
 
Inscription : février 2008
Messages : 201
Détails du profil
Informations forums :
Inscription : février 2008
Messages : 201
Points : 203
Points : 203
Bonjour

Je viens d'essayer d'entrer directement le lien http://xml.showmyip.com/ dans Internet Explorer et ça fonctionne parfaitement.
L'attente est parfois longue !
à plus.
Le Pierre est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 23/11/2010, 21h05   #8
Expert Confirmé
 
Avatar de patricktoulon
 
patrick
Inscription : avril 2009
Messages : 1 820
Détails du profil
Informations personnelles :
Nom : patrick
Âge : 42
Localisation : France, Var (Provence Alpes Côte d'Azur)

Informations professionnelles :
Secteur : Bâtiment

Informations forums :
Inscription : avril 2009
Messages : 1 820
Points : 2 844
Points : 2 844
Envoyer un message via MSN à patricktoulon
Par défaut re

oui je me suis mal exprimer c'est l'arbre du xml qui n'a aucune corelation

ce qui fait que la boucle s'arrete a tiscali

au plaisir
__________________
mes fichiers dans les contributions:
mon formulaire mail avec CDO en vba et mon formulaire mail avec CDO en vbs dans un HTA
mon nouveau mouse in out pour les boutons dans un userform
mon addin pour prendre un cliché de selection de cellules

si ton problème est résolu n'oublie pas de pointer :résolu:ça peut servir aux autres
et n'oublie pas de voter
patricktoulon est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 09h37.


 
 
 
 
Partenaires

Hébergement Web