Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

Программирование (VB,C#,ASP,.NET): новости, советы, примеры



Выпуск # 448


http://www.kbyte.ru/

 

Новый выпуск!

Доброе время суток!
Меня зовут R-KDR-19826, представляю Вам очередной выпуск рассылки Kbyte.Ru!

 

Содержание выпуска

Система ЭКСПЕРТ

    Вопрос #001017: Бесплатные программы

    Вопрос #001014: Avi и Mpeg4 в Visual Basic

    Вопрос #000952: Обработка файлов в C# (.NET 2.0)

    Вопрос #000947: Секундомер

    Вопрос #000937: DLOOKUP??

Последнее на форумах

    Одной записе в таблицы относится две и более из других таблиц.

    скорость проца

    Parser Error Message: Unrecognized attribute 'type'.

    Unicode в контролах VB6.0

    Как включить двойную буферизацию

Последние статьи

    Нестандартная форма

    Как узнать размер базы данных MySQL через php

    Взаимодействие с другими сайтами через HTTP (HttpWebRequest и HttpWebResponse)

    Работа с SQL – Запросы

    Использование XML.Serialization

Интересные коды и решения

Юмор на Kbyte.Ru

 

Система ЭКСПЕРТ

 

Система «Эксперт» - уникальная система, которая поможет решить, если не все, то многие Ваши проблемы с программированием и разработкой! Если у Вас есть какой-либо вопрос по программированию или разработке, то Вы всегда можете задать его нашим Экспертам! При этом каких-либо особых действий от Вас не потребуется! Просто отправьте Ваш вопрос на адрес mailto:expert@kbyte.ru, в теме письма укажите тему вопроса, в тексте – сам вопрос, и все! Эксперты дадут Вам ответ в течение 12-24 часов, на тот адрес, с которого Вы отправите вопрос. Все проще простого! Никакой регистрации и заполнение бесконечных форм, просто спросите и получите ответ ;-)


Вопрос #001017: Бесплатные программы

Автор вопроса: Sarj // 03.06.2008 / 08:56

Уважаемые эксперты, поскажите пожалуйста бесплатный аналог Corel Draw. Очень надо...

.....

Отвечает: Алексей Немиро // 03.06.2008 / 09:02

Здравствуйте, Sarj.

http://inkscape.org/

--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #001014: Avi и Mpeg4 в Visual Basic

Автор вопроса: алексей // 02.06.2008 / 12:36

Как можно проигрывать эти форматы в вижал бэйсик? Пример на сайте не работает.

.....

Отвечает: Алексей Немиро // 02.06.2008 / 12:43

Здравствуйте, Алексей.

Можно использовать MediaPlayer. Для этого его нужно подключить к
проекту через меню Project (Проект) -> Components (Компоненты), в
появившемся окне найти и выбрать Windows Media Player. Далее, в
панели инструментов должна появиться иконка плеера, который можно
разместить на форме. Указать файл для проигрывания можно
в свойство URL, или FileName в зависимости от версии проигрывателя.

--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #000952: Обработка файлов в C# (.NET 2.0)

Автор вопроса: Сергей // 09.05.2008 / 18:07

Доброе время суток!
В общих словах, такая задача поставлена передо мной: На веб-странице
пользователь выбирает файл, нажимает кнопку "Импорт" и из этого файла
данные импортируются в таблицу БД Oracle.
Файл должен быть текстовым, первые 2 строки- информация о времени и
логине того, кто выгружал. После них идут строки данных, поля
разделяются симоволом | .
Просьба дать ссылки на документацию по работе с файлами, которые могут
помочь :-)

Отвечает: Алексей Немиро // 12.05.2008 / 10:34

Здравствуйте, Сергей.

Необходимые классы и функции для работы с файлами лежак в пространстве имен System.IO. Также Вам могут понадобиться классы для работы с регулярными выражениями, которые лежат в пространстве имен System.Text.RegularExpressions.
Что касается импорта файлов, то данные можно взять прямо из потока FileUpload.PostedFile.InputStream, передать их в StreamReader и обработать при помощи регулярных выражений.

--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #000947: Секундомер

Автор вопроса: Александр // 08.05.2008 / 17:40

Добрый день!
Как сделать секундомер на сайте kbyte.ru много но вот все они выдают результат как 345сек, а мне надо 1:45:01 то есть в временом формате. Как сделать???

.....

Отвечает: Алексей Немиро // 09.05.2008 / 08:29

Здравствуйте, Александр.

