Блог

Главная - Вопросы по программированию - как нажимать случайную строку с использованием vbs каждый раз в этом существующем коде

как нажимать случайную строку с использованием vbs каждый раз в этом существующем коде

#vbscript

#vbscript

Вопрос:

Вот мой код

 Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "john@text"

Я хочу, чтобы при каждом запуске файла vbs текст или число между «и @ были случайными. john@text должен быть случайным каждый раз, например 6534@text, aqwe @text и т.д.

Комментарии:

1. Сгенерируйте случайное число, которое представляет значения ASCII допустимых (т. Е. алфавитных) символов, а затем преобразуйте эти числа в массив символов, а затем в строку.

2. как нажимать клавишу, если строка сгенерирована?

Ответ №1:

Используйте случайно сгенерированные целые числа для представления символов ASCII, а затем преобразуйте массив байтов в строку. Пример:

 Dim randomWord As String
Dim randomWordAsByteArray(1 To 4) As Byte

Randomize
Dim charNumber As Integer
For charNumber = 1 To 4
    randomWordAsByteArray(charNumber) = Int((26 * Rnd)   1)   96
Next

randomWord = StrConv(randomWordAsByteArray, vbUnicode)

Комментарии:

1. VBScript не имеет типа, As ключевое слово в синтаксисе объявлений недопустимо. Кроме того, VBScript не поддерживает синтаксис диапазонов массивов.