小弟请教asp高手帮我填加一段跳转代码，小弟不胜感激，在此谢过
小弟请教asp高手帮我填加一段跳转代码，小弟不胜感激，在此谢过
<%
Dim ForUser, FromUser, ForUserEmail, FromUserEmail, SmtpServer
Dim emailTit, emailTxt, FromUserID, FromUserIDPW
emailTit = Request.Form("emailTit") '从表单获取email的标题
emailTxt = Request.Form("emailTxt") '从表单获取邮件的内容
'==========================以下绿色代码是判断服务器是否支持JMAIL组件
Function IsObjInstalled(strClassString)
On Error Resume Next
IsObjInstalled = False
Err = 0
Dim xTestObj
Set xTestObj = Server.CreateObject(strClassString)
If 0 = Err Then IsObjInstalled = True
Set xTestObj = Nothing
Err = 0
End Function
if not IsObjInstalled("JMail.Message") then
Response.write"你所使用的服务器不支持邮件发送！"
Response.End
end if
'==========================================================
if Trim(Request.Form("action")) = "确认提交" then
SmtpServer = "smtp. //修改为你使用的邮箱的smtp,如qq邮箱的：smtp.
FromUserEmail = "0000@修改为你使用的发件人的邮箱地址
FromUser = Request.Form("FromUser")
ForUserEmail = "0000@这个是你收件人的邮箱地址，即我们要收订单的那个邮箱
Dim JMail
Set JMail=Server.CreateObject("JMail.Message")
JMail.Logging=True
JMail.Charset="gb2312"
JMail.ContentType = "text/html"
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
JMail.MailServerUserName = "0000"//建议大家修改成自己的备用邮箱，对应上面的smtp的邮箱
' 身份验证的用户名
JMail.MailServerPassword = "0000"//这个是邮箱密码，这是我本人的，希望大家别盗用，因为如果人人都用这个话哪天我改了密码大家就收不到自己客户的订单信息了。
' 身份验证的密码
JMail.From = FromUserEmail '发件人的信箱
JMail.FromName = FromUser '发件人的名字
JMail.Subject = emailTit '邮件的主题
JMail.Body = emailTxt '邮件的内容
'==============================收件人的地址！
JMail.AddRecipient(ForUserEmail) '收件人的地址
JMail.Priority=5 '邮件级别1-5数字越大级别越高---3为普通邮件
JMail.Send(SmtpServer) '红色变量是邮件服务器地址
JMail.Close
Set JMail=nothing
if err then
err.clear
Response.Write "<center><b> 发信功能已经打开，但因服务器不支持发信或者信箱地址错误，导致信件无法发出！</b></center>"
Response.End
else
response.Write "<script>alert(""订单提交成功，点确定查看您的订单信息，谢谢合作!"");history.go(-1);</script>"
Response.End
end if
end if %>
<style type="text/css">
<!--
td {
font-size: 12px;
}
.area { border:1px solid #F90; overflow:auto;}
.btn { background-color:#FC6;width:70px; height:22px; color:#9a4501; border:1px solid #dbb119; font-size:12px; line-height:160%; cursor:pointer;}
.style3 {font-size: 16px; color: #FF0000; }
-->
</style>
<body>
<form action="" method="post" name="input" target="_self">
<table width="100%" border="0" align="center" cellpadding="3" cellspacing="1">
<tr >
<td width="12%" align="right" height="28"><span class="style3">商品标题：</span></td>
<td width="88%" height="28" align="left"> <input name="EmailTit" type="text" class="area" value="一疗程鼻炎药" size="20" maxlength="50">
*</td>
</tr>
<tr >
<td width="12%" align="right" height="28"><span class="style3">您的姓名：</span></td>
<td width="88%" height="28" align="left"> <input name="FromUser" type="text" size="20" class="area">
*</td>
</tr>
<tr >
<td width="12%" align="right" height="28" valign="middle"><span class="style3">您的手机：</span></td>
<td width="88%" height="28" align="left"> <input name="EmailTxt" type="text" size="20" id="EmailTxt1" class="area">
</input>*</td>
</tr>
<tr >
<td width="12%" align="right" height="28" valign="middle"><span class="style3">收货地址：</span></td>
<td width="88%" height="28" align="left"> <input name="EmailTxt" type="text" size="40" id="EmailTxt3" class="area">
*</td>
</tr>
<tr>
<td width="12%" align="right" height="20" valign="middle"></td>
<td height="33" colspan="2" align="left"> <input type="submit" name="action" value="确认提交" class="btn"></td>
</tr>
</table>
</form>
-------------------------
上面是一段在线订单系统，前台页面是这样的 提交订单后是这样的
但是点击确定后，不跳转，我想请大虾们，帮我添加一段跳转代码，就是，点击确定后可以跳转到别的页面，谢谢了
