# Re: how to do --make like telnet program?

Posted by 和林 on January 12, 1999 at 15:10:19:

In Reply to: Re: how to do --make like telnet program? posted by 小吴 on January 12, 1999 at 08:03:47:

: 可以呀! 我以前曾试写过一个简易的版本，的确可以用的。你把你认为有问题的程序放上来让大家帮你看看吧!

Private sub form_load()
winsock1.remotehost=text1.text
winsock1.remoteport=text2.text
winsock1.protocol=scktccprotocal
end sub
Private sub command1_click()
winsock1.connect
end sub
private sub winsock1_dataArrival(Byval bytestotal as long)
dim s as string
winsock1.getdata s
text3.text=s
end sub
private sub text4_keypress(keyasscii as integer)
if keyascii=13 then winsock1.senddata text4.text
end sub
请多多指教!谢谢.

Follow Ups:

- Re: how to do --make like telnet program? 睿舆 15:15:39 1/12/99 (0)
- Re: how to do --make like telnet program? 睿舆 15:14:48 1/12/99 (0)