Discussion :

[horneth]

Bonjour, j'aurais voulu savoir s'il était possible de se logger automatiquement à un site en mettant le login et le mot de passe dans le code, sans passer par un navigateur, et s'il fallait rajouter un controle (et si oui lequel? ).

Merci d'avance de votre aide.

Horneth

[zazaraignée]

Salut

J'imagine que c'est possible, mais comment, faudrait voir... Je n'ai jamais fait moi-même.

Mais je m'interroge: Il me semble que ton application manquera à la fois de transparence et de flexibilité. J'explique:

• Comment feras-tu pour te logger sur un autre site?
• Et si ton site change d'adresse?
• Pour la maintenance... c'est pas l'idéal, il me semble.

P.S. Au fait, bienvenue sur Développez!

[horneth]

Salut

D'abord merci de t'être penchée sur mon problème

Pour le premier point en ce qui me concerne c'est pas bien grave puisque je n'ai besoin de me logger qu'à un seul site précis.

Pour le second point c'est vrai que c'est pas très pratique mais ca pourrait peut-être s'arranger en demendant à l'utilisateur de spécifier l'adresse.

Pour la maintenance je vois pas très bien ce que tu veux dire

J'ai aussi une autre question : Comment est-ce qu'on peut faire pour télécharger un fichier depuis internet en spécifiant l'URL du fichier? mais il vaut peut-être mieux que je crée un autre sujet non?

P.S : Merci

[zazaraignée]

Salut

Pour préciser ce que je voulais dire par maintenance: Quand un programme est susseptible de servir à plusieurs, il est aussi sujet à évoluer, donc à être modifié. Ça s'appelle la maintenance.

Pour ta seconde question, il vaudrait mieux faire un post distinct, afin d'éviter toute embiguïté sur les réponses.

[jmfmarques]

Oui, tu dois créer un autre sujet pour ta 2ème question...

En ce qui concerne la première :

voilà un exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 
Private 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 Long
 
Private Sub Frame1_Click()
  ShellExecute 0, vbNullString, "http://fr.f351.mail.yahoo.com/ym/login?.rand=71jl1leo9u1hj", vbNullString, vbNullString, vbNormalFocus
  patience
  depart = Timer
    Do While Timer < depart + 10
    DoEvents
  Loop
  For i = 1 To 2
    SendKeys "nom_utilisateur", True
    SendKeys "{TAB}"
    SendKeys "mot_de_passe"
    SendKeys "{ENTER}"
  Next i
  End
End Sub
Private Sub patience()
  With Label1
    .Top = Frame2.Top
    .AutoSize = True
    .FontSize = 24
    .Caption = "un peu de patience," & vbCrLf & " s'il te plait..."
    .ForeColor = vbRed
    End With
 End Sub

Mais il faudra bien que tu aies un accès internet ouvert...

tu pourrais faire quelque chose de similaire à ceci (avec Wanadoo) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Form_Activate()
    retval = Shell("C:\Program Files\Wanadoo\EspaceWanadoo.exe", 1)
 End Sub

[horneth]

Ok merci je vais tester.