Type variable string as text VBS

Question

I'm new to VBS, just trying to figure out how I can run a script which prompts the user for input, & then types that result as part of a sentence?

I'm using WshShell.SendKeys as I want the script to be flexible & able to enter the text into different programs, would there be a way to have this type something that was entered into an InputBox?

Thanks!

BoffinBrain · Accepted Answer · 2017-07-18 15:18:18Z

2

This is a very simple example of how to get InputBox to take your input, then send the keys to a command prompt. I think you can work out how to adapt this for any other program pretty easily.

Option Explicit

Dim a
a = InputBox("Enter your name", "Example")

Dim sh
Set sh = WScript.CreateObject("WScript.Shell")
sh.Run "cmd"
WScript.Sleep 200 
sh.AppActivate "C:\Windows\system32\cmd.exe" 
WScript.Sleep 200 
sh.SendKeys "echo Hello " & a & "!"
sh.SendKeys "{ENTER}"

When you run this and enter the word "CrowStorm", CMD will open and echo the sentence "Hello CrowStorm!"

answered Jul 18, 2017 at 15:18

BoffinBrain

6,5856 gold badges35 silver badges59 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

Epic Gaming 2 · Accepted Answer · 2023-03-24 19:10:35Z

0

This would work if you were trying to put this into notepad:

Option Explicit
    Dim WshShell,input
    Set WshShell =CreateObject("WScript.Shell")
    input = InputBox("Enter your name", "Example")
    WshShell.Run("notepad")
    WScript.Sleep 200 
    Wshshell.SendKeys "Hello " & input & "!"
    WshShell.SendKeys "{ENTER}"

edited Mar 24, 2023 at 19:10

answered Mar 24, 2023 at 19:10

Epic Gaming 2

851 gold badge1 silver badge5 bronze badges

Collectives™ on Stack Overflow

Type variable string as text VBS

2 Answers 2

Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related