Зная, что в минуте 60 секунд, в часе 60 минут, а в сутках 24 часа, можно легко превратить 345 секунд в нужный формат.
001:
002:
003:
004:
005:
006:
007:
008:
009:
Dim sec As Integer
sec = 345
Dim ssec As Integer, min As Integer, hour As Integer
If sec > 59 Then
 min = Int(sec / 60)
 ssec = sec Mod 60
End If
If min > 59 Then hour = Int(min / 60)
MsgBox sec & " сек. = " & hour & " ч. " & min & " мин. " & ssec & " сек."



--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 

Вопрос #000937: DLOOKUP??

Автор вопроса: Алексей // 05.05.2008 / 16:37

Почему те поля формы, которые имеют в ControlSource функцию Dlookup не записывают значение полей в конечную таблицу?

--------------------------------------
Категория: --- MS Access

Отвечает: Алексей Немиро // 06.05.2008 / 05:24

Здравствуйте, Алексей.

Из справки MS Access: Функция Dlookup
При использовании этой функции не учитываются
несохраненные изменения записей подмножества. Если функция
DLookup должна использовать измененные значения, необходимо сначала сохранить
изменения с помощью команды Сохранить запись в меню
Записи, с помощью перемещения фокуса на другую запись или
метода Update.


--
С наилучшими пожеланиями,
Немиро Алексей http://aleksey.nemiro.ru/

 


Чтобы задать Ваш вопрос, отправьте его на адрес expert@kbyte.ru

Раздел Эксперт на сайте Kbyte.Ru

Наверх

 

 

Последнее на форумах

Одной записе в таблицы относится две и более из других таблиц. | Автор: Arti
Добавлено: 01.03.2009 / 19:30 | ответов: 0 | просмотров: 17

Здравствуйте, подскажите с чем работать на форме чтобы как можно "правильнее" отображать информацию полученную из БД когда одной записи в поле соответствует две и более из других таблиц.

Сейчас в DataGirdView получается такой вот результат запроса
001:
002:
003:
SELECT Patient.PatientsName AS Пациент, Series.SeriesDescription AS "Описание серии" FROM Patient INNER JOIN Study ON Patient.GUID = Study.PatientGUID INNER JOIN Series ON Study.GUID=Series.StudyGUID

Colorized by: Eros.CodeSyntaxColor Engine


POPLAUKHIN R.V. --- 2.0
POPLAUKHIN R.V. --- Body 0.5
TULETAYEVA DJ.A. --- Head 0.5
ZOLOTUKHINA T.A. --- 2.0
ZOLOTUKHINA T.A. --- Head 0.5
ZOLOTUKHINA T.A. --- Head 0.5
DOSHKAEV K.F. --- 2.0
DOSHKAEV K.F. --- Head 0.5

т.е. фамилии дублируются такое количество раз, какое количество раз информация встречается относящиеся к ним встречается в других таблицах. Наверно нужно что-то типа плюса при нажатии на который вываливались "2.0" "Body 0.5" и т.д.

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


скорость проца | Автор: Эвм
Добавлено: 27.02.2009 / 18:51 | ответов: 0 | просмотров: 51

кто-нить знает как на vb 6.0 узнать загруженость проца в %?

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Parser Error Message: Unrecognized attribute 'type'. | Автор: abra
Добавлено: 25.02.2009 / 15:28 | ответов: 2 | просмотров: 118

Доброго времени суток.
Помогите люди добрые, бьюсь уже 3-ий день, а все бестолку.....

