Caramail enter (caraproutage...)

1/5 (7 avis)

Vue 4 493 fois - Téléchargée 163 fois

Description

Se programme a été fait car je voulait voir si en utilisant pas shell sa donnait la même impression quand ont se logg...Malheureusement non! Et oui , quand on arrive sur sa boîte au lettre on n'arrive plus a aller sur le t'chatte via un WebBrowser...Pourquoi?! Aucune idée...
L'url pour se logger c'est :
http://auth.caramail.lycos.fr/?membername=&password=

Si vous oulez tester le programme et que vous n'avez pas de boîte caramail . Ne vous inscrivez pas j'ai un pseudo et mot de passe pour vous je vous demanerez de pas le changer si possible...Enfin bref voila le pseudo et la mot de passe
Pseudo : je-la-mrd
Mot de passe : cool

Voilà pour les expliquation.

Il vous faut deux forms

Dans la from1 il vous faut : une Command1 et un Text1 et un Text2
Pour la form2 il vous faut : Un WebBrowser1

Si vous voulez une capture pas de problème...

Source / Exemple :


'Dans la form1.Show :
Private Sub Command1_Click()
Form2.WebBrowser1.Navigate "http://auth.caramail.lycos.fr/?membername=" & Text1.Text & "&password=" & Text2.Text ' Ici on se log omme je l'ai dit dans la présentarion , c'est l'adresse plus les textBox pour se logger.
Form2.Show ' On ouvre la form2.Show
Unload Me ' On ferme cette fernêtre pour que se soit plus bô:)
End Sub

'Pour la form2 maintenant! :

Private Sub Form_Load()
Caption = "CaraProutage : welcom sur cara " + Form1.Text1.Text'on change la caption de la form comme sa sa fai plus beau.
End Sub

Private Sub Command1_Click()
Form1.Show ' on ouvre la form1
Unload me ' on ferme la form2
EndSub

Conclusion :


Il y a surement beaucoup de bug.
Aller visiter www.carabidule.net
C'est une communauter et inscrivez-vous!
++:)

Codes Sources

A voir également

Ajouter un commentaire Commentaires
c00ol
Messages postés
40
Date d'inscription
dimanche 22 décembre 2002
Statut
Membre
Dernière intervention
9 septembre 2007

25 déc. 2004 à 15:04
dégouté dla note:]
c00ol
Messages postés
40
Date d'inscription
dimanche 22 décembre 2002
Statut
Membre
Dernière intervention
9 septembre 2007

26 janv. 2004 à 17:24
On peu aussi ajouter une fonction de Enter dans une TextBox car c chian de devoir kliker sur Entrer...

Le code es de Nix:O) :
Private Sub TextAEnvoyer_KeyDown(KeyCode As Integer, Shift As Integer)
If Not Shift And KeyCode = 13 Then

Command1_Click
KeyCode = 0

End If
End Sub
bubble44
Messages postés
200
Date d'inscription
lundi 10 mars 2003
Statut
Membre
Dernière intervention
3 août 2004

26 janv. 2004 à 15:10
Bon je pensais que tu updaterais ta source avec le bout de code que je t'avais donné a mettre dans form2 :

---

Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)

Dim frmWB As Form2
Set frmWB = New Form2

frmWB.WebBrowser1.RegisterAsBrowser = True
Set ppDisp = frmWB.WebBrowser1.Application
frmWB.Visible = True

End Sub

---

je le passe ici, vbcodeurs interessés pourront donc essayer.
cs_RayBan
Messages postés
17
Date d'inscription
jeudi 24 janvier 2002
Statut
Membre
Dernière intervention
9 juin 2004

26 janv. 2004 à 12:10
Pas mal, sauf que le mot de passe est en clair dans l'URL... Vous allez me dire que dans un formulaire il est aussi en clair, mais il faudrait un soft pour récupérer les trames tcp pour obtenir les données du formulaire...beaucoup moins facile...

Ray

Do more with less... Simply .NET...
bubble44
Messages postés
200
Date d'inscription
lundi 10 mars 2003
Statut
Membre
Dernière intervention
3 août 2004

25 janv. 2004 à 20:10
Sisi on peut arriver a tchatter depuis un webbrowser (lancer l'applet), teste mon client cara vb, et fait le teste CON : dans la partie "Accueil caramail" (2eme onglet) (qui ouvre ta boite mail aussi en webbrowser, essaye de cliquer pour aller tchatter (ce qui te deconnectera du tchat vu que l'on peut pas utiliser 2 comptes principaux en dial).
Mais tu verras que l'applet etait bien lancé hehe, dans la nll mdi child.

http://board.quick-web.com/index.php3?login=tr0piiic

Je t'expliquerais apres ton probleme quand t'auras verifié.
A pluche.
Afficher les 7 commentaires

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.