Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
я долго ржал
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Как заставить компьютер говорить с вами?
1. Скопируйте этот текст в блокнот
Dim message, sapi
message=InputBox("Что сказать?","Поговори со мной")
Set itube=CreateObject("sapi.spvoice")
itube.Speak message
2. Сохраните файл как speak.vbs
3. Запустите файл.
Все что вы напишете в строке, компьютер попытается произнести после нажатия ОК.
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
эх времена... времена....тоскую.....
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской
Стас Часовской