Жил себе человек, сделала сайт компании, повесил на хост (где тот благополучно провисел года полтора) и свалил куда подальше. В компанию взяли другого человека -меня. Для доработки и поддержки этого самого сайта. Все было хорошо, покуда не ришило начальство перенести сайт на новый, более крутой, сервер у того же хостера (http://micfo.com/ если это имеет значение).

и тут начались проблемы....

при переносе сайта появилась ошибка Runtime Error . (http://www.fxstrat.co.il/RU/)
на хостинге пишут:
Parser Error Message: Unrecognized attribute 'type'.
Source Error:
Line 2: <configuration>
Line 3: <configSections>
Line 4: <sectionGroup name="system.web.extensions" type="System.Web.Configuration.SystemWebExtensionsSectionGroup, System.Web.Extensions, Version=1.0.61025.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35">
Line 5: <sectionGroup name="scripting" type="System.Web.Configuration.ScriptingSectionGroup, System.Web.Extensions, Version=1.0.61025.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35">
Line 6: <section name="scriptResourceHandler" type="System.Web.Configuration.ScriptingScriptResourceHandlerSection, System.Web.Extensions, Version=1.0.61025.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35" requirePermission="false" allowDefinition="MachineToApplication" />
Source File: C:\Inetpub\vhosts\fxstrat.co.il\httpdocs\web.config Line: 4


В тех. поддержке утверждают, что в Web.Config надо изменить server IP в строке подключения. Проблема в том, что никакого Ай Пи сервера я в Web.Config не вижу (за исключением подключения к БД, но это тоже не в Web.Config). :wall:

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 1 | Автор: abra
Добавлено:25.02.2009 / 15:46
Проблема решилась просто надо было просто укаать версию фреймворка 2.

Тут еще одна интересная особенность которую я не понимаю. Вчера это ошибка висела у меня весь день. Ближе к вечеру "сама рассосалась" и у меня на рабочем компе, сайт работает. Но только у меня на компе у всех остальных(кого я знаю) она по прежнему висит. Как такое может быть и почему?

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 2 | Автор: Алексей
Добавлено:26.02.2009 / 05:42
Видимо, System.Web.Extensions.dll в папке Bin не хватает.
На твоем компе он есть, найти можно где-то в папке Programm Files, это "кусок" от AJAX Extensions.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Unicode в контролах VB6.0 | Автор: SVS
Добавлено: 22.02.2009 / 16:14 | ответов: 0 | просмотров: 83

Кто знает, посоветуйте!

Как вставить текст в кодировке Unicode в контрол VB?

Имеется файл source_unicode.txt, в котором содержится текст в кодировке Unicode.
Проблему считывания корректных символов в память VB я уже решил.
Убедился в том, что символы хранятся в памяти VB правильно.
Осталась проблема вывода этих символов на контрол формы VB6.0 (Listbox и Textbox).

Проблемных символов всего два: это a и o с умляутами.

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
022:
023:
Dim S As String
Dim F As Integer

Private Sub Form_Load()

S = LoadUnicodeFile(App.Path & "\source_unicode.txt", 1035)
Text1.Text = S
MsgBox AscW(Mid(Text1.Text, 1, 1))
MsgBox AscW(Mid(S, 1, 1))

End Sub

Public Function LoadUnicodeFile(FileName As String, Optional LocaleID As Long = 1035) As String
    
F = FreeFile
Open FileName For Binary Access Read As F
S = Space(LOF(F) - 2)
Seek #F, 3
Get #F, , S
Close #F
LoadUnicodeFile = StrConv(S, vbFromUnicode, LocaleID)
    
End Function


Поставил в файле source_unicode.txt первым символом "а" с умляутом;
Первый Msgbox мне выдал "97" ("а"), а второй - "228" ("а" с умляутом)

То есть в памяти VB хранит как и надо, в Юникоде, а вот в Textbox вставляет простые буквы a и o, без умляутов, то есть преобразовывает их в ANSI.

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Как включить двойную буферизацию | Автор: Ron
Добавлено: 17.02.2009 / 22:28 | ответов: 8 | просмотров: 323

Как обеспечить двойную буферизацию для формы, или хотя бы для одного объекта? Очень надо!

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 1 | Автор: Dest
Добавлено:22.02.2009 / 14:09
вставляешь в процедуру Form Load
001:
002:
003:
004:
005:
SetStyle(ControlStyles.UserPaint, True)
SetStyle(ControlStyles.AllPaintingInWmPaint, True)
SetStyle(ControlStyles.DoubleBuffer, True)

Colorized by: Eros.CodeSyntaxColor Engine

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 2 | Автор: Ron
Добавлено:23.02.2009 / 21:06
У меня Basic кричит на эти строки. Может надо объявить метод SetStyle.
Забыл сказать, что пишу VB6.

И еще один вопрос: Спасет ли меня двойная буферизация от дикого мерцания PicturePox и Label?

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 3 | Автор: Dest
Добавлено:23.02.2009 / 21:36
НЕ обязательно поможет, но несколько сгладит мерцания

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 4 | Автор: Ron
Добавлено:23.02.2009 / 22:17
Ну мерцания не такие уж большие как я выразился, но изредка появляются.
Но все-таки, как же включить двойную буферизацию?

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 5 | Автор: Dest
Добавлено:23.02.2009 / 23:55
так и включить, что тут не понятного?

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 6 | Автор: Ron
Добавлено:25.02.2009 / 16:42
Я ж пишу, что VB6 ругается на эти строки:

Может это для других версий Visual Basic, а мне нужно на Visual Basic 6.0

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 7 | Автор: Dest
Добавлено:25.02.2009 / 17:19
... точно, советую на .нет перейти, в 6 не знаю как, извини, в инете поищи, должно помоч =)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Ответ # 8 | Автор: Ron
Добавлено:25.02.2009 / 21:37
Я сейчас пишу игрушку на 6-ом, переходить на .Net уже позновато.
Да уже и на Сишку хочу перейти.

Но спасибо за внимание.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru


Наверх

 

Последние статьи

Нестандартная форма
Автор: Zhenik Ipatov | добавлено: 05.05.2008 / 12:42 | просмотров: 2136

Первое что бросается в глаза, когда первый раз используешь программу это конечно же её облик, внешний вид. Есть вероятность что если пользователю не понравится внешний вид окна, то он не будет пользоваться продуктом. Значит нам, не побоюсь этого слова, программистам нужно как можно лучше, удобнее, понятнее, красивее и приветливее сделать лицо программы. Нужно как можно эффектнее преподнести программу. С самого первого появления Windows окна получили прямоугольный стандарт и все User Control’ы

Как узнать размер базы данных MySQL через php
Автор: Николай Рудченко | добавлено: 14.02.2008 / 13:01 | просмотров: 2432

В этой небольшой статье вы узнаете, как получить размер вашей базы данных (БД) MySQL используя язык программирования PHP.

Взаимодействие с другими сайтами через HTTP (HttpWebRequest и HttpWebResponse)
Автор: Немиро Алексей | добавлено: 27.07.2007 / 14:01 | просмотров: 9271

В данной статье речь пойдет о том, как можно программно заполнить и отправить Web-форму, а также получить результат с использованием довольно простых классов - HttpWebRequest и HttpWebResponse.

Работа с SQL – Запросы
Автор: Хабибулин А. (aka Bille Gates) | добавлено: 22.07.2007 / 04:43 | просмотров: 19034

В данной статье рассмотрены часто используемые SQL-запросы и приведены примеры их использования.

Использование XML.Serialization
Автор: Немиро Алексей | добавлено: 19.07.2007 / 15:38 | просмотров: 4538

В данном обзоре речь пойдет об использование XML.Serialization в .NET и ее применении на примере сохранения и считывания настроек программы с использованием синтаксиса языка Visual Basic .NET.

 

Статьи на Kbyte.Ru

Наверх

 

Интересные коды и решения

Анализ URL
Дата добавления: 24.03.2007 / 10:52 | просмотров: 1507 | платформа: RegEx

Программная обработка HTML-элементов управления
Дата добавления: 31.07.2006 / 16:25 | просмотров: 2101 | платформа: ASP .NET (VB)

Удаление куков (Cookies)
Дата добавления: 01.08.2006 / 12:04 | просмотров: 2286 | платформа: ASP

Как получить строку параметров текущего запроса?
Дата добавления: 31.07.2006 / 15:38 | просмотров: 2657 | платформа: ASP .NET (VB)

Как переключиться в любое окно?
Дата добавления: 31.07.2006 / 12:51 | просмотров: 2295 | платформа: VB

Получение данных из Базы Данных MS Access
Дата добавления: 31.07.2006 / 17:39 | просмотров: 3323 | платформа: ASP .NET (VB)

Рисование на PictureBox и/или Form?
Дата добавления: 24.03.2007 / 09:58 | просмотров: 3143 | платформа: VB .NET

Как узнать IP-адрес текущего посетителя?
Дата добавления: 31.07.2006 / 15:34 | просмотров: 3405 | платформа: ASP .NET (VB)

Удаление куков (Cookies)
Дата добавления: 31.07.2006 / 15:57 | просмотров: 2211 | платформа: ASP .NET (VB)

Поиск слов
Дата добавления: 24.03.2007 / 11:01 | просмотров: 1803 | платформа: RegEx

 

Универсальные коды на Kbyte.Ru

Наверх

 

Юмор на Kbyte.Ru

Это поyчительная истоpия о пользе знания сленговых выpажений в общении с пpостыми смеpтными, кои компьютеp видели лишь по TV...
Итак, идy по yлице, подходит гpyппа молодых людей, лет 17-18 от pодy, пpосят закypить... Я, как человек давно кypящий, отказать не могy, а посемy yделяю им паpочкy Camel-ов... Далее пpосят спичкy... Щелкаю Zippo-ой... Пpосят денег на доpогy до дома 8-(..)
(Они) - Ты, в натypе, чо, денег дашь?
(Я) - А зачем вам деньги ? :)
(О) - Ты чо, в натypе, Вася, обоpзел?
(Я) - Ты кого за мастдай юзаешь, ламеp виснyтый?
(О) - лица вытягиваются...
(Я) - Вы же меня анноите, сyкси...
(О) - Hy ты чего, мyжик, офигел?
(Я) - Я ведь сейчас Фаpидy нетмейл кинy, вы ведь все в пожизненный даyн осыпетесь, как девяносто пятый...
(О) - Hе, бpатан, давай pазбеpемся, кто ты такой? 8-()
(Я) - Мальчики, я ФИДОшный поинт, а вы даже на блевавщиков не тянете, только скpипите чего-то на две четыpеста без коppекции...
(О) - Чего делаем 8-(.............)
(Я) - Скpипите, пpичем без намека на коннект...
(О) - Ты чего, кpyтой?
(Я) - Схэнг-апнись, бага... Твое место - за тысячной Амигой...
(О) - Hе, нy ты чо? Hет денег, так и скажи, а чо наезжать-то????
(Я) - А еще pаз yвижy вас здесь, комплейн напишy NEC-y, и пpо вас и поинты ваши забyдyт... Тискайте альт-аш и pвите отседа.......

