|
Poslao: 19 Jul 2006 21:48
|
offline
- Pridružio: 01 Nov 2005
- Poruke: 43
- Gde živiš: Čepin
|
Pozdrav imam jedan problem s getdata funkcijom
najme imam client i server stranu na client strani se nalazi
winsock.send data "nick|ip|tekst"
a na server strani
dim data as string
winsock(0).getdata data
Dim Niz() As String
Niz = Split(data, "|")
Niz(0) = nick
Niz(1) = ip
Niz(2) = tekst
te kad se spojim na server i kliknem dugme šalji podatke izbaci mi na serveru ovaj error
run-time error '40006':
Wrong protocol or connection state for the requested transactionor request
zna li itko u čemu je problem ??
Dopuna: 19 Jul 2006 16:28
e da sad sam se sjetio podcrtava mi ovaj kod kao da nevalja
winsock.getdata data
Dopuna: 19 Jul 2006 22:48
evo zapakiro sam chat, server i client možda netkom bolje pomaže tak da skonta u čem je problem evo linka [Link mogu videti samo ulogovani korisnici]
u client verziji sam dodo bezveze sam jedno dugme pokraj connecta vidit cete koje bi trebalo posat nick ip i tekst serveru a server to ispisat e tu nastaje error a pogledajte sami. a čini mi se sve ok neznam zast neradi 
|
|
|
|
|
Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
|
|
|
Poslao: 20 Jul 2006 12:50
|
offline
- biser-x
- Počasni građanin
- Pridružio: 28 Jun 2004
- Poruke: 990
- Gde živiš: Kucura
|
Trenutno ne mogu da proverim da li je ovo sto govorim tacno, posto mi VB ne radi bas kako treba. Ali kada saljes podatke ovako:
frmMain.Winsock.SendData "nick|tekst|ip"
Onda si poslao bas "nick|tekst|ip", a da bi ti ubacio neciji nick u u ovo gore uradio ovako:
frmMain.Winsock.SendData "" & nick & "|" & tekst & "|" & ip & ""
Mozda moze i ovako:
frmMain.Winsock.SendData nick & "|" & tekst & "|" & ip
To je prvo sto sam primetio..
Jos jedna greska:
dim data as string
winsock(0).getdata data
Dim Niz() As String
Niz = Split(data, "|")
Niz(0) = nick
Niz(1) = ip
Niz(2) = tekst
Ako oces da string nick ima vrednost Niz(0) oinda radis ovako:
nick = Niz(0)
Inace ako uradis po tvome onda pokusavas da ubacis u Niz(0) vrednost nick. Nadam se da sam pojasnio neke stvari...
---Edit---
Podcrtava ti ovo:
winsock.getdata data
ili ovo:
winsock(0).getdata data
??
Posto nije isto sa onom nulom i bez nje.
|
|
|
|
|
|
|
Poslao: 20 Jul 2006 13:56
|
offline
- Pridružio: 01 Nov 2005
- Poruke: 43
- Gde živiš: Čepin
|
probat cu isprobat sad. pa javim dali ce radit a error mi je javljo s
winsock(0).getdata data
Dopuna: 20 Jul 2006 14:56
opet isto probo sam oba dva koda za send i prepravio sam onaj niz. dodo sam još komandu za provjeru dali je spojen client na server i kaže da je
|
|
|
|
|
|
|
Poslao: 20 Jul 2006 15:00
|
offline
- biser-x
- Počasni građanin
- Pridružio: 28 Jun 2004
- Poruke: 990
- Gde živiš: Kucura
|
Winsock(Index).GetData data
Ovako.
Private Sub Command1_Click()
....
..tate = sckConnected Then
frmMain.Winsock.SendData "" & nick & "|" & tekst & "|" & ip & ""
..
....
Private Sub Command2_Click()
....
..k.LocalIP
frmMain.Winsock.SendData "" & nick & "|" & tekst & "|" & ip & ""
End S...
Ako ne bude radilo, saljem ti prepravljeni projekat.
|
|
|
|
|
|
|
Poslao: 20 Jul 2006 15:09
|
offline
- Pridružio: 01 Nov 2005
- Poruke: 43
- Gde živiš: Čepin
|
dodo sam sad na server ovak kod If Winsock(0).State <> sckConnected Then
'notify user
MsgBox "Not Connected!"
isak kad kliknem na serveru da šalje podatke.. kaže mi Not connect
a na client strani isto imam tu funkciju koja govori da je spojena na server.
probat ču sad dodat tvoj zadnji kod
Dopuna: 20 Jul 2006 16:09
heheh koja greška a jesam glup
umijesto Winsock(0).GetData data
sam je trebalo ići Winsock(Index).GetData data
sad radi hvala biseru
|
|
|
|
|
|
|
Poslao: 21 Jul 2006 10:00
|
|
|
ajd ti meni reci koji ti port koristis prilikom konektovanja? Taj kod koji ti imas sam ti ja poslao ako se ne varam. Ja sam ga napisao i kod mene je odlicno radio. Sta si prepravljao?
|
|
|
|
|
|
|
Poslao: 21 Jul 2006 13:36
|
offline
- Pridružio: 01 Nov 2005
- Poruke: 43
- Gde živiš: Čepin
|
ma sam sam trebo stavit ovo
Winsock(Index).GetData data
umijesto
Winsock(0).GetData data
Dopuna: 21 Jul 2006 14:36
sad sve radi nego imam jedno pitanje koristim richtextbox i kad pošaljem neki bold ili italic text. tekst mi stigne običan ko da nije bio podebljan. kako to riješit
|
|
|
|
|
|
|
Poslao: 22 Jul 2006 07:53
|
|
|
pa winsock salje samo string a on je skup karaktera i to sto je nesto boldovano ne znaci nista. Ja bih to rijesio tako sto bih poslije stringa dodavao karakteristike tj da li je boldovan, velicina fonta i tako dalje npr
winsock.senddata "0|nick|neki tekst|bold|italic|justify|12"
ovo ti je samo prijedlog
|
|
|
|
|
|
