求助：用vb做一个程序登陆某个ip执行操作 - 编程论坛

#2

lianyicq2015-03-30 09:22

linux没接触过。能不能用telnet终端运行VB脚本来登录linux，并执行删除、重启命令。

#3

luohaiping32015-03-30 18:20

回复 2楼 lianyicq

因为我不太懂VB，只是知道window下运行里面这样操作的步骤，所以想做成vb程序只要输入ip，然后点击按钮就可以一次性执行完这些步骤，省得每次这样输入太麻烦

#4

lianyicq2015-03-31 09:21

我没有测试条件，就帮你搜了下。有两个办法，一个是用VBS，例子如下：
telnet命令：
telnet members. 80
GET /dyndns/update?system=dyndns&hostname=myDB. HTTP/1.1
Host: members.
Authorization: Basic bXlEQjoxMjM0NTY=

VBS脚本：
--------------------------------------------------------------------------------------
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run "telnet members. 80"
WScript.Sleep(1200)
WshShell.SendKeys "GET /dyndns/update?system=dyndns&hostname=myDB. HTTP/1.1{enter}"
WScript.Sleep(500)
WshShell.SendKeys "Host: members.{enter}"
WScript.Sleep(500)
WshShell.SendKeys "Authorization: Basic bXlEQjoxMjM0NTY={enter}"
WScript.Sleep(500)
WshShell.SendKeys "{enter}"

第二个用VB的winsock控件，例子也很简单
http://

#5

luohaiping32015-03-31 17:56

回复 4楼 lianyicq

用VB的winsock控件怎么做，我不太懂，能不能贴代码看看，你那测试不了没关系，我自己看看能不能调试下，谢谢！

#6

lianyicq2015-04-01 09:34

回复 5楼 luohaiping3

资料网上很多，自己先试winsock的简单连接和收发，根据接收到的字符串再做改进。

只有本站会员才能查看附件，请登录

#7

luohaiping32015-04-01 10:02

回复 6楼 lianyicq

多谢大神，你这个很好用啊，顺便在问下连续发送多条数据可以这样吗
telnet.SendData txtSend.Text & vbCrLf
telnet.SendData txtSend.Text & vbCrLf
。。。。

[ 本帖最后由 luohaiping3 于 2015-4-1 10:12 编辑 ]

#8

lianyicq2015-04-01 10:20

这也就是一个WINSCOK控件的简单例子。
当然可以连续发，不过每条之前应该用回显来判断发送时机。

#9

luohaiping32015-04-01 10:45

回复 8楼 lianyicq

怎么连续发，还请帮帮忙，我是实在不太懂VB，语法都还不太清楚

#10

lianyicq2015-04-01 10:48

思路就是这样了，自己尝试做做，有具体问题再说。

#11

luohaiping32015-04-01 15:58

回复 10楼 lianyicq

还是不清楚怎么发送多条数据，希望能贴代码，谢谢！