Hе скажy, что yбежали, но двигались не в пpимеp шyстpее, нежели ко мне... Так что yчите спец. словечки, кpyто, в натypе... :)))))

 

Рейтинг: 481
Всего голосов: 793
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Свечи с ментолом!
Свежесть не только дыхания...

 

Рейтинг: 428
Всего голосов: 693
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

В тридевятом царстве, в тридесятом государстве жил-был Иван-дурак, и была у него триодиннадцатая винда...

 

Рейтинг: 493
Всего голосов: 793
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Новый русский поймал золотую рыбку. Та просит: "Ну отпусти меня, мужик, пожалуйста!"
Тот сжалился, отпустил, повернулся и пошёл. Рыбка в шоке: "Слышь, мужик, а три желания?!"
Новый русский: "Ну, рыбка, ты обнаглела! Ладно, загадывай."

 

Рейтинг: 547
Всего голосов: 851
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Едет программист и водитель. Вдруг машина останавливается и дальше ну никак не едет. Водитель и так, и эдак... Программист и советует:
- А вы закройте лишние окна. Поможет...

 

Рейтинг: 479
Всего голосов: 802
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

- Вчера по телевизору видел Ванессу Мэй. Такая маленькая хрупкая китайская девочка - ей бы в Лужниках пуховиками торговать... Так нет же - на скрипочке лабает!

 

