Poslao: 05 Nov 2005 22:54
|
offline
- Pridružio: 01 Nov 2005
- Poruke: 43
- Gde živiš: Čepin
|
pozz jel zna netko otkloniti ovaj sitan problem s winsockom imam naredbu Winsock1.RemoteHost = i imam formu za ip i kako to povezati ja sam probo ovo i nije radilo Winsock1.RemoteHost = ip.Text
ali neradi
|
|
|
Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
|
|
Poslao: 06 Nov 2005 00:58
|
offline
- snoop
- Genghis Khan
- Pridružio: 18 Apr 2003
- Poruke: 8134
- Gde živiš: U kesici gumenih bombona...
|
Davno sam radio sa WinSock-om pa i sa samim VBom pa sam zaboravio, ali pogledaj ovaj link http://www.developerfusion.co.uk/show/1845/1/ mozda moze da pomogne.
Uglavnom, RemoteHost je IP ili ime racunara (server) na kojeg se kacis (client).
Kako nece da radi? Prijavi gresku ili nista ne prijavi, ali i dalje nece da radi?
|
|
|
|
Poslao: 06 Nov 2005 07:55
|
offline
- Pridružio: 01 Nov 2005
- Poruke: 43
- Gde živiš: Čepin
|
Javi mi ovo kad kliknem da se spoji Run time Error '424':
Object required a ovo je kod u ulaz.frm
Private UserName As String
Private Sub start_Click()
If Not txtUserName.Text = "" And Not ip.Text = "" Then
UserName = txtUserName.Text
Winsock1.Connect ip.Text, 10101
Chat.Show
Timer1.Interval = 300
Else
MsgBox "Nisi unio Nick ili ip adresu", 0, "Stop..."
End If
End Sub
a u chat.frm još nisam stavljo nikakve kodove za sada
|
|
|
|
Poslao: 06 Nov 2005 13:54
|
offline
- snoop
- Genghis Khan
- Pridružio: 18 Apr 2003
- Poruke: 8134
- Gde živiš: U kesici gumenih bombona...
|
Server treba da osluskuje za dolazece konekcije na odredjenom portu i IP adresi. Ne znam kako je to kod tebe.
Sam ovaj code bi trebao biti OK.
Pogledaj ovaj link, tamo ima sve lepo objasnjenjo kako se pravi klijent i kako se pravi server. Pomocice ti 100%.
http://www.developerfusion.co.uk/show/1845/1/
|
|
|
|
Poslao: 06 Feb 2006 14:37
|
|
Evo ukratko:
Kod na serverovoj strani
Public sub Form _Load
With Winsock1
.Localport= 1864
.Listen
End With
End Sub
A na klijent strani
With Winsock1
.RemotePort= 1864
.RemoteHost=text1.text
.Connect
End With
Ranije sam napravio komletan chat sa listom korisnika, sa mogucnoscu davanja OP-ova, Kick, Ban,.... samo ne mogu da nadjem na kom sam CD-u ostavio kod. I naravno server je prihvatao neograniceno konekcija koristeci "index"
Dopuna: 06 Feb 2006 14:37
Evo nasao sam neku moju prastaru verziju tog programa, valjda ce ti moci pomoci
https://www.mycity.rs/must-login.png
U njemu nema mnogo opcija ali ces vidjeti kako sam rijesio konekciju jedan na prema auuuuuuuu
|
|
|
|
Poslao: 06 Feb 2006 22:32
|
offline
- Pridružio: 01 Nov 2005
- Poruke: 43
- Gde živiš: Čepin
|
Skinio sam i pokrenio sam i serveri klijent verziju ali neče pokazati server kojeg sam pokrenio neznam jel to zato što sam pokrenio to dvoje na jednom kompu il nešt drugo
|
|
|
|
Poslao: 06 Feb 2006 23:14
|
|
blackone ::Skinio sam i pokrenio sam i serveri klijent verziju ali neče pokazati server kojeg sam pokrenio neznam jel to zato što sam pokrenio to dvoje na jednom kompu il nešt drugo
Sta si mislio kada si rekao nece pokazati server? Nije ti prikazan server forma? Da li ti javlja kakvu gresku? Napominjem da moras imati mswinsck.ocx u c:\windows\system32 ako nemas skini je sa neta i tamo je kopiraj
Moze raditi oboje na istom kompu. Tako sam i ja pravio isto. Vidjecu ovih dana da sjednem i da ti napisem kostur za taj program u VB6
Mozda sam u toj verziji nesto zaboravio. Mada mislim da radi kako treba.
Dopuna: 06 Feb 2006 23:14
Imas li FireWall? Mozda ga on sputava. Takodje svaki AV prepozna program kao Trojanca jer otvara neregistrovan port na kompu
|
|
|
|
Poslao: 09 Feb 2006 11:45
|
offline
- Pridružio: 01 Nov 2005
- Poruke: 43
- Gde živiš: Čepin
|
moguče je da je firewall probat ču navečer sad moram iči nejavlja mi nikakvu grešku
Dopuna: 09 Feb 2006 11:45
isključio sam bio firewall i opet ništa a av nekoristim
|
|
|
|