大家好，我是ASP莱鸟，现在做一个报名表，向数据库提交信息不报错，可就是数据库为空，急死我了，跪求高手帮忙啊，先谢谢了
提交代码如下：<!--#include file="conn.asp" -->
<!--#include file="config.asp" -->
<%

Set rs=Server.CreateObject( "ADODB.Recordset ")
rs.open  feedbackinfo,conn,adopenkeyset,adlockoptimistic,adcmdtext

name=request("name")
sex=request("sex")
minzu=request("minzu")
age=request("age")
zzmm=request("zzmm")
whcd=request("whcd")
sfzh=request("sfzh")
byyx=request("byyx")
zhuanye=request("zhuanye")
gzsj=request("gzsj")
zhiye=request("zhiye")
yzbm=request("yzbm")
address=request("address")
yddh=request("yddh")
jtdz=request("jtdz")
phone=request("phone")
leixing1=request("leixing1")
xxxs1=request("xxxs1")
xlcc=request("xlcc")
wyyz=request("wyyz")
leixing2=request("leixing2")
xxxs2=request("xxxs2")

set rs=getrecordset("websking,mdb","feedbackinfo")
rs.addnew array("name","sex","minzu","age","zzmm","whcd","sfzh","byyx","zhuanye","gzsj","zhiye","yzbm","address","yddh","jtdz","phone","leixing1","xxxs1","xlcc","wyyz","leixing2","xxxs2"),_
             array(name,sex,minzu,age,zzmm,whcd,sfzh,byyx,zhuanye,gzsj,zhiye,yzbm,address,yddh,jtdz,phone,leixing1,xxxs1,xlcc,wyyz,leixing2,xxxs2)
   
rs.update

rs.close                  
set conn=nothing
conn.close                 
set rs=nothing
%>

set rs=getrecordset("websking,mdb","feedbackinfo")

应该是.mdb吧？？

你这个代码不是常规写法，看的不是很明白，有些变量没有在这个文件里定义

恩，这个改过来了也不行

修改成这样

<!--#include file="conn.asp" -->
<!--#include file="config.asp" -->
<%

Set rs=Server.CreateObject( "ADODB.Recordset ")
rs.open  feedbackinfo,conn,adopenkeyset,adlockoptimistic,adcmdtext
set rs=getrecordset("websking,mdb","feedbackinfo")
rs.addnew
rs("name")=request("name")
rs("sex")=request("sex")
rs("minzu")=request("minzu")
rs("age")=request("age")
rs("zzmm")=request("zzmm")
rs("whcd")=request("whcd")
rs("sfzh")=request("sfzh")
rs("byyx")=request("byyx")
rs("zhuanye")=request("zhuanye")
rs("gzsj")=request("gzsj")
rs("zhiye")=request("zhiye")
rs("yzbm")=request("yzbm")
rs("address")=request("address")
rs("yddh")=request("yddh")
rs("jtdz")=request("jtdz")
rs("phone")=request("phone")
rs("leixing1")=request("leixing1")
rs("xxxs1")=request("xxxs1")
rs("xlcc")=request("xlcc")
rs("wyyz")=request("wyyz")
rs("leixing2")=request("leixing2")
rs("xxxs2")=request("xxxs2")
rs.update
rs.close                  
set conn=nothing
conn.close                 
set rs=nothing
%>

版主，谢谢您的回答，可是我改了还是不行，帮我想想问题可能出在哪呀，愁死了

看不出来问题，能否把整站文件上传？这样可以帮你试试

谢谢，太谢谢了，留下我的qq：35495829
可否请大侠留下QQ呀

文件已看，似乎你的代码是不是从别的地方拼凑出来的。

先看看论坛置顶帖里的【新手必看】，会有帮助的。晚上上线加你QQ。


conn.asp中有一行on error resume next，把它删除们就会显示错误提示了。

saveinfo.asp前半部分代码，改了一下，你自己看哪些改了，可以用了

<!--#include file="conn.asp" -->
<!--#include file="config.asp" -->
<%

Set rs=Server.CreateObject("ADODB.Recordset")
rs.open "select * from feedbackinfo",conn,1,3
rs.addnew
rs("name")=request("name")
rs("sex")=request("sex")
rs("minzu")=request("minzu")
rs("age")=request("age")
rs("zzmm")=request("zzmm")
rs("whcd")=request("whcd")
rs("sfzh")=request("sfzh")
rs("byyx")=request("byyx")
rs("zhuanye")=request("zhuanye")
rs("gzsj")=request("gzsj")
rs("zhiye")=request("zhiye")
rs("yzbm")=request("yzbm")
rs("address")=request("address")
rs("yddh")=request("yddh")
rs("jtdz")=request("jtdz")
rs("phone")=request("phone")
rs("leixing1")=request("leixing1")
rs("xxxs1")=request("xxxs1")
rs("xlcc")=request("xlcc")
rs("wyyz")=request("wyyz")
rs("leixing2")=request("leixing2")
rs("xxxs2")=request("xxxs2")
rs.update
rs.close                 
set rs=nothing
conn.close                
set conn=nothing
%>