Internet Security Components - COM, ActiveX and .NET

Can't Telnet to Cisco equipment - WeOnlyDo Discussion board

Linear

Hello everyone,

I'm trying to build a simple script in VB Script that will log in to Telnet-enabled Cisco routers and switches. Here is my script:
---------------

Set wodssh1 = WScript.CreateObject( WeOnlyDo.wodSSHCom.1 )

wodSSH1.Port = 23
wodSSH1.Timeout = 10
wodSSH1.Protocol = 1 'Telnet
wodSSH1.Blocking = 1 'True
wodSSH1.HostName = IP
wodSSH1.Login = USER
wodSSH1.Password = PASS

wodSSH1.connect

wodssh1.execute show ver & vbcrlf, --More--

wscript.echo(wodssh1.receive)

wodssh1.disconnect
-----------------

The problem is, the script hangs at the wodssh1.receive call. When I capture packets, I see that the raw Telnet data (user, pass, and command) is being sent, but nothing ever gets returned to my script to echo. It just waits. Also, when I modify my script to use the PEEK method, nothing ever gets returned.

Help!

Thanks,

Johnny [:sad:]

locked

2587 views

Hi Johnny,

Please try something like this:
[code]Set wodssh1 = WScript.CreateObject( WeOnlyDo.wodSSHCom.1 )

wodSSH1.Protocol = 1 'Telnet
wodSSH1.Port = 23 ' first Protocol then Port Property
wodSSH1.Timeout = 10
wodSSH1.Blocking = 1 'True
wodSSH1.HostName = IP
wodSSH1.Login = USER
wodSSH1.Password = PASS
wodSSH1.Connect

wodSSH1.WaitFor ( regex:[$ #>] $ ) 'wait for prompt
wodSSH1.DataReady = 0
Wscript.Echo(wodSSH1.Execute( show ver + vbLf, regex:[$ #>] $ )) 'execute command and receive it in message box
wodSSH1.Disconnect[/code]
Let us know how it goes.

Regards,
Drazen

locked

2634 views

Hi Johnny,

Please try something like this:
[code]Set wodssh1 = WScript.CreateObject( WeOnlyDo.wodSSHCom.1 )

wodSSH1.Protocol = 1 'Telnet
wodSSH1.Port = 23 ' first Protocol then Port Property
wodSSH1.Timeout = 10
wodSSH1.Blocking = 1 'True
wodSSH1.HostName = IP
wodSSH1.Login = USER
wodSSH1.Password = PASS
wodSSH1.Connect

wodSSH1.WaitFor ( regex:[$ #>] $ ) 'wait for prompt
wodSSH1.DataReady = 0
Wscript.Echo(wodSSH1.Execute( show ver + vbLf, regex:[$ #>] $ )) 'execute command and receive it in message box
wodSSH1.Disconnect[/code]
Let us know how it goes.

Regards,
Drazen

Hello again,

I tried your code and it worked with a little tweaking of the regexes. Thanks. However, I'm encountering the dreaded --More-- Cisco prompt when I run the command. I was wondering how to use the Peek method, since I could write a loop that looks for the --More-- prompt and deal with it accordingly, since I don't know how many times I'll get the --More-- prompt when I run a command. It might be once, or it might be twenty times. I don't have the access priveleges to do the term 0 command.

I've tried Peek ing at the buffer while the script is running, but it never returns any data.

Any ideas?

Thanks,

Johnny.

locked

2608 views

Johnny,

I think this should work:

[code]
...
wodSSH1.StripANSI = True
wodSSH1.Connect

Dim a,b,wodSSH1

wodSSH1.WaitFor ( regex:[$ #>] $ )
wodSSH1.DataReady = 0
wodSSH1.Send ls -al | more + vbLf
b = CStr(wodSSH1.WaitFor( --More-- ))

On Error Resume Next
wodSSH1.Timeout = 10
Do
wodSSH1.Send ( + vbLf)
a = CStr(wodSSH1.WaitFor( --More-- ))

If Err.Number <> 0 Then
a =
End If
b = b + a
Loop Until Len(a) = 0
b = b + wodSSH1.Receive 'receive rest
Wscript.Echo(b)
[/code]

Let us know how it goes.

Drazen

locked

2662 views

Hello again,

YAHOOOOOOOOOOOOOOOOOOOOOOOOOO! IT WORKED!!!!!!!!!!!!!!!!!!!!

Here's the entire script, which will be of use to many of us who are trying to Telnet to Cisco equipment:

----------------
Set wodssh1 = WScript.CreateObject( WeOnlyDo.wodSSHCom.1 )

wodSSH1.Protocol = 1 'Telnet
wodSSH1.Port = 23 ' first Protocol then Port Property
wodSSH1.Timeout = 10
wodSSH1.Blocking = 1 'True
wodSSH1.HostName = HOST
wodSSH1.Login = USERID
wodSSH1.Password = PASSWORD

wodSSH1.StripANSI = True
wodSSH1.Connect

Dim a,b,wodSSH1

wodSSH1.WaitFor ( regex:[$ #>]$ )
wodSSH1.DataReady = 0
wodSSH1.Send show interface + vbLf ' Cisco command goes here

b = CStr(wodSSH1.WaitFor( --More-- ))

On Error Resume Next
wodSSH1.Timeout = 10
Do
wodSSH1.Send ( )
a = CStr(wodSSH1.WaitFor( --More-- ))

If Err.Number <> 0 Then
a =
End If

b = b + a
Loop Until Len(a) = 0
b = b + wodSSH1.Receive 'receive rest

wodssh1.send exit & vblf
Wscript.Echo( b )

----------------

Thank you again for your speedy assistance!

Johnny
[:cool:][:cool:][:cool:][:cool:][:cool:]

locked

2623 views

Your customer service was excellent, and I will look at your products in the future for precisely that reason.

Charles Taylor

InterWeave, Inc.

Don't be fooled by the cost, it's value and quality far exceeds the price being charged!

Ian D. Mead, author of UltraEdit-32

IDM Computer Solutions

It was no small factor, however, that your support in getting me up and running made me buy from you.

Charles Taylor

InterWeave, Inc.

Thank you for the great customer service ... I am really impressed with the wodSSH ActiveX control.

Andrew Ross

Kiwi Enterprises

Many thanks for your excellent support service. I can see why you have a long list of excellent testimonials on your website.

Martyn Walker

Batmore Technolgies

We have recently completed a large 1200+ location project where reliable Telnet and SSH connectivity was required. wodSSH worked flawlessly and allowed our staff to complete our project ontime and within budget.

James Sievers

Harbor Technologies

It was no small factor, however, that your support in getting me up and running made me buy from you.

Charles Taylor

InterWeave, Inc.

Your component works really great. With minor effort I have been able to convert my delphi application...

Gilles Hache

Cisco Systems Inc.

You made it so simple for us to integrate SFTP - a technology we had little experience with...

Zack Menendez

Mapframe Corporation

The SFTP ocx is one of the finest pieces of programming I have seen. It worked out of the box...

Kenneth R. Robinette

InterSoft International

Product groups

Support

Can't Telnet to Cisco equipment (wodSSH / wodSSH.NET)

Re: Can't Telnet to Cisco equipment

Re: Can't Telnet to Cisco equipment

Re: Cant Telnet to Cisco equipment

Re: Cant Telnet to Cisco equipment

About

Contact