这个asp文件是用来给数据库添加记录的,读取表单中的值,一个是表名,另一个是语句,如果在SQL文本框中填入(id,xiaoguo,zhanshiyemian)values(222,'xiaoguo','zhanshiyemian')    可以!
如果填入(id,xiaoguo,zhanshiyemian)values("&id&",'xiaoguo','zhanshiyemian')     红色行提示参数不足,期待是1. 请高手帮帮忙吧!
[color=008000]<form method="POST" action="shujukutianjia.asp">

<p>表:&nbsp;&nbsp;&nbsp;&nbsp; <input type="text" name="biao" size="20"></p>

<p>sql语句:<input type="text" name="yuju" size="129"></p>

<p>&nbsp;<font color="#C0C0C0" size="2">

格式:(id,xiaoguo,zhanshiyemian)values(222,'xiaoguo','zhanshiyemian')</font></p>

<p><input type="submit" value="修改" name="B1"><input type="reset" value="重置" name="B2"></p>
</form>
<script language="javascript">
alert ("确定要修改吗?")
</script>
<%
biao=request.form("biao")
if biao="" then 
response.write "<font color=red>缺少表名!</font>"
response.end
end if
exec=request.form("yuju")
if exec="" then 
response.write "<font color=red>缺少语句!</font>"
response.end
end if
Set conn=server.CreateObject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("\ku.mdb")
   sql="Select * from "&biao&""
   set rs=server.createobject("adodb.recordset")
   rs.open sql,conn,1,1
   rs.movelast
   id=int(rs("id")+1)
   exec="insert into "&biao&exec
   response.write biao&"<br>"&exec&"<br>"
     response.write id&"<br>"
   [color=FF0000]conn.execute exec[/color]
 
   rs.close
   set rs=nothing
 conn.close
 set conn=nothing

 response.write "<font color=red>修改成功!</font>"
 %>[/color]