很郁闷我刚刚学做ASP程序
然后用书上的一种方法来更新修改数据
我写的是这样的：
<!--#include file="ADOFUNCTIONS.ASP"-->
<%

Dim newstitle1,newsbody1,newsdate
newstitle1=request.Form("newstitle")
newsbody1=request.Form("newsbody")
newsdate=date()
Dim objRS, strSQL
strSQL = "SELECT * FROM news Where id="&request("id")
Set objRS= GetSQLRecordset(strSQL, "ghy.mdb", "news")
objrs.update Array("newstitle" ,"newsbody", "adddate"), _
Array(newstitle1, newsbody1, newsdate)
objrs.close
set objrs=nothing
objconn.close
set objconn=nothing

response.Write "<script language=javascript>alert('修改成功');history.go(-1);</script>"
response.End
%>

<!--#include file="ADOFUNCTIONS.ASP"-->（这个是盘里面的一个定义的文件连接数据库和定义表的应该不会有错，
我添加新闻可以成功）
希望高手快快指教我写的这个更新数据的代码哪里有问题测试的结果错误是这样的：

Microsoft JET Database Engine 错误 '80040e10'

至少一个参数没有被指定值。

/admin/ADOFUNCTIONS.ASP，行25

我不懂哪一个参数没被指定
第25行是这样的： GetSQLRecordset.Open strSQL, objConn, adOpenKeyset, adLockOptimistic, adCmdText

希望快点有高手帮我解决，无限感激！！

把ADOFUNCTIONS.ASP的代码发上来看看呗？

拜托你把所有的代码都发上来，你的问题大多出在sql语句上。

<!-- #include file="adovbs.inc" -->
<%
Dim objConn
Function GetRecordset(FileName, TableName)
'使用Connection对象打开数据库文件
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Server.MapPath(FileName)
objConn.Open

'从数据表中读取记录并存放在Recordset对象中
Set GetRecordset = Server.CreateObject("ADODB.Recordset")
GetRecordset.Open TableName, objConn, adOpenKeyset, adLockOptimistic, adCmdTable
End Function

Function GetSQLRecordset(strSQL, FileName, TableName)
'使用Connection对象打开数据库文件
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Server.MapPath(FileName)
objConn.Open

'从数据表中读取符合SQL语句的记录并存放在Recordset对象中
Set GetSQLRecordset = Server.CreateObject("ADODB.Recordset")
GetSQLRecordset.Open strSQL, objConn, adOpenKeyset, adLockOptimistic, adCmdText
End Function

Function GetSecureRecordset(FileName, TableName, Password)
'使用Connection对象打开数据库文件
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Server.MapPath(FileName) & _
";Jet OLEDB:Database Password=" & Password
objConn.Open

'从数据表中读取记录并存放在Recordset对象中
Set GetSecureRecordset = Server.CreateObject("ADODB.Recordset")
GetSecureRecordset.Open TableName, objConn, adOpenKeyset, adLockOptimistic, adCmdTable
End Function
%>
这是光盘上面的定义好的可以添加新闻删除新闻就是不能更亲

response.Write "<script language=javascript>alert('修改成功');history.go(-1);</script>"
response.End
建议你修改后不要用history.go(-1); 这样有可能出问题。

你能取到id值吗？

如何知道取不取得ID。俺不懂啊
菜死掉了请不吝赐教

还有上面的朋友，我试了不用history这个但问题依然存在
也是和上面出错是一样的
还有，ID可以传到修改的界面，就是不能修改成功晕死掉。。

1、取id的方法：a.asp?id=<%=rs("id")%>，这只是其中一种。
2、建议你不使用history，而不是说用history就不会有你问的问题，你最好用Response.Redirect("a.asp?id=<%=rs("id")%>")这样的方法。

GetSQLRecordset.Open strSQL, objConn, adOpenKeyset, adLockOptimistic, adCmdText
换成：
GetSQLRecordset.Open strSQL, objConn, 1，3
试下

[此贴子已经被作者于2005-12-29 12:39:28编辑过]

还是不行
这样子就找不到包含文件这个了