Batch Hyper Terminal

Hello all,

I would like to implement some sort of auto updating time batch file for our phone system. The phone system software uses hyperterminal as an interface to poll the external database. All i really need to know is how i go about passing the info from say a batch or text file to hyperterminal, as i know the commands i need to get job done.

Can anyone Help

Best Regards

IT
SynsealITAsked:
Who is Participating?

[Webinar] Streamline your web hosting managementRegister Today

x
 
kemp_aConnect With a Mentor Commented:
Since Hyperterminal doesn't have a scripting language live VB Script then its difficult, could you use a scriptable Telnet client instead? I found one a few months back but forgot what it was called.

Alternatively, you could use VB Script to drive Hyperterminal somethin like the following:

'VBScript Testing Script (c) kemp_a
Const iNormalFocus = 1

Dim arrayRecNum()

' Tracking Script Progress
Set objExplorer = CreateObject("InternetExplorer.Application")
objExplorer.Navigate "about:blank"
objExplorer.ToolBar = 0
objExplorer.StatusBar = 0
objExplorer.Width = 1000
objExplorer.Height = 7500
objExplorer.Left = 25
objExplorer.Top = 25
objExplorer.Visible = 1
' Wait for application to be ready!!!
Do While (objExplorer.Busy)
 Wscript.Sleep 100
Loop

Set objDocument = objExplorer.Document
objDocument.Open
objDocument.Writeln "<html><head><title>Activ Foundation Test Scripts</title></head>"
objDocument.Writeln "<body bgcolor='white'>"
objDocument.Writeln "Connecting to Database <p>"

objDocument.Writeln "This might take several minutes to complete.<p>"
...

objDocument.Writeln "Starting WSH.Shell object<p>"
Set objShell = WScript.CreateObject("WScript.Shell")
objDocument.Writeln "Starting Hosted Application<p>"
objShell.Run """C:\Program Files\Windows NT\hypertrm.exe""", iNormalFocus
objDocument.Writeln "Started " & Wscript.Application & " at " & Time & "<p>"
Wscript.Sleep 1500

objShell.AppActivate "Hyperterminal"
Wscript.Sleep 1500
' Send whatever keys you want to the Hyperterminal window
            objShell.SendKeys "%G"
            Wscript.Sleep 150
            objShell.SendKeys "A"
            Wscript.Sleep 150
            objShell.SendKeys "B"
            Wscript.Sleep 150
            objShell.SendKeys "C"
            Wscript.Sleep 150
            objShell.SendKeys "{TAB}"
            Wscript.Sleep 100
                      objShell.SendKeys "{ENTER}",75
objDocument.Writeln "</table>"

objDocument.Writeln "Finished with selected records.<p>"

objDocument.Writeln "Database Closed."
objDocument.Writeln "</body></HTML>"
Wscript.Sleep 3000
0
All Courses

From novice to tech pro — start learning today.