WININET.DLL

Question

Bonjours,j'utilise la dll WININET pour une connection via VB , dans mon module il est indiqué ceci Public Const INTERNET_DEFAULT_HTTP_PORT 80

Comment changer le port a partir de ma FORM ?


j'ai essayé ceci sans succés :nomdumodule.Public Const INTERNET_DEFAULT_HTTP_PORT =  text1.text

mortalino · Answer

Salut,

une constante est une constante, elle ne se modifie pas.
Déclare là en tant que variable Public, attribue lui la valeur 80 au lancement de ton appli, et quand tu veux le modifier, tu pourras avec l'intruction INTERNET_DEFAULT_HTTP_PORT =  text1.text

@++

le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA

ricky84 · Answer

Une Const est une CONSTANTE . Et donc, elle est invariable, on ne peut pas lui mettre d'autre valeur que celle initialisée dans sa ligne de déclaration

GHGFSJD · Answer

Déclare là en tant que variable Public ! ok on fait comment pour ca ?

mortalino · Answer

Bah là où tu l'a déclaré, mais enlève ce qui a en rouge et rajoute ce qu'il y a en bleu:
Public Const INTERNET_DEFAULT_HTTP_PORT = 80 As Long

Après pour l'initialisé, vois l'évènement Load de ta Form :
INTERNET_DEFAULT_HTTP_PORT = 80

@++

le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA

cs_Jack · Answer

Salut
Mon grain de sel
Ce qui suit ne changera rien à la fonctionnalité, c'est juste une histoire de nomalisation :

Les constantes sont là pour transformer des valeurs en texte et faciliter la compréhension du programmeur quand il relit son code.
INTERNET_DEFAULT_HTTP_PORT "doit" rester avec une valeur de 80.
Si tu dois utiliser une autre valeur, crée toi même une autre variable, même locale, mais ne réutilise pas celle là.

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

mortalino · Answer

oui, je suis d'accord avec Jack,

d'autant plus que dans le nom de la constante, il y a le terme DEFAULT, ce qui veut dire que c'est sa valeur par défaut, donc

@++

le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA

GHGFSJD · Answer

Houu je ne sais comment faire !!

mortalino · Answer

F1
tape variable ou Dim ou Public

@++

le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA

GHGFSJD · Answer

Heu oui mais bon la je ne sais pas ou commencer , mon WININET.bas ce trouve ici lien et donc avec ce code j'aimerai changer le port de connection du HTTP a partir de ma form.
MERCI A VOUS

GHGFSJD · Answer

Ah oui bien sur j'ai deja essayer le numero de port HTTP du fichier mais rien a faire la connection ce fait toujours sur le port 80

Scoubi7 · Answer

Je sais que ça n'a pas grand chose à voir avec le post ou le site, hormis wininet.dll...

Mais, comme je suis entrain de customizer l'ensemble de mon XP et que vous avez l'air de bien connaître wininet.dll...
Pouvez-vous me dire à quoi correspond cet icône , que personnellement je n'ais jamais vu avant, pour que je puisse le personnaliser ?

Merci....

WININET.DLL

11 réponses

Votre réponse

Discussions similaires