For some reason, when I try and send the @ through script, Rumba is seeing that as a function key of some sort (usnsure which) and I'm getting an error that the function key is not allowed. Any advice? Specifically this is so I can populate E-mail addresses.
#EMSendKey#Rumba#ScriptKeyboard Mnemonics begin with the escape character @. For Example @E sends the Enter_key to the Emulator.
To send the @ character use @@
For example: EMSendKey "yourmail@@gmail.com"
For some reason, when I try and send the @ through script, Rumba is seeing that as a function key of some sort (usnsure which) and I'm getting an error that the function key is not allowed. Any advice? Specifically this is so I can populate E-mail addresses.
#EMSendKey#Rumba#ScriptThat worked just fine, however I'm now running into another issue. I cannot find a Replace type of command. I want to take the variable value, say strEmail and do something like Replace(strEmail, "@", "@@") to replace all of the @ in the string strEmail with @@ instead. There must be a command that could help me out with this, but I do not see one.
For some reason, when I try and send the @ through script, Rumba is seeing that as a function key of some sort (usnsure which) and I'm getting an error that the function key is not allowed. Any advice? Specifically this is so I can populate E-mail addresses.
#EMSendKey#Rumba#ScriptNot sure what you are trying to accomplish with your script.
But RUMBA has built in features that detects Email Addresses in your Emulation screen and turns them into hyperlinks. This feature works with:
-
HTTP and HTTPS Addresses
-
Email Addresses
-
File Addresses
The feature is available under Options -> Rumba Options
If you still want to have a replace function in your script you will need to write your own replace()- function.
This is how I would solve it
Sub Main
Dim strEmail As String
strEmail= your.email@gmail.com
ReplaceChrs(strEmail)
End Sub
Function ReplaceChrs(s As String) As String
Static RegEx As Object
If RegEx Is Nothing Then
Set RegEx = CreateObject("VBScript.RegExp")
With RegEx
RegEx.Global = True
RegEx.Pattern = "@"
End With
End If
RemChrs = RegEx.Replace(s, "@@")
MsgBox RemChrs
End Function
For some reason, when I try and send the @ through script, Rumba is seeing that as a function key of some sort (usnsure which) and I'm getting an error that the function key is not allowed. Any advice? Specifically this is so I can populate E-mail addresses.
#EMSendKey#Rumba#ScriptNevermind, I just used my own:
varAtSymbol = InStr(varDataEmail, "@")
varDataEmail = Left(varDataEmail, varAtSymbol ) "@" Right(varDataEmail, Len(varDataEmail) - varAtSymbol)