Форма ASP Добавить электронную почту, а также добавить другие поля из формыHtml

Программисты Html
Ответить Пред. темаСлед. тема
Anonymous
 Форма ASP Добавить электронную почту, а также добавить другие поля из формы

Сообщение Anonymous »

У меня небольшая проблема, так как я не знаю ASP. Но страницы, созданные для веб -сайта моего дяди, находятся в ASP, и форма тоже. У меня возникли проблемы с привлечением его формы, чтобы работать, и искать ошибки, и я нашел PDF из Fastost, и я пробую этот код, но не понимаю, где я поместил свой адрес электронной почты, чтобы отправить информацию, а также как добавить другую информацию, такую ​​как имя. < /p>

Это код, который я пытаюсь: < /p>

dim oCdoMsg, oCdoConfg, strReferer, strServer,
strClientIP, strServerIP, blnSpam

set oCdoMsg = server.createobject("CDO.Message")

strReferer = request.servervariables("HTTP_REFERER")
strServer = Replace(request.servervariables("SERVER_NAME"), "www.", "")
strClientIP = request.servervariables("REMOTE_ADDR")
strServerIP = request.servervariables("LOCAL_ADDR")
strFrom = "noreply@" & strServer

intComp = inStr(strReferer, strServer)
If intComp > 0 Then
blnSpam = False
Else
' Spam Attempt Block
blnSpam = True
End If

oCdoMsg.to = request.form("email")
oCdoMsg.from = strFrom
oCdoMsg.Subject = "CDO Test Mail"
oCdoMsg.Textbody = "This test mail has been sent from
server "
oCdoMsg.Textbody = oCdoMsg.Textbody &
request.servervariables("LOCAL_ADDR") & " via CDO mail
objects."

strMSSchema =
"http://schemas.microsoft.com/cdo/configuration/"
Set oCdoConfg = Server.CreateObject("CDO.Configuration")
oCdoConfg.Fields.Item(strMSSchema & "sendusing") = 2
oCdoConfg.Fields.Item(strMSSchema & "smtpserver") =
"smtp.fasthosts.co.uk"
oCdoConfg.Fields.Update
Set oCdoMsg.Configuration = oCdoConfg

If NOT blnSpam Then
oCdoMsg.send
strResult = "Mail Sent."
Else
strResult = "Mail Not Sent."
End If
response.write strResult

set oCdoMsg = nothing
set oCdoConfg = nothing
< /code>

Я был бы признателен за любую помощь с этим, код, который находится на веб -сайте сейчас, показывает ошибку 500. Вот почему мне нужно использовать код выше. Мне просто нужна помощь, где добавить мою электронную почту домена и как привлечь другие части формы, такие как имя в код выше. < /P>

Спасибо < /p>

Подробнее здесь: https://stackoverflow.com/questions/837 ... -from-form
Реклама
Ответить Пред. темаСлед. тема

Быстрый ответ

Изменение регистра текста: 
Смайлики
:) :( :oops: :roll: :wink: :muza: :clever: :sorry: :angel: :read: *x)
Ещё смайлики…
   
К этому ответу прикреплено по крайней мере одно вложение.

Если вы не хотите добавлять вложения, оставьте поля пустыми.

Максимально разрешённый размер вложения: 15 МБ.

  • Похожие темы
    Ответы
    Просмотры
    Последнее сообщение

Вернуться в «Html»