Рейтинг: 561
Всего голосов: 920
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Встречаются два программиста:
- Я вчера девушку встретил, у нее такие Properties!
- Ерунда… Я вчера к ней подкатывал - она Read Only…

 

Рейтинг: 562
Всего голосов: 899
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Навеяно историей, как про одну девушку сказали, что она у Родина (уродина), в смысле находится у человека по фамилии Родин.
Мой дядька тоже имеет фамилию Родин, он бывший военный. Когда еще был на службе, на улице, напротив его кабинета стоял здоровенный металлический щит 10х15 метров, на котором была изображена женщина, замахивающаяся мечом. Богиня победы Ника, типа. Вершила все это художество надпись полметровыми буквами - "Родина - мать зовет".
Не проходило ни одной недели, чтобы дядьку не подковыривали сослуживцы: Родин, слышь, тебя мать зовет!..
А поначалу он велся и спрашивал - где она стоит, на КПП?

 

Рейтинг: 495
Всего голосов: 733
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

- Смотри, какой я себе слуховой аппарат купила. Это самая миниатюрная модель, какая только была в магазине. А действует также хорошо, как и крупные модели!
- Да? И насколько она дороже?
- Ровно половина шестого!

 

Рейтинг: 414
Всего голосов: 689
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Пьяный звонит в дверь. Слышится голос жены:
- Кто там?
- Бревно!
Дверь открывается. Мужик переступает порог и падает:
- А теперь пили!

 

Рейтинг: 507
Всего голосов: 838
Оцените этот анекдот через E-Mail:
Выберите оценку: 5 | 4 | 3 | 2 | 1

 

Весь юмор на Kbyte.Ru

Наверх


Выпуск подготовил: R-KDR-19826

Редактор: Немиро Алексей

Copyright (c) Nemiro AS, 2005-2007


В избранное