Question

我有这个表格

<form action="http://www.mysite.com/asp/formd.asp" method="post" target="_blank">

所以asp看起来如下，

它会打开一个新窗口，其中显示“发送确定”

我的问题是如何以及在哪里可以控制/定义这个新窗口的样式，即背景字体颜色等感谢

ASP代码：

<%@ Language=VBScript %>

<%

Dim txtbody
Dim objCDO
Set objCDO = Server.CreateObject("CDONTS.NewMail")

objCDO.To = "mail@mail.com"
objCDO.From = "digital@adinet.com"
objCDO.Subject = "* *Formu enviado desde web * *"

txtbody = ""
for a = 1 to Request.Form.Count
 txtbody = txtbody & Request.Form.Key(a) & " = " & Request.Form(a) & chr(10) & chr(13)
next

for a = 1 to Request.QueryString.Count
 txtbody = txtbody & Request.QueryString.Key(a) & " = " & Request.QueryString(a) & chr(10) & chr(13)
next

txtbody = txtbody & "*******-----------------******"

objCDO.Body = txtbody

objCDO.Send

Response.Write "send = Ok"

%>

Answer 1

如果您希望网页或消息更有意义，请考虑替换此

Response.Write "send = Ok"

用这个：

Response.Redirect "email-thank-you.htm" 'or .asp, whatever you like.

然后尽可能精心地将新页面email-thank-you.htm设为装饰和样式。这有助于将您的电子邮件逻辑包含在一个页面或功能中，并与精美页面分开。如果发生了某些事情，即电子邮件服务器不可用，或者电子邮件地址可能格式错误/丢失，您可以将其写回原始页面。

Answer 2

如果我理解你正在做什么，你应该创建一个名为emailForm.asp的静态表单，其中包含你想要的样式。让它读取您传递的查询字符串，并将值放在字段中。在当前页面上放置链接以弹出此页面。

Answer 3

你的最后一行Response.Write "send = Ok“正在输出为一个格式错误的html页面。

我建议您按如下方式构建页面：

<%@ Language=VBScript %>
<!DOCTYPE html 
     PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
     "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html>
<head>
 <!-- Add header info, including links to style sheets -->
</head>
<body>
<%
'Your CDO code goes here

  objCDO.Send

  if err.number > 0 then
    response.write "<p class='error'>Error: " & err.number & " - " & err.message & "</p>"
  else
    Response.write "<p class='ok'>Sent OK</p>"
  end if
%>
</body>
</html>

这将呈现一个完整的html页面，您可以正确设置样式（并且也不会假定电子邮件发送正常！）。

asp形式的问题

3 个答案: