大家帮我看一下这个程序有什么问题？

rs.open sql,conn,1,3 .你把这个写成rs.open sql,conn,3,3试试。还有就是 可能其中的一个字段的类型不匹配。个人感觉会在时间那�

所有的字段类型我都设置的是文本格式，就是怕是字段类型有问�

还是不行，barryww，再帮我看看，不知道怎么回事，晕�

<form id="form1" action="xqdc.asp" method="post" >
 
 <label>公司名称:
 <input type="text" name="c-name" />
 </label>
 <label>公司地址:
 <input type="text" name="c-address" />
 </label>
 <label>联 系 人:
 <input type="text" name="c-contact" />
 </label >
 <label >联系电话:
 <input type="text" name="c-tel" />
 </label>
 <label >联系邮箱:
 <input type="text" name="c-email" />
 </label>
 <label>培训内容:
 <input type="text" name="t-content" />
 </label>
 <label>培训时间:
 <input type="text" name="t-time" />
 </label>
 <label>培训对象:
 <input type="text" name="t-target" />
 </label>
<input name="" type="submit" value="提交" />
<input name="" type="reset" value="重置" />


</form>

哎~！
为了给你个答案，我查我的东西 ，中毒了~~！
不知道该不该怪你啊 `�

这是 我写的 你看看吧
<!--#include file="connDB.asp" -->
<%
Dim st
Set st = Server.CreateObject("ADODB.RecordSet")
 st.Open "SELECT * FROM [User]",conn,1,3
 st.AddNew
 st("name") = Request("txtname")
 st("gender") = Request("rdUserGender")
st("home") = Request("txtHome")
st("email") = Response("txtEmail")
st("phone") = Response("txtphone")
st("Description")=Response("txtDescription")
 st("RegistTime") = Now
 st.Update
%>
<title>填写成功</title><table width="209" border="0" align="center" cellpadding="5" cellspacing="2">
 <tr>
 <td width="195">恭喜您已经填写完成，如果有其他需要，可以拨打本公司的订购热线:021-63830652</td>
 </tr>
 <tr>
 <td><a href="index.asp">点击这里返回</a></td>
 </tr>
</table>

<%
 st.Close
 st = Nothing
%>

啊哦 不好意思 发错了~~！
<!--#include file="connDB.asp" -->
<%
Dim st
Set st = Server.CreateObject("ADODB.RecordSet")
 st.Open "SELECT * FROM [User]",conn,1,3
 st.AddNew
 st("name") = Request("txtname")
 st("gender") = Request("rdUserGender")
st("home") = Request("txtHome")
st("email") = Request("txtEmail")
st("phone") = Request("txtphone")
st("Description")=Request("txtDescription")
 st("RegistTime") = Now
 st.Update
%>
<title>填写成功</title><table width="209" border="0" align="center" cellpadding="5" cellspacing="2">
 <tr>
 <td width="195">恭喜您已经填写完成，如果有其他需要，可以拨打本公司的订购热线:021-63830652</td>
 </tr>
 <tr>
 <td><a href="index.asp">点击这里返回</a></td>
 </tr>
</table>

<%
 st.Close
 st = Nothing
%>

跟我的一样啊，你的能运行么？

dim rs sql 这句你改改 落了个逗号 dim rs ,sql，改完之后再看看还有没有别的错误。
以后不要犯这种低级错误了。
另外出现500错误，你该把你浏览器的友好提示错误关了，可以看到详细的出错信息。