Какая разница между IIS 5.1 IIS6.0 в коде?

@-Tal- · Регистрация: 06.11.2010

Студворк — интернет-сервис помощи студентам

Какая разница между IIS 5.1 IIS6.0 в коде?
Я Установил себе 2003 Server и мои скрипты ASP VBScript Перестали роботать ошибка 404
Непойму какая причина ?
Помогите пожалуста!!!

@bazile · 06.12.2010, 13:23

В IIS6 по умолчанию разрешен доступ только к статическим страницам.
Чтобы ASP заработал запускаем IIS Manager, переходим на ветку Web Services Extensions, выбрать Active Server Pages и нажать Allow.

@-Tal- · 06.12.2010, 17:28 **[ТС]**

Спасибо Вроде зароботало Но появилас есче одна проблемка
Я поставил Сервер 2003 с целю чтоб у меня появилася CDONTS или CDO
а его нету незнау что делать !

@bazile · 06.12.2010, 17:36

CDO в Win2003 есть по умолчанию.
CDONTS нет, она считается устаревшей.

@-Tal- · 06.12.2010, 17:44 **[ТС]**

я когда запускаю етот скрипт он у меня показивает какой у меня Email мотор стоит и он мне говорит что у меня некакого нету может его надо гдето вклучить в настройках ?

Наперед спасибо за помощь

<html>
<head>
<title>áãé÷ú ÷åîôððèåú ãåàø</title>
<meta http-equiv='Content-Type' content='text/html; charset=windows-1255'>
</head>

<body bgcolor='#FFFFFF' text='#000000' dir='rtl'>
<%
Dim theComponent(12)
Dim theComponentName(12)

'## the components
theComponent(0) = 'SMTPsvg.Mailer'
theComponent(1) = 'Persits.MailSender'
theComponent(2) = 'SMTPsvg.Mailer'
theComponent(3) = 'CDONTS.NewMail'
theComponent(4) = 'CDONTS.NewMail'
theComponent(5) = 'dkQmail.Qmail'
theComponent(6) = 'Geocel.Mailer'
theComponent(7) = 'iismail.iismail.1'
theComponent(8) = 'Jmail.smtpmail'
theComponent(9) = 'ASPMail.ASPMailCtrl.1'
theComponent(10) = 'ocxQmail.ocxQmailCtrl.1'
theComponent(11) = 'SoftArtisans.SMTPMail'
theComponent(12) = 'SmtpMail.SmtpMail.1'

'## the name of the components
theComponentName(0) = 'ASPMail'
theComponentName(1) = 'ASPEMail'
theComponentName(2) = 'ASPQMail'
theComponentName(3) = 'CDONTS'
theComponentName(4) = 'Chili!Mail'
theComponentName(5) = 'dkQMail'
theComponentName(6) = 'GeoCel'
theComponentName(7) = 'IISMail'
theComponentName(8) = 'JMail'
theComponentName(9) = 'OCXMail'
theComponentName(10) = 'OCXQMail'
theComponentName(11) = 'SA-Smtp Mail'
theComponentName(12) = 'SMTP'
%>
<table border='0' cellspacing='0' cellpadding='0' align='right' width='100%'>
<tr valign='top'>
<td><div align='center'><b><font face='Arial (Hebrew)'>àéæä ÷åîôððèåú ãåàø îåú÷ðåú òì äùøú ùìé?</font></b></div></td>
</tr>
<tr valign='top'>
<td><font face='Arial (Hebrew)'>
<%
dim i, j
j = 0

for i=0 to UBound(theComponent)
if IsObjInstalled(theComponent(i)) then
Response.Write theComponentName(i) & '
'
else
j = j + 1
end if
next

if j > UBound(theComponent) then
Response.Write 'ìà ðîöàå ÷åîôððèåú ãåàø îåú÷ðåú.'
end if
%>
</font></td>
</tr>
</table>
<%
function IsObjInstalled(strClassString)
on error resume next
'## initialize default values
IsObjInstalled = false
Err = 0
'## testing code
dim xTestObj
set xTestObj = Server.CreateObject(strClassString)
if 0 = Err then
IsObjInstalled = true

@-Tal- · 06.12.2010, 17:55 **[ТС]**

Извени я только сечас обратил внимание на то что в скрипте нет CDO проверки :-)

@-Tal- · 06.12.2010, 18:18 **[ТС]**

я непойму по какой причине видает мне error на команде 'objMessage.Send' в этом скрипте

<%
If Request.Form('btnSend').Count > 0 Then
Set objMessage = CreateObject('CDO.Message')
objMessage.Subject = Request.Form('subject')
objMessage.Sender = Request.Form('From')
objMessage.To = Request.Form('To')
objMessage.TextBody = Request.Form('message')
objMessage.Send
Response.Write('Sent OK !!!')
End If
%>

