I'm writing a command that outputs several strings. Some strings are wrapped in parentheses:

Hello (World)

The Advanced Scripting code is this:

SendKeys "Hello " & "(" & "World" & ")"

But when I run the command, the parentheses are missing.

So I tried this instead:

SendKeys "Hello " & Chr$(40) & "World" & Chr$(41)

The result is the same: Hello World vs. Hello (World).

The command works if I substitute SendSystemKeys or SendDragonKeys for SendKeys. But shouldn't it work regardless?

I'm using DPI 15.61.

PG

Remember folks, my comments and this forum are for entertainment value only, please, no wagering or other reliance on the contents herein.  I permit no commercial use of my ideas (whether expressions or embodiments) without my written consent.

Hi Alan!

This question comes up so often (in different flavors) that I decided to dedicate a post to it:
https://www.knowbrainer.com/forums/forum/messageview.cfm?catid=12&threadid=35260&enterthread=y

-Edgar
DPI 15.3, 64-bit Windows 10 Pro, OpenOffice & Office 365, Norton Security, Shure X2U XLR to USB mic adapter with Audio Technica DB135 vocal mic, Asus X299-Deluxe Prime, Intel Core i9-7940X (14 core, 4.3 GHz overclocked to 4.9 GHz), G.SKILL TridentZ Series 64GB (4 x 16GB) DDR4 3333 (PC4 26600) F4-3333C16Q-64GTZ, NVIDIA GIGABYTE GeForce GTX 1060 GV-N1060G1 GAMING-6GD REV 2.0 6GB graphics card with 3 1920x1080 monitors

We are not certain if the following approach will work but KnowBrainer 2017 includes a Paren <dictation> command which will allow you to say Paren <anything you want>. If this sounds good and you are not using KnowBrainer, consider naming your command Paren <dictation>. The script is:

Sub Main
out = " {(}" + ListVar1 + ")"
SendKeys out
End Sub

Change "No" to "Know" w/KnowBrainer 2020
Trial Downloads
Dragon/Sales@KnowBrainer.com 
(615) 884-4558 ex 1

Sub Main
out = " {(}" + ListVar1 + ")"
SendKeys out
End Sub

