Vbs SendKeys до 1 строки

Как я могу заставить это работать только с одной строкой SendKeys?Vbs SendKeys до 1 строки

If IsNumeric(nTo) Then 
    wscript.sleep 1000 
    Do Until nTo = -1 
    a.SendKeys (number, " ") 
    number = number + 1 
    nTo = nTo - 1 
    Loop 
End If

Я получаю ошибку в строке SendKeys.

источник

2016-03-19 Osq

(A) ошибка, потому что SendKeys синтаксис вы используете неправильно. Он принимает один аргумент, строку для отправки. (B) Ваш цикл будет выполняться nto + 1 раз, это то, что вы хотите. (C) Вы хотите, чтобы номера были отправлены в другое приложение или в пространствах или в обоих случаях? (D) Если вы описываете, что вы пытаетесь сделать в более крупном скрипте (из которого это фрагмент), мы можем предложить более надежный метод, чем SendKeys – MikeC

Поскольку я не знаю цель вашей SendKeys я не могу проверить это, но что-то, как это должно работать:

s = "" 
Do Until nTo = -1 
    s = s & number & " " 
    number = number + 1 
    nTo = nTo - 1 
Loop 
a.SendKeys s

источник

2016-03-19 20:36:11

ответ

Смежные вопросы