---
title: "Хочешь узнать пол и имя своего компа???"
description: "1) Откройте блокнот2) скопируйте и вставьте CreateObject(\"SAPI.SpVoice\").Speak\"I love you\"3) Сохрани..."
author: "noizy"
published: "2011-05-09T10:11:26+00:00"
modified: "2011-05-09T10:11:26+00:00"
locale: "ru"
canonical_url: "https://yvision.kz/post/hochesh-uznat-pol-i-imya-svoego-kompa-154051"
markdown_url: "https://yvision.kz/post/hochesh-uznat-pol-i-imya-svoego-kompa-154051/markdown"
site_name: "Yvision.kz"
---

# Хочешь узнать пол и имя своего компа???

> 1) Откройте блокнот2) скопируйте и вставьте CreateObject("SAPI.SpVoice").Speak"I love you"3) Сохрани...

1) Откройте блокнот 2) скопируйте и вставьте CreateObject("SAPI.SpVoice").Speak"I love you" 3) Сохраните как xyz.vbs 4) Запустите Если вы услышите мужской голос, поздравляю, у вас мальчик, если женский - девочка

А еще можно узнать его/её имя Нужно сделать тоже самое, только в блокнот вставить вот это: Set VObj = CreateObject("SAPI.SpVoice") For Each Voice In VObj.getvoices msgbox "" & Voice.GetDescription Next

 

У меня мужик по имени Сэм...

---

Source: [https://yvision.kz/post/hochesh-uznat-pol-i-imya-svoego-kompa-154051](https://yvision.kz/post/hochesh-uznat-pol-i-imya-svoego-kompa-154051)