Solved

Batch Hyper Terminal

Posted on 2004-09-13
3
1,224 Views
Last Modified: 2012-05-05
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
0
Comment
Question by:SynsealIT
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
3 Comments
 
LVL 5

Accepted Solution

by:
kemp_a earned 50 total points
ID: 12186774
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

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Displaying an arrayList in a listView using the default adapter is rarely the best solution. To get full control of your display data, and to be able to refresh it after editing, requires the use of a custom adapter.
Although it can be difficult to imagine, someday your child will have a career of his or her own. He or she will likely start a family, buy a home and start having their own children. So, while being a kid is still extremely important, it’s also …
Viewers will learn how to properly install Eclipse with the necessary JDK, and will take a look at an introductory Java program. Download Eclipse installation zip file: Extract files from zip file: Download and install JDK 8: Open Eclipse and …

739 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question