<html>
<head>
<title>Send email with CDO</title>
</head>
<body>
<form name='sendEmail' action='sendEmail2003.asp' method='post'>
<table>
<tr>
<td>Subject:</td>
<td><input type='text' name='subject' /></td>
</tr>
<tr>
<td>From:</td>
<td><input type='text' name='from' /></td>
</tr>
<tr>
<td>To: </td>
<td><input type='text' name='to' /></td>
</tr>
<tr>
<td valign='top'>Message: </td>
<td><textarea name='message' rows='6' cols='30'>
</textarea></td>
</tr>
<tr>
<td colspan='2'><input type='submit' name='btnSend'
value='Send' /></td>
</tr>
</table>
</form>
</body>
</html>

@bazile · 06.12.2010, 18:24

Попробуйте пример из этой темы
http://relib.com/forums/topic.asp?id=804521

@-Tal- · 06.12.2010, 18:34 **[ТС]**

Там Тоже нероботает send
Может есть какието настройки

'-----------------------------------------
Error Type:
CDO.Message.1 (0x80040213)
The transport failed to connect to the server.
/cdo.asp, line 19

'.Send'

@bazile · 07.12.2010, 09:32

Локальный SMTP сервер установлен?

@-Tal- · 11.12.2010, 09:20 **[ТС]**

Привет!
Мне кажется Установлен если ты об етом

'Default SMTP Virtual Server'

Толко наверняка там надо чтото настраивать ато у меня там все 'Default'

Спасибо !!!

@bazile · 13.12.2010, 10:09

Да. Именно его я и имел в виду.
Раз выдается ошибка 'The transport failed to connect to the server' - проверьте запущен ли SMTP сервис. Может он только установлен, но не запущен.

Далее можно попробовать в строке
.Item('http://schemas.microsoft.com/cdo/configuration/smtpserver') = 'localhost'
Поставить адрес SMTP сервера своего провайдера, и если сработает, то так и оставить.

21.07.2011, 05:59

У меня тоже была такая проблема.
Всё дело оказалось в том, что макафи блокировал исходящую почту...
Как только я отключил блокировку, то всё стало нормально.

Новые блоги и статьи Все статьи Все блоги /
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .

@-Tal- 0 / 0 / 0 Регистрация: 06.11.2010 Сообщений: 10

	Какая разница между IIS 5.1 IIS6.0 в коде? 06.12.2010, 13:10. Показов 2242. Ответов 12 Метки нет (Все метки) Какая разница между IIS 5.1 IIS6.0 в коде? Я Установил себе 2003 Server и мои скрипты ASP VBScript Перестали роботать ошибка 404 Непойму какая причина ? Помогите пожалуста!!! 0

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,903
	06.12.2010, 13:23
	В IIS6 по умолчанию разрешен доступ только к статическим страницам. Чтобы ASP заработал запускаем IIS Manager, переходим на ветку Web Services Extensions, выбрать Active Server Pages и нажать Allow. 0

@-Tal- 0 / 0 / 0 Регистрация: 06.11.2010 Сообщений: 10
	06.12.2010, 17:28 [ТС]
	Спасибо Вроде зароботало Но появилас есче одна проблемка Я поставил Сервер 2003 с целю чтоб у меня появилася CDONTS или CDO а его нету незнау что делать ! 0

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,903
	06.12.2010, 17:36
	CDO в Win2003 есть по умолчанию. CDONTS нет, она считается устаревшей. 0

