<%@LANGUAGE="VBSCRIPT" %>
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>用户留言</title>
</head>
<body >
<table width="102%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center">
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" >
<tr>
<td height="370" valign="top" bgcolor="#FFFFFF">
<TABLE width="778" border=0 align="center" cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD width="400%" height="16" colspan="2" valign="top"><TABLE width="778" border=0 align="center" cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD height="56" colspan="3" valign="top" bgColor=#EFEFEF><div align="center">
<table width="778" border="0" align="center" cellspacing="0" bgcolor="#FFDDFF">
<tr>
<%
if request("my")="check" then
account=request("account")
pwd=request("pwd")
if account="baiwanpp" and pwd="baiwanpp" then
response.Redirect("messagev.asp")
else
response.Redirect("sorry2.htm")
end if
end if
%>
<td bgcolor="#FFFFFF"><table width="775" border="0" cellpadding="0" cellspacing="0" bgcolor="#753A00">
<tr>
<td width="775" height="33" bgcolor="#FFF3EE">
<form method="post" action="message.asp?my=check">
<table width="708" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#F9F9F9">
<tr bgcolor="#F7F7F7">
<td width="129"> <div align="center">客户管理员登录</div></td>
<td width="61" height="31">
<div align="center">帐号：</div></td>
<td width="84"> <div align="center">
<input name="account" type="text" size="12">
</div></td>
<td width="54"> <div align="center">密码：</div></td>
<td width="107"> <div align="center">
<input name="pwd" type="password" size="12">
</div></td>
<td width="198"> <div align="center">
<input type="submit" name="Submit3" value="提交">
<input type="reset" name="Submit4" value="重置">
</div></td>
</tr>
</table>
</form></td>
</tr>
</table> </td>
</tr>
<%
set rs=server.CreateObject("adodb.recordset")
sqltext="select *from message"
rs.open sqltext,conn,3,3
rs.addnew
if request("act")="add" then
rs("msg_name")=request.Form("msg_name")
rs("msg_company")=request.Form("msg_company")
rs("msg_address")=request.Form("msg_address")
rs("msg_content")=request.Form("msg_content")
rs("msg_phone")=request.Form("msg_phone")
rs("msg_email")=request.Form("msg_email")
rs("msg_time")=request.Form("msg_time")
end if
'更新数据库记录
rs.update
%>
<script language="VBS">
<!--
alert(" 你的信息提交成功")
-->
</script>
<tr>
<td bgcolor="#FFF3EE"> <form name="form2" method="post" action="message.asp?act=add">
<table width="708" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#F3F3F3">
<tr bgcolor="#E3E3E3">
<td height="35" colspan="2"> <div align="center"><strong><font size="+1" color="#000000">客户留言页面</font></strong></div></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="174"> <div align="right"><font color="#330033">姓名：</font></div></td>
<td width="524" height="27"><font color="#400040">
<input type="text" name="msg_name">
</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="174"> <div align="right"><font color="#400040">所属公司：</font></div></td>
<td width="524" height="27"> <input type="text" name="msg_company"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="174"> <div align="right"><font color="#400040">地址：</font></div></td>
<td width="524" height="27"> <input type="text" name="msg_address"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> <div align="right"><font color="#400040">留言内容：</font></div></td>
<td><font color="#400040">
<textarea name="msg_content" cols="45" rows="5"></textarea>
</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="20"> <div align="right"><font color="#400040">联系电话：</font></div></td>
<td width="524" height="27"> <font color="#400040">
<input name="msg_phone" type="text" size="40">
</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="20"> <div align="right"><font color="#400040">电子邮箱：</font></div></td>
<td width="524" height="27"> <font color="#400040">
<input name="msg_email" type="text" size="40">
</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="20"> <div align="right"><font color="#400040">留言时间：</font></div></td>
<td width="524" height="27"> <font color="#400040">
<input type="text" name="msg_time" value="<%=now()%>" readonly="yes">
</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="28" colspan="2"> <div align="center"><font color="#400040">
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重置">
</font></div></td>
</tr>
</table>
</form>
</td>
</tr>
<%
'关闭记录集对象
rs.close
%>
</table>
</div>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</td>
</tr>
</table>
</div>
</td>
</tr>
</table>
<%
'关闭数据库连接
conn.close
%>
</body>
</html>
-------------------------------------------------------------------------------------这是的代码？错误出现在哪啊？
为什么我一打开这个网页，怎么信息框就出现，提交信息后再出现，怎么才能避免一打开网页就出现这个信息框，但是提交信息后还是要出现，谢谢！！！！
