[Delphi] met msn verbinden, en commando's geven

[Verwijderd]

Hoi.,

Ik heb een verbinding gemaakt via ClientSocket naar de msn server, op de juiste poort, de verbinding is succesvol tot stand gebracht, en dan krijgen we het, we moeten commando's geven.

Ik heb die tutorial gelezen, dus ik moest het volgende commando verzenden!

VER 0 MSNP5 MSNP4 CVRO maar hij geeft niks terug, en na een tijd, verbreekt ie de verbinding, timeout!!!

wat doed ik fout???

edit:

kan het er aan liggen dat ik achter een vuurmuur lig?? freesco server?? moet ik eerst die poort forwarden??

[Verwijderd]

waar is iedereen toch op het forum, er worden haast geen topics of replys geplaatst, slapen jullie ?? of ligt het aan GOT ? :?:? Maja, ik wacht wel hoor dus dit is geen schop poging, was gewoon een vraag

[MaxxRide]

Viel mij net ook al op dat er op het moment nog erg weinig gebeurd.

[Verwijderd]

Op zaterdag 27 oktober 2001 15:25 schreef Pinda het volgende:
Viel mij net ook al op dat er op het moment nog erg weinig gebeurd.

jah, das lastig, maja , we zullen moeten wachten

[MaxxRide]

Oh ja, ik zie zo het de fout niet
Maar ja ben er ook niet mee bezig met het hele MSN gebeuren!

[Verwijderd]

stuur je er wel een enter achter aan?

[tomato]

En een juiste enter, daar schijnen mensen ook nog wel eens problemen mee te hebben _{(mbravenboer)}

[Verwijderd]

Op Saturday 27 October 2001 16:15 schreef tomato het volgende:
En een juiste enter, daar schijnen mensen ook nog wel eens problemen mee te hebben _{(mbravenboer)}

Kan iemand me dan vertellen welke enter het is? ? ik heb daar geen rekening mee gehouden jah
:+:+:+

[Verwijderd]

Stoel: Kan iemand me dan vertellen welke enter het is?

Deze enter: \r\n

[douweh]

Oftewel in delphi

Socket.SendText('commando'#13#10);

JAWEL RUUD!
douwe is er ook achter

[Verwijderd]

Op Sunday 28 October 2001 11:24 schreef douweh het volgende:
Oftewel in delphi

Socket.SendText('commando'#13#10);

JAWEL RUUD!
douwe is er ook achter

Tx douwe, maar nu is het probleem dat ik als ik met de tweede server ben verbonden ,. dat ie me er na een tijdje uit flikkerd:
hij zegt dan dit:

Client: VER 3 MSNP5 MSNP4 CVRO
Server: VER 3 MSNP5 MSNP4

Client: INF 4
Server: INF 4 MD5

Client: USR 5 MD5 I [e-mail]
Server: XFR 5 NS 64.4.13.38:1863 0


maar hij zou eigenlijk dit moeten zeggen aan het eind:

Server: USR 5 MD5 S 989048851.1851137130

Dat doed ie dus niet, en hij verbreekt de verbinding, wat doe ik fout, wie kan me helpen, ik ben met de NS server verbonden!!!

alvast bedankt


ps

log van de eerste server:


Client: VER 0 MSNP5 MSNP4 CVRO
Server: VER 0 MSNP5 MSNP4

Client: INF 1
Server: INF 1 MD5

Client: USR 2 MD5 I [e-mail]
Server: XFR 2 NS 64.4.13.38:1863 0


heeel vaag!!

[MaxxRide]

Ik ken het protocol echt niet, maar moet je niet een wachtwoord opgeven???

[kvdveer]

Probeer het eens zo: (zonder overloggen...)
Server: 64.4.13.91:1863

code:

Client: VER 17 MSNP7 MSNP6 MSNP5 MSNP4 CVR0
Server: VER 17 MSNP7 MSNP6 MSNP5 MSNP4 CVR0
Client: INF 18
Server: INF 18 MD5
Client: USR 19 MD5 I ********@hotmail.com
Server: USR 19 MD5 S 1004272985.1697038517
Client: USR 20 MD5 S a19b86d69e1cc78e6e868999687c88d6
Server: USR 20 OK *******@hotmail.com koert%20(u) 1
Client: SYN 21 511
Server: MSG Hotmail Hotmail 360
      MIME-Version: 1.0
      Content-Type: text/x-msmsgsprofile; charset=UTF-8
      LoginTime: 1004272987
      EmailEnabled: 1
      MemberIdHigh: 90416
      MemberIdLow: -1978527423
      lang_preference: 1043
      preferredEmail: *******@hotmail.com
      country: NL
      PostalCode: 
      Gender: M
      Kid:0
      Age: 69
      sid: 507
      kv: 2
      MSPAuth: 2AAAAAAAAD6Sq4gjIa5K9NgAZ*O*ge!lKGmJcVGurr7jdDs7QKrXGD4A$$
Server: SYN 21 511

[Verwijderd]

het lukt me nu wel, maar hoe kan ik dit nu allemaal laten automatiseren?? dus dat het automatisch loopt, ik moet een soort erregi hebben, net als php, dat ik dit kan dan

if Command = 'USR 6 OK (*.?)@hotmail.com (.*?)'
dat ik het er dus kan uitfilteren, !!

[elnino]

Op zaterdag 28 oktober 2001 13:50 schreef Stoel het volgende:
het lukt me nu wel, maar hoe kan ik dit nu allemaal laten automatiseren?? dus dat het automatisch loopt, ik moet een soort erregi hebben, net als php, dat ik dit kan dan

if Command = 'USR 6 OK (*.?)@hotmail.com (.*?)'
dat ik het er dus kan uitfilteren, !!

Delphi kent (geloof ik) niet echt regexpen, maar ik denk dat Delphi wel functies heeft om met strings te werken (ik ben geen delphikenner), zoals VB dat heeft met mid, instr etc. Op http://www.geocities.com/venky_dude/msn.htm vind je wat broncode om dit te kunnen doen in VB (incl. project). Die kan je misschien naar Delphi porten.

offtopic: douweh: je spelletje in je sig doet het helaas niet. Ik krijg een foutmelding 'font not found'...

offtopic: weet iemand wanneer wasp (een projectje van o.a. wasigh en andere tweakers) klaar is!?

[kvdveer]

O ja...
Tik eens in de search 'MSN spy'... Misschien vind je nog iets leuks...