My version of this command looks like:

   Dim holdString As String

   holdString = ListVar1

   holdString = Replace (holdString, "(", "{(}")

   holdString = Replace (holdString, "open paren", "{(}")

   holdString = Replace (holdString, "left paren", "{(}")

   holdString = Replace (holdString, "{", "{{}")

   holdString = Replace (holdString, "open curly brace", "{{}")

   holdString = Replace (holdString, "left curly brace", "{{}")

   holdString = Replace (holdString, "[", "{[}")

   holdString = Replace (holdString, "open square bracket", "{[}")

   holdString = Replace (holdString, "left square bracket", "{[}")

   holdString = Replace (holdString, "<", "{<}")

   holdString = Replace (holdString, "open angle bracket", "{<}")

   holdString = Replace (holdString, "left angle bracket", "{<}")

   holdString = Replace (holdString, "\", "{\}")

   holdString = Replace (holdString, "back /", "{\}")

   holdString = Replace (holdString, "back slash", "{\}")

   SendKeys holdString, 1

   Clipboard (holdString)' optional

This code is public domain and open source, I encourage Lunis to freely use it.

-Edgar
DPI 15.3, 64-bit Windows 10 Pro, OpenOffice & Office 365, Norton Security, Shure X2U XLR to USB mic adapter with Audio Technica DB135 vocal mic, Asus X299-Deluxe Prime, Intel Core i9-7940X (14 core, 4.3 GHz overclocked to 4.9 GHz), G.SKILL TridentZ Series 64GB (4 x 16GB) DDR4 3333 (PC4 26600) F4-3333C16Q-64GTZ, NVIDIA GIGABYTE GeForce GTX 1060 GV-N1060G1 GAMING-6GD REV 2.0 6GB graphics card with 3 1920x1080 monitors

Edgar, I tried both Lewis' version and yours. Lunis' version does indeed throw an error. Yours didn't enclose the dictated text in parentheses and seemed to type the dictated text one letter at a time, rather than entering it as a chunk. 

James McVay

We use the existing KnowBrainer Paren <dictation> and Angle <dictation> commands all the time without issue

Change "No" to "Know" w/KnowBrainer 2020
Trial Downloads
Dragon/Sales@KnowBrainer.com 
(615) 884-4558 ex 1

We will need to see your code.

-Edgar
DPI 15.3, 64-bit Windows 10 Pro, OpenOffice & Office 365, Norton Security, Shure X2U XLR to USB mic adapter with Audio Technica DB135 vocal mic, Asus X299-Deluxe Prime, Intel Core i9-7940X (14 core, 4.3 GHz overclocked to 4.9 GHz), G.SKILL TridentZ Series 64GB (4 x 16GB) DDR4 3333 (PC4 26600) F4-3333C16Q-64GTZ, NVIDIA GIGABYTE GeForce GTX 1060 GV-N1060G1 GAMING-6GD REV 2.0 6GB graphics card with 3 1920x1080 monitors

James McVay

You are right, in my version, the opening parentheses seems to be failing for some reason. Will try to figure it out and post back here…

-Edgar
DPI 15.3, 64-bit Windows 10 Pro, OpenOffice & Office 365, Norton Security, Shure X2U XLR to USB mic adapter with Audio Technica DB135 vocal mic, Asus X299-Deluxe Prime, Intel Core i9-7940X (14 core, 4.3 GHz overclocked to 4.9 GHz), G.SKILL TridentZ Series 64GB (4 x 16GB) DDR4 3333 (PC4 26600) F4-3333C16Q-64GTZ, NVIDIA GIGABYTE GeForce GTX 1060 GV-N1060G1 GAMING-6GD REV 2.0 6GB graphics card with 3 1920x1080 monitors

Okay, stupid logic error - because the opening curly brace is both a legitimate printable character and also part of the escapement they need to come first in the replacement order:

Sub Main
   Dim holdString As String
   holdString = ListVar1
   holdString = Replace (holdString, "open curly brace", "{{}")
   holdString = Replace (holdString, "left curly brace", "{{}")
   holdString = Replace (holdString, "{", "{{}")
   holdString = Replace (holdString, "(", "{(}")
   holdString = Replace (holdString, "open paren", "{(}")
   holdString = Replace (holdString, "left paren", "{(}")
   holdString = Replace (holdString, "[", "{[}")
   holdString = Replace (holdString, "open square bracket", "{[}")
   holdString = Replace (holdString, "left square bracket", "{[}")
   holdString = Replace (holdString, "<", "{<}")
   holdString = Replace (holdString, "open angle bracket", "{<}")
   holdString = Replace (holdString, "left angle bracket", "{<}")
   holdString = Replace (holdString, "\", "{\}")
   holdString = Replace (holdString, "back /", "{\}")
   holdString = Replace (holdString, "back slash", "{\}")
   SendKeys holdString, 1
   Clipboard (holdString)
End Sub

-Edgar
DPI 15.3, 64-bit Windows 10 Pro, OpenOffice & Office 365, Norton Security, Shure X2U XLR to USB mic adapter with Audio Technica DB135 vocal mic, Asus X299-Deluxe Prime, Intel Core i9-7940X (14 core, 4.3 GHz overclocked to 4.9 GHz), G.SKILL TridentZ Series 64GB (4 x 16GB) DDR4 3333 (PC4 26600) F4-3333C16Q-64GTZ, NVIDIA GIGABYTE GeForce GTX 1060 GV-N1060G1 GAMING-6GD REV 2.0 6GB graphics card with 3 1920x1080 monitors

This takes me back. Both versions here (DAS and DVC) allow for saying "paren that" to put the parentheses around an entire selected phrase or "paren xyz" to dictate a perenthesized phrase:

https://www.knowbrainer.com/forums/forum/messageview.cfm?catid=3&threadid=19005&discTab=true&messid=109508&parentid=108946&FTVAR_FORUMVIEWTMP=Single

And those thinking ahead will recognize that a complex list for paren will let you easily adapt the code to pull off the first preceding and second terminating characters from the written form of the paren list itself (for at sign and hash sign there is no terminating character):

@\at sign
{}\braces
[]\bracket
#\hash sign
()\paren
()\parentheses
""\quote
''\single quote


PG

Remember folks, my comments and this forum are for entertainment value only, please, no wagering or other reliance on the contents herein.  I permit no commercial use of my ideas (whether expressions or embodiments) without my written consent.