Wah kalo itu saya blm pernah nyoba, saya cuma bikin koneksi peer to peer. Kal gak salah sih yg bedainnya dari winsocksrv(intMax).LocalPort = 0 makannya setiap ada yg konek intMax = intMax + 1. CMIIW deh karena saya jgua baru coba2
----- Original Message ----- From: Laemanz To: [email protected] Sent: Monday, February 13, 2006 11:11 AM Subject: Re: [indoprog-vb] winsock error kalo kasusnya data yang masuk ke winsock bercampur dengan data yang lain solusinya gmana ? misalnya seharusnya format data yang masuk adalah 500,'4/14/2006 11:00:00 AM','COMPUTERID001' namun karena data yang masuk berbarengan karena kebetulan request data dari komputer client berbarengan sehingga data yg masuk berubah tidak sesuai formatnya contoh: 500,'4/14/2006 11:00:00 AM200','COMPUTERID001' bagaimana caranya agar data yg masuk tidak tercampur ? katanya sih bugnya si winsock vb gmna tuh vbQuest wrote: > coba seperti ini, declare dulu intMax as integer > > Private Sub winsocksrv_ConnectionRequest(Index As Integer, ByVal requestID As Long) > If Index = 0 Then > intMax = intMax + 1 > Load tcpserver(intMax) > winsocksrv(intMax).LocalPort = 0 > winsocksrv(intMax).Accept requestID > End If > End Sub > > > ----- Original Message ----- > From: caringinblk > To: [email protected] > Sent: Friday, February 10, 2006 7:47 PM > Subject: [indoprog-vb] winsock error > > > kebetulan saya newbies di vb jd kurang begitu paham ttg winsock...Tapi > saya coba menngunakannya ternyata error tuh,..saya coba program > sederhana sbb: > > client = local port:13480 ; remote host :10.21.1.56; remote port:13480 > server = local port:13480 > nilai2 local port& remote port adalah nilai contoh pdbuku yg saya > baca...(untuk port yg sebenarnya dari pc-pc, saya tdk tahu (gimana > caranya mengetahui nilai port ya?)) > > > client: > sub command1_click() > winsockcl.connect > end sub > > server: > sub winsocksrv_conectionrequest(byval requestid as long) > winsocksrv(intMax).LocalPort = 0 > winsocksrv.accept requestid > end sub > > ternyata pada sisi server muncul error 40020 bahwa koneksi salah pada > perintah accept reqid... > pemecahannya gima ya..... > > > > > > > Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED] > > Ikuti juga forum diskusi VB.net dengan > mengirim email kosong ke [EMAIL PROTECTED] > > > > > > SPONSORED LINKS Computer internet security Computer internet business Computer internet access > Computer internet privacy securities Computer internet help Computer internet connection > > > ------------------------------------------------------------------------------ > YAHOO! GROUPS LINKS > > a.. Visit your group "indoprog-vb" on the web. > > b.. To unsubscribe from this group, send an email to: > [EMAIL PROTECTED] > > c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service. > > > Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED] Ikuti juga forum diskusi VB.net dengan mengirim email kosong ke [EMAIL PROTECTED] SPONSORED LINKS Computer internet security Computer internet business Computer internet access Computer internet privacy securities Computer internet help Computer internet connection ------------------------------------------------------------------------------ YAHOO! GROUPS LINKS a.. Visit your group "indoprog-vb" on the web. b.. To unsubscribe from this group, send an email to: [EMAIL PROTECTED] c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service. ------------------------------------------------------------------------------ [Non-text portions of this message have been removed] Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED] Ikuti juga forum diskusi VB.net dengan mengirim email kosong ke [EMAIL PROTECTED] Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/indoprog-vb/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
