经典的asp联系表格

时间:2015-02-21 17:33:11

标签: html forms asp-classic

您好我正在尝试使用自定义html和asp创建一个联系表单,并且我知道特别是ASP的编程很少的唯一问题可以帮助我吗????

我尝试创建一些示例,但我理解的很少

我的代码HTML

<body>
<form id="contactform" action="contact.asp" method="POST">
<div class="formcolumn">
<label for="nome">Nome e Cognome</label>
<input type="text" id="nome" name="nome" />
<label for="indirizzo">Indirizzo - cap - località - provincia</label>
<input type="text" id="indirizzo" name="indirizzo" />
<ul>
<li>Consegna a Domicilio<input type="radio" id="domicilio" name="luogo" value="consegna a domicilio" /></li>
</ul>
</div>
<div class="formcolumn">
<label for="telefono">Telefono</label>
<input type="text" id="telefono" name="telefono" />
<label for="email">E-mail</label>
<input type="email" id="email" name="email" />
<ul>
<li>Ritiro presso la macelleria<input type="radio" id="macelleria" name="luogo" value="ritiro presso la macelleria" /></li>
</ul>
</div>
<div class="formcolumn_2">
<label for="consegna">Indirizzo di consegna (compilare solo nel caso di consegna a domicilio)</label>
<input type="text" id="consegna" name="consegna" />
<label for="ordine">Ordine</label>
<textarea id="ordine" name="ordine" ></textarea>
<ul class="campo_dati">
<p>Info dati</p>
<li>Campo_1<input type="radio" id="Campo_1" name="dati" value="campo_1" /></li>
<li>Campo_2<input type="radio" id="Campo_2" name="dati" value="campo_2" /></li>
<li>Campo_3<input type="radio" id="Campo_3" name="dati" value="campo_3" /></li>
<li>Campo_4<input type="radio" id="Campo_4" name="dati" value="campo_4" /></li>
<li>Campo_5<input type="radio" id="Campo_5" name="dati" value="campo_5" /></li>
<li>Campo_6<input type="radio" id="Campo_6" name="dati" value="campo_6" /></li>
<li>Campo_7<input type="radio" id="Campo_7" name="dati" value="campo_7" /></li>
<li>Campo_8<input type="radio" id="Campo_8" name="dati" value="campo_8" /></li>
</ul>
<label for="specifiche">Altre informazioni</label>
<input type="text" id="specifiche" name="specifiche" />
<ul class="campo_dati">
<p>Accettazione condizioni</p>
<li>Ho letto e accettato il regolamento e le condizioni sulla privacy<input type="radio" id="accettazione" name="accettazione" value="accettazione" /></li>
</ul>
</div>
<div class="buttons">
<input class="button" value="invia" type="submit" name="invia" />
</div>
</form>
</body>

我的css

#contactform{

    width: 585px;
    border: 1px solid blue;
}

.formcolumn input, #contactform textarea{
    width:95%;
    border: 2px solid #D6C27A;

    padding: 4px;
}

.formcolumn_2 input, #contactform textarea{
    width:571px;
    border: 2px solid #D6C27A;
    padding: 4px;
}

#contactform textarea{
    resize:vertical; /* allow vertical resize of textarea */
    height: 200px;
}

#contactform input[type="radio"]{
    width: auto;
    float:right;
    height: auto;
    margin-left: 15px;
    margin-bottom: 25px;
}

#contactform .formcolumn{ /* column div inside form */
    width:280px;
    float: left;
}

#contactform .formcolumn:first-of-type{
    margin-right: 25px; /* 2% margin after first column */
}

#contactform label { 
    padding-top:10px;
    padding-bottom:5px;
    display: block;
}

#contactform ul{
    list-style:none;
    list-type: none;
    margin: 0;
    padding: 0;
    float: left;
}

#contactform ul li{
    float: left;
    width: auto;
    margin-top: 20px;
}

#contactform div.buttons{
    clear: both;
    text-align:right;
}

#contactform input.button{
    width: 85px;
    height: 35px;
    margin-top: 1.5EM;
    border: 3px solid #D6C27A;
    text-transform: uppercase;

    cursor: pointer;
    color: #AC8100;
    font-weight: bold;
    letter-spacing: 3px;
    background: url(Sito/images/botton.png);
}

#contactform input.button:active{
    color: white;
    background: url(Sito/images/botton_hover.png);
}

