Ассоциация Телевидения Высокой Четкости и Цифрового Кино
www.hdunion.ru
Добавить в избранное Сделать стартовой Карта сайта
Рус | Eng
Тел/Факс: (495) 781-20-61 Главная
info@hdunion.ru Почта
Об HD Union | Как вступить | Проекты | О лицензировании | Полезные ссылки | Контакты
  О создании HD Union
  Устав HD Union
  Структура HD Union
  Члены HD Union
<% v1 = request.form("v1") v2 = request.form("v2") v3 = request.form("v3") v4 = request.form("v4") v5 = request.form("v5") v6 = request.form("v6") v7 = request.form("v7") v8 = request.form("v8") v9 = request.form("v9") marker = request.form("marker") result = "" 'if instr(email,"@")=0 or instr(email,".")=0 or trim(email) = "нет" or trim(email)="-" then 'result = "Неправильный ввод адреса: " & email 'end if if v3 = "" or v5 = "" or v6 = "" or v8 = "" or v9 = "" then result = "Просьба заполнить все обязательные поля (помечены * ) !" end if %> "HD - программы".
<% if marker = "" then %>


Анкета.

Пожалуйста, заполните следующую форму:

Название организации:
 
Основная деятельность:
 
Ф.И.О. контактного лица:
 
*
Адрес:
 
   
Мобильный телефон:
 
*
Телефон:
 
*
Факс:
 
   
E-mail:
 
*
Интересующая тема переговоров:
 
*

( * ) - поля, обязательные для заполнения !

  

По всем вопросам обращайтесь по e-mail: press@era-tv.ru
<% else %> <% if result <> "" then %>

Ошибка!

<%= result %>


<% else set conn = server.createobject("ADODB.Connection") set conn=nothing mess = mess & "Название организации: " & v1 & "," & vbCrLf mess = mess & "Основная деятельность: " & v2 & "," & vbCrLf mess = mess & "Ф.И.О. контактного лица: " & v3 & "," & vbCrLf mess = mess & "Адрес: " & v4 & "," & vbCrLf mess = mess & "Мобильный телефон: " & v5 & "," & vbCrLf mess = mess & "Телефон: " & v6 & "," & vbCrLf mess = mess & "Факс: " & v7 & "," & vbCrLf mess = mess & "E-mail: " & v8 & "," & vbCrLf mess = mess & "IT-отдел фирмы ЭРА" & vbCrLf if instr(1,request.servervariables("SERVER_NAME"),"hdunion.ru",1) > 0 then Set cdoConfig = CreateObject("CDO.Configuration") set mailer = Server.CreateObject("CDO.Message") with mailer .To = "press@era-tv.ru" .To = "info@hdunion.ru" .From = "info@era-tv.ru" .Subject = "ERA Web Server, Интернет-проект HDV-программы" .TextBody = mess ' with .BodyPart ' .ContentTransferEncoding = "8bit" ' .Charset = "koi8-r" 'end with .Send() end with end if ' mess = "Благодарим Вас за интерес к . "HD-программам"," & vbCrLf ' mess = mess & "Наш менеджер проекта "HD-программ" свяжется с Вами в самое ближайшее время." & vbCrLf ' if request.servervariables("SERVER_NAME") = "www.hdunion.ru" then ' set mailer = Server.CreateObject("CDO.Message") ' with mailer ' .To = email ' .From = "info@era-tv.ru, press@era-tv.ru" ' .Subject = "ERA Web Server, Интернет-проект "HD-программы"" ' .TextBody = mess ' with .BodyPart ' .ContentTransferEncoding = "8bit" ' .Charset = "koi8-r" ' end with ' .Send() ' end with ' end if %>
Ждем Вас на нашем стенде №4.337 с 7 по 11 сентября на IBC 2007
Спасибо за регистрацию.


Наш координатор свяжется с Вами чтобы предварительно обсудить интересующие Вас вопросы и договориться об удобном времени встречи на IBC.
По всем вопросам обращайтесь по e-mail: info@hdunion.ru
Или любому контактному телефону: (495)781-2061
<% end if %> <% end if %>

 
Все торговые марки являются собственностью соответстующих владельцев. Никакая часть электронных документов не может быть перегруппирована, продана, или скопирована без согласия Ассоциации HD Union.