这个错误很难找出来的

谢谢做人很低调.不过按照您的方法改正后.还是原来的错误

Dim strSQL,objRS
strSQL="select * from person where id="'&id&'""
strSQL=strSQL & "and password="'&password&'""
set objRS=GetSQLRecordset(strSQL,"data/data.mdb","Users")

先不要用你写的GetSQLRecordset过程
先把数据库链接的代码提出来放到文件开始
set objRS = Server.CreateObject("ADODB.RecordSet")
objRS.Open strSQl,conn,1,1
在正常写打开记录集的代码 看看报不报错

如果不报错 正常的话 那就是你写的GetSQLRecordset过程有问题

耐心的调调吧

[此贴子已经被作者于2007-2-3 9:29:03编辑过]

谢谢谢谢谢谢,谢谢你耐心的教我

我把数据库处理的过程直接写出来后,调试成功了.

Dim strSQL
strSQL="select * from person where id='"&id&"'"
strSQL=strSQL & "and password='"&password&"'"

Set objConn=Server.CreateObject("ADODB.Connection")
objConn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"&"Data Source="&Server.MapPath("data/data.mdb")
objConn.open
Set GetSQLRecordset=Server.CreateObject("ADODB.Recordset")
GetSQLRecordset.Open strSQL,objConn,1,1

这样就对了.

能告诉我为什么我写个过程用来调用就不行了吗?

我有一些建议

说给你听听 你看看我说的对不对

第一你的想法是好的 自己写一个过程 以后写程序会带来方便 大大减少了代码的重复书写
但你看你写的GetSQLRecordset过程 里边有连接数据库的代码
也就是说你调用一个这个过程就要打开一次数据库 你认为这种方法可取否？

第二建议你多看看VBScript的知识
了解一下Function和Sub 这二种过程的区别？作用域等概念

我想你要是把你写的Function改成Sub过程的话就应该好用了 我要说了完了。。。

恩.谢谢.你的建议我牢记在心