#contactform input.button{
    text-align: center;
}

.campo_dati p {
    margin-top: 30px;   
}

.campo_dati input[type="radio"]{
    margin-bottom: 0px;
}

#contactform .campo_dati li {
    margin-top:0px;
    margin-right:30px;
}

这是我创造的经典asp

    <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

    <% 
    nome = request.Form("nome")
    indirizzo = request.Form("indirizzo")
    telefono = request.Form("telefono")
    email = request.Form("email")

    ordine = request.Form("ordine")


    ' istanza di CDO.Message
    set CDOmail = CreateObject("CDO.Message")

CDOmail.To = "tariccopaolo@alice.it"
CDOmail.From = "smtp.tuodominio.it"
CDOmail.Subject = "Nuovo ordine"

你知道帮我完成ASP文件,以便通过连接收音机底部????

来工作

由于

1 个答案:

答案 0 :(得分:0)

这是一个非常基本的经典ASP电子邮件表单,您可以添加自己的html和CSS以使其看起来更漂亮。您可能需要添加一些其他参数,具体取决于SMTP服务器的位置和配置。

如果您愿意,您可以将asp和html放在单独的文件中,但是我发现在一个文件中使用它会使事情变得更容易,特别是当您开始添加服务器端验证并且您想要如果用户错过字段,输入无效的电子邮件地址等,则将用户发回表单。

<%
If request("submit") <> "" Then
Set objEMail = Server.CreateObject("CDO.Message")
objEMail.To = "you@yourdomain.com"
objEMail.From = Request("name")& "<" & Request("from") & ">"
objEMail.ReplyTo = Request("from")
objEMail.Subject = Request("subject")
objEMail.TextBody = Request("message")  
objEMail.Send()
Set objEMail = Nothing
%>
<html>
<body>
<h3>Thank you for your message</h3>
</body>
</html>
<% Else %>
<html>
<body>
<form method="post">
<label>Name:</label><input type="text" name="name" /><br />
<label>Email address:</label><input type="text" name="from" /><br />
<label>Subject:</label><input type="text" name="subject" /><br />
<label>Message:</label><textarea name="message"></textarea><br />
<input class="button" type="submit" name="submit" value="Send" />
</form> 
</body>
</html>
<% End If %>

您无法为CDO.Message对象创建自己的属性,您可以使用的属性对应于电子邮件的字段,即From,To,Subject,TextBody,HTMLBody,CC,BCC等。< / p>

您可以在TextBody或HTMLBody中使用多个表单字段,而不是

objEMail.Indirizzo = Request("indirizzo")
objEMail.Telefono = Request("telefono")
objEMail.Email = Request("email")
objEMail.Consegna = Request("consegna")
objEMail.Specifiche = Request("specifiche")

你应该有像

这样的东西
 objEMail.TextBody = "Indirizzo:" & Request("indirizzo") & vbcrlf & "Telephono:" & Request("telefono")  & vbcrlf & "Email:" & Request("email") & vbcrlf & Request("consegna") & vbcrlf & Request("specifiche")

vbcrlf是在短信中添加换行符。

要从单选按钮列表中检索所选值,您可以使用Request("dati")

我推荐此页http://www.paulsadowski.com/wsh/cdo.htm

编辑2

重新提供您在paulindustry.altervista.org/contact_form_2.html上提供的链接 - 几点

  1. 显然你需要给它一个.asp扩展名,以便它可以作为一个asp页面。

  2. 你需要在objEmail之后关闭引号来重置(我的错误) objEMail.To = "you@yourdomain.com"

  3. 您需要在页面的最后添加<% End if %>

  4. 如果您的表单中没有任何内容填充主题字段,那么最好使用类似objEMail.Subject = "Form Submission"的内容,这将导致您收到的电子邮件的标题为“表单提交”。没有标题的电子邮件通常会被垃圾邮件过滤器捕获。

  5. 只需将您的单选按钮字段添加到objEmail.Textbody,例如

    objEMail.TextBody = "Indirizzo:" & Request("indirizzo") & vbcrlf & Telephono:" & Request("telefono") & vbcrlf & "Email:" & Request("email") & vbcrlf & "Consegna:" & Request("consegna") & vbcrlf & "Specifiche:" & Request("specifiche") & vbcrlf & "Dati:" & Request("dati")

  6. 为了同意条款和条件,复选框字段可能比包含一个按钮的单选按钮字段更有用。