Заставляем говорит пк

1xbet melbet
Сообщения
167
Реакции
880
1. Скопируйте этот текст в блокнот

Dim message, sapi
message=InputBox("Что сказать?","Поговори со мной")
Set itube=CreateObject("sapi.spvoice")
itube.Speak message

2. Сохраните файл как speak.vbs
3. Запустите файл.

Все что вы напишете в строке, компьютер попытается произнести после нажатия ОК.
OlD2Z0DI9b8.jpg
 
Сообщения
134
Реакции
31
Skype
cuertosgang
1. Скопируйте этот текст в блокнот

Dim message, sapi
message=InputBox("Что сказать?","Поговори со мной")
Set itube=CreateObject("sapi.spvoice")
itube.Speak message

2. Сохраните файл как speak.vbs
3. Запустите файл.

Все что вы напишете в строке, компьютер попытается произнести после нажатия ОК.
OlD2Z0DI9b8.jpg
Реал спасиб, круто теперь)))
 
1

12345хилко

я знаю как савместить 2 чита есть есп каспер прышки антибан итд итп много функцыи ненадо мучится инжэктить все просто мои скаип tolik222286
 
Сообщения
167
Реакции
880
я знаю как савместить 2 чита есть есп каспер прышки антибан итд итп много функцыи ненадо мучится инжэктить все просто мои скаип tolik222286
Я не понял,причём тут ВАРФЕЙС к общению? Вали в раздел и спамь
 
Сообщения
31
Реакции
10
Skype
woin.pbh
у меня по английски чего то лепечет, русского нет
 
kaspersky keys
Верх