@-Tal- 0 / 0 / 0 Регистрация: 06.11.2010 Сообщений: 10
	06.12.2010, 17:44 [ТС]
	я когда запускаю етот скрипт он у меня показивает какой у меня Email мотор стоит и он мне говорит что у меня некакого нету может его надо гдето вклучить в настройках ? Наперед спасибо за помощь <html> <head> <title>áãé÷ú ÷åîôððèåú ãåàø</title> <meta http-equiv='Content-Type' content='text/html; charset=windows-1255'> </head> <body bgcolor='#FFFFFF' text='#000000' dir='rtl'> <% Dim theComponent(12) Dim theComponentName(12) '## the components theComponent(0) = 'SMTPsvg.Mailer' theComponent(1) = 'Persits.MailSender' theComponent(2) = 'SMTPsvg.Mailer' theComponent(3) = 'CDONTS.NewMail' theComponent(4) = 'CDONTS.NewMail' theComponent(5) = 'dkQmail.Qmail' theComponent(6) = 'Geocel.Mailer' theComponent(7) = 'iismail.iismail.1' theComponent(8) = 'Jmail.smtpmail' theComponent(9) = 'ASPMail.ASPMailCtrl.1' theComponent(10) = 'ocxQmail.ocxQmailCtrl.1' theComponent(11) = 'SoftArtisans.SMTPMail' theComponent(12) = 'SmtpMail.SmtpMail.1' '## the name of the components theComponentName(0) = 'ASPMail' theComponentName(1) = 'ASPEMail' theComponentName(2) = 'ASPQMail' theComponentName(3) = 'CDONTS' theComponentName(4) = 'Chili!Mail' theComponentName(5) = 'dkQMail' theComponentName(6) = 'GeoCel' theComponentName(7) = 'IISMail' theComponentName(8) = 'JMail' theComponentName(9) = 'OCXMail' theComponentName(10) = 'OCXQMail' theComponentName(11) = 'SA-Smtp Mail' theComponentName(12) = 'SMTP' %> <table border='0' cellspacing='0' cellpadding='0' align='right' width='100%'> <tr valign='top'> <td><div align='center'><b><font face='Arial (Hebrew)'>àéæä ÷åîôððèåú ãåàø îåú÷ðåú òì äùøú ùìé?</font></b></div></td> </tr> <tr valign='top'> <td><font face='Arial (Hebrew)'> <% dim i, j j = 0 for i=0 to UBound(theComponent) if IsObjInstalled(theComponent(i)) then Response.Write theComponentName(i) & ' ' else j = j + 1 end if next if j > UBound(theComponent) then Response.Write 'ìà ðîöàå ÷åîôððèåú ãåàø îåú÷ðåú.' end if %> </font></td> </tr> </table> <% function IsObjInstalled(strClassString) on error resume next '## initialize default values IsObjInstalled = false Err = 0 '## testing code dim xTestObj set xTestObj = Server.CreateObject(strClassString) if 0 = Err then IsObjInstalled = true 0

@-Tal- 0 / 0 / 0 Регистрация: 06.11.2010 Сообщений: 10
	06.12.2010, 17:55 [ТС]
	Извени я только сечас обратил внимание на то что в скрипте нет CDO проверки :-) 0

@-Tal- 0 / 0 / 0 Регистрация: 06.11.2010 Сообщений: 10
	06.12.2010, 18:18 [ТС]
	я непойму по какой причине видает мне error на команде 'objMessage.Send' в этом скрипте <% If Request.Form('btnSend').Count > 0 Then Set objMessage = CreateObject('CDO.Message') objMessage.Subject = Request.Form('subject') objMessage.Sender = Request.Form('From') objMessage.To = Request.Form('To') objMessage.TextBody = Request.Form('message') objMessage.Send Response.Write('Sent OK !!!') End If %> <html> <head> <title>Send email with CDO</title> </head> <body> <form name='sendEmail' action='sendEmail2003.asp' method='post'> <table> <tr> <td>Subject:</td> <td><input type='text' name='subject' /></td> </tr> <tr> <td>From:</td> <td><input type='text' name='from' /></td> </tr> <tr> <td>To: </td> <td><input type='text' name='to' /></td> </tr> <tr> <td valign='top'>Message: </td> <td><textarea name='message' rows='6' cols='30'> </textarea></td> </tr> <tr> <td colspan='2'><input type='submit' name='btnSend' value='Send' /></td> </tr> </table> </form> </body> </html> 0

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,903
	06.12.2010, 18:24
	Попробуйте пример из этой темы http://relib.com/forums/topic.asp?id=804521 0

@-Tal- 0 / 0 / 0 Регистрация: 06.11.2010 Сообщений: 10
	06.12.2010, 18:34 [ТС]
	Там Тоже нероботает send Может есть какието настройки '----------------------------------------- Error Type: CDO.Message.1 (0x80040213) The transport failed to connect to the server. /cdo.asp, line 19 '.Send' 0

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,903
	07.12.2010, 09:32
	Локальный SMTP сервер установлен? 0

@-Tal- 0 / 0 / 0 Регистрация: 06.11.2010 Сообщений: 10
	11.12.2010, 09:20 [ТС]
	Привет! Мне кажется Установлен если ты об етом 'Default SMTP Virtual Server' Толко наверняка там надо чтото настраивать ато у меня там все 'Default' Спасибо !!! 0

@bazile 86 / 62 / 69 Регистрация: 15.03.2007 Сообщений: 6,903
	13.12.2010, 10:09
	Да. Именно его я и имел в виду. Раз выдается ошибка 'The transport failed to connect to the server' - проверьте запущен ли SMTP сервис. Может он только установлен, но не запущен. Далее можно попробовать в строке .Item('http://schemas.microsoft.com/cdo/configuration/smtpserver') = 'localhost' Поставить адрес SMTP сервера своего провайдера, и если сработает, то так и оставить. 0

RUSya
	21.07.2011, 05:59
	У меня тоже была такая проблема. Всё дело оказалось в том, что макафи блокировал исходящую почту... Как только я отключил блокировку, то всё стало нормально.