Автоматический ввод цифр в окне inputbox

@Jeka_Osokin · Регистрация: 31.08.2012

Студворк — интернет-сервис помощи студентам

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
Set s = CreateObject("WScript.Shell")
c = nVar1 + 200
do
p = InputBox ("бла бла бла","Администратор")
s.sendkeys "8"
wscript.sleep c
s.sendkeys "9"
wscript.sleep c
s.sendkeys "0"
wscript.sleep c
s.sendkeys "8"
wscript.sleep c
s.sendkeys "9"
wscript.sleep c
s.sendkeys "1"
wscript.sleep c
s.sendkeys "0"
wscript.sleep c
s.sendkeys "0"
wscript.sleep c
s.sendkeys "7"
wscript.sleep c
s.sendkeys "3"
wscript.sleep c
s.sendkeys "6"
wscript.sleep c
s.sendkeys "1"
wscript.sleep c
s.sendkeys "9"
wscript.sleep c
s.sendkeys "9"
wscript.sleep c
s.sendkeys "5"
wscript.sleep c
s.sendkeys "0"
wscript.sleep c
s.sendkeys "3"
wscript.sleep c
s.sendkeys "2"
wscript.sleep c
s.sendkeys "8"
wscript.sleep c
loop until p = "8908910073619950328"
MsgBox "Получилось"

Этот скрипт открывает окно InputBox и только после нажатия на закрыть или отмена и т.д., "нажимает" на эти цифры, можно ли сделать так чтобы при открытии InputBox они начинали нажиматься именно в нём?

FlasherX · 03.02.2020, 11:32

Сообщение от testuser2

А чем, спрашивается вы занимаетесь?

Развенчанием мифов:

Сообщение от testuser2

у моей получается короче , то есть лучше

@testuser2 · 07.02.2020, 17:49

Сообщение от testuser2

лучше приведите пример практической пользы от десятикратного запроса собственного id скрипта

А вот, кстати, я сам, особо не ставя собственно цели, привел такой пример в совем последнем поделии и, стоит сказать, вариант с rundll32 самый верный, и в данном случае правильно работал только он

FlasherX · 07.02.2020, 19:44

И я пояснял почему. Только к сравнению скоростей это никакого отношения не имеет...

Dragokas · 07.02.2020, 21:29

Сообщение от testuser2

Можно еще так

Зачем размещать клоны кодов?
Выше вашего примера код от Dmitrii один в один, разве что ещё и с чуть более надёжной проверкой.

Добавлено через 3 минуты
И просьба на будущее, придерживайтесь тематики, тема "Примеры скриптов" создана не для обсуждения.

FlasherX · 07.02.2020, 21:33

Сообщение от Dragokas

Зачем размещать клоны кодов?

А зачем размещать клоны ответов?

См. низ поста.

Новые блоги и статьи Все статьи Все блоги /
Нейтральные знания ..., ... чистая наука. Пока что-то проходит модерацию на Хабре, стоит развить мысль ... Hrethgir 20.07.2026 К таким радикальным взглядам я конечно в той публикации не приходил, но чтобы скоротать вечер, решил углубиться немного. 1. Почему показания термометра заряжены целью? Цель заложена в самом. . .	Установка нескольких штампов электронной подписи в строго определенных местах файла docx ВладимирСамохин 19.07.2026 (В!) Работа с Электронной подписью - это неотъемлемая часть современного документооборота. Но что делать, если нужно поставить несколько штампов электронной подписи в строго определенных местах. . .	сукцессия 35. Научная статья о проделанной работе anaschu 19.07.2026 Написал в формате латекс и пдф	Вангую, что это не пройдёт модерацию, и на неделе я запущу свой сервер. Hrethgir 19.07.2026 Эта публикация сейчас в песочнице и ждёт приглашения. https:/ / habr. com/ ru/ sandbox/ 295048/ По ссылке 403. Не очень информативно такую ссылку постить. Запись от Usaga размещена Сегодня в 06:46 . . .
сукцессия 33. открытые вопросы от клауде anaschu 19.07.2026 "Что накопилось за эту часть А — тринадцать правок, из которых шесть пришли из ваших вопросов и каждая оказалась реальной ошибкой, а не калибровкой: односторонний симбиоз, отсутствующий листопад,. . .	32 сукцессия anaschu 19.07.2026 сукцессия 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не «подкручивает» сходимость —. . .	сукцессия 31: модель микоризы - это модель ещё нескольких явлений, социальных и экономических anaschu 18.07.2026 Теория «Всего»: апдейт v1. 1. 2 — 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не. . .	сукцессия 30. Массив проверяющих друг друга моделей anaschu 18.07.2026 Архитектура сети взаимопроверяющих моделей микоризной сукцессии (v2. 0) Развитие тензорного ОДУ-ядра и создание кросс-платформенного калибровочного полигона Уважаемые коллеги! В продолжение. . .

FlasherX 7001 / 2885 / 1110 Регистрация: 06.06.2017 Сообщений: 9,812
	07.02.2020, 19:44
	И я пояснял почему. Только к сравнению скоростей это никакого отношения не имеет... 0