В этой инструкции, я расскажу Вам, как сделать голосовой ярлык в Windows XP (в других ОС не пробывал). С помощью него, компьютер при включении, будет нас приветствовать. Можно делать не только приветствие, но и, например, приколоться над друзьями. На рабочем столе, создаём текстовый документ. В нём пишем: Set sapi=CreateObject(“sapi.spvoice”) sapi.Speak "" Между кавычек пишем фразу на транслите. К примеру я написал так: Set sapi=CreateObject(“sapi.spvoice”) sapi.Speak “preevet sahha” Сохраняем с расширением .vbs (Сохранить как…) Например: “Голосовое приветствие.vbs” Говорящий ярлычок готов!
Перемещаем его в автозагрузку. Теперь при включении, компьютер здоровается. Чтобы изменить фразу, открываем ярлык блокнотом. После изменения, просто сохраняем. Или делаем несколько таких, с разными фразами. Экспериментируйте с фразами только на транслите, русскую речь Windows не понимает. Если выскакивает ошибка, то нужно кавычки прописать в ручную.









Нашел инфу в инете по данной теме...
"
1) Откройте блокнот
2) Наберите сами или скопируйте CreateObject("SAPI.SpVoice").Speak"I love you"
3) Сохраните как xyz.vbs
4) Запустите
Если вы услышите мужской голос, поздравляю, у вас мальчик, если женский — девочка."
у меня вопрос: как выключить?
Надо, когда сохраняешь, в строке с названием, написать расширение, например: privetstvie.vbs
У меня грузит только текстовый документ что такое??
Поменяйте расширение с .txt на .vbs
1. зачем это надо?
2. речь видимо идет о технологии Спеш Апи (не помню как это на английском пишется), по этому пишем на транслите, т.к. стоит английский звуковой движок. Хотя можно и руский поставить, и наверно можно просто по руски писать. В свое время ставил, чтоб комп книжки читал!
Зачем усложнять, все на стандартных встроенных программах.
В полне согласен! Зачастую просто надо знать РЕЕСТР, и внося поправки в нем подгонять машину под себя...
В Windows 7 - не работает такой фокус) Возможно со звукозаписыванием сработает. если в настройках звука выбрать записанный файл как приветственную музыку при старте винды.
Работает, измените кавычки на нормальные т.е. другие. затем часть слов переносите на другую строку энтером. У меня получилось так:
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak "preevet sahha"
Когда они в одной строке почему-то выдается ошибка.
Именно вместо звуков приветствия я и устанавливал.
Подобное я творил с помощью стандартного встроенного звукозаписывающего устройства (расш. вав). Добавлял эхо, и слегка ускоривал воспроизведение. При загрузке компа сына раздавалось "А ТЫ УРОКИ СДЕЛАЛ ?"...
Вот видео забабахал: для XP. Без терминов для простого пользователя ПК. За качество извиняюсь (на скорую руку, но вполне разборчиво). Путь звуковых файлов WINDOWS : Мой компьютер__C__WINDOWS__Media
Звукозаписывающее устройство с микрофона: Пуск__Все программы__Стандартные___Развлечения__Звукозапись.
Изменение звука можно произвести здесь: Пуск__Панель управления__Звуки и аудио устройства__Звуки__Запуск Windows__Обзор (выбрать вами созданный файл, не забывать нажать "применить")
Раньше бы это увидеть,когда внук учился! Класс!
Супер!!!
Антон, я не знаю чё это за фигня. Я вроде редактирую, жму «сохранить», смотрю на текст — то же самое, что и было перед редактированием.
Привет!. Такие неформатированные тексты мы будем либо удалять, либо снимать с публикации. Тексты должны быть прежде всего читабельные, таковы правила сайта...
ничего не понял... Куда вставлять... Зачем это нужно...