Winsock / IP vraagje

[XenomX]

Hallo VB'ers


Ik heb een soort Chat programma gemaakt met Winsock heel simpel 1 on 1 maar nu wil ik
het zo hebben dat alleen ik de ip van de ander hoeft te weten zodat hij het ip veld
gewoon leeg kan laten. Is dit mogelijk ? zo ja, hoe ?

Mvg/Bvd, Xenom

 

[blaataap]

Euh dan kan je toch gewoon zorgen dat je server bent met Winsock1.Listen blablabla?

 

[blaataap]

Dit is een project van een kennis van me die me hiermee geleerd heeft met Winsock om te gaan.

[edit]Kromme zin[/edit]

 

[XenomX]

yo

Ja dat zou best kunnen, alleen hoe ? zal nu wel ff <u><strike>kutte</strike></u> ehhh. rommelen. Juist ja

Mvg

 

[XenomX]

ok

zal ff kijken thnx !

MVg

 

[blaataap]

Geen dank.

 

[XenomX]

yo

Als je meer weet hoor ik het graag zal ff verder ku eh rommelen ben zo weer online

Mvg

 

[blaataap]

Dit is alles wat je nodig hebt .

 

[XenomX]

yo

Ah mooi (beetje laat) hij werkt maar...

weet jij ook hoe je aleen 1 persoon een bericht kan sturen wanneer hij een Connection_Request doet ?

Gewoon met Server.SendData (remotehost) ofzo ?

Zodat wanneer iemand connect hij een welkomst bericht krijgt.

Mvg

 

[blaataap]

Dat moet in de Connection_Request sub ja.

 

[XenomX]

ok

zal het ff proberen.

nog een klein vraagje:

als je chattext in een text1.text kom (bijv) dan gaat de schijfbalk niet mee, hij moet dus zegmaar mee gaan naar het nieuwe bericht.

Mvg:thumb:

 

[blaataap]

Maak er gewoon een RichTextBox van en zet dit er dan in:

richtextbox1.selstart = len(richtextbox1.text)

Met een gewone weet ik het zo niet...

 

[XenomX]

ok

gewoon met een TextBox ? of moet ik dan zo'n component toevoegen zodat ik een RichTextBox kan toevoegen ?

Mvg, :thumb:

 

[blaataap]

RichTextBox component toevoegen, meer niet.

 

[XenomX]

ok

ok bedankt :thumb:

 

[XenomX]

huh

Ik ken nergens een component vinden van RichTextBox
hoe heet die ocx ?

Mvg

 

[buick]

ALs het goed is :

Project -> Components en dan in de lijst Microsoft Rich Textbox Control

Nico

Btw de SelStart optie werkt ook bij een gewone textbox

bv Text1.SelStart = Len(Text1.Text)

 

[DENNIS90]

Een gewone Textbox kan ook.

Hallo XenomX,

Rechtsklik op de Toolbox. Klik op Components en vink "Microsoft Rich Textbox Control 6.0 (SP4)"
af. En bevestig je keuze door op OK te klikken.
De naam is richtx32.ocx en het zit in de windows\system32 directory.

Je hoeft niet per sé een Rich texbox gebruiken. Een gewone kan ook.

Groetjes,

Dennis.

 

[DENNIS90]

Download het gezipte file maar.

Hopelijk werkt dit control. Het is voor VB6, maar
misschien kan het ook voor VB5 gebruikt worden.

Succes.

 

[blaataap]

Dennis, dat control heeft iedereen wel... maar goed, je kunt dus het RichTextBox control gebruiken voor unicode berichten (geloof ik) met kleuren en andere lettertype's erin. Dan maak je zogenaamde headers..