terima kasih nich sblm atas masukan rekan milis ttg remote program yg
pernah saya tanyakan. Tapi kemudian ada persoalaan yg mucul dari
proses clien server tsb. Ilustrasinya begini client1 mengirim data
angka 1 ke server program berjalan baik, kemudian client2 mengirim
data angka 2 program berjalan baik. Tapi error data mismatch muncul
ketika client1 mencoba mengirim data lagi ke server. Program yg buat sbb:
server : dim datainput as string
         Sub Winsock1_dataarrival(index as integer, byval..)
          winsock1(index).getdata datainput, vbstring
        if datainput=1 then  option1.setfocus      'no.10
         elseif datainput = 2 then option2.setfocus
        end if
client 1-dstnya : dim unit,pesan as string
                   sub form load
                   unit=inputbox("unit ke") 'ditulis unit ke 1 atau 2
                    text1.text=unit
                   end sub
                sub command1_click
                pesan=text1.text
                winsock1.senddata pesan
                end sub
error mismatch muncul pada no.10. Terima kasih sebelumnya atas masukannya





Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer
 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/Programmer-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/
 


Kirim email ke