功 能:根据sql语句取得纪录集 返回值:Object 纪录集对象 参 数: strSelect : String 用于生成记录集的SQL语句 举 例: Dim rs Set rs = db.GetRecordBySQL("Select a.Id, a.LastName, b.Group From User a InnerJoin Depart b On a.GroupId = b.GroupId") 'Your Code Here ... db.C(rs)
原 型:dbCtrl.GetRecordDetail(TableName, Condition) 功 能:根据某一条指定纪录的详细数据 返回值:Object 纪录集对象 参 数: TableName : String 表名称 Condition : String or Array 查询条件,如果是数组应遵循前面的参数约定 举 例: Dim rs, Id Id = Request.QueryString("id") Set rs = db.GetRecordDetail("TestTable","Id=" & id) 'Your Code here... db.C(rs)
说 明:就像你已经看出来的一样,这个最常用在打开某个详细页面(比如新闻内容页面)
原 型:dbCtrl.AddRecord(TableName, ValueList) 功 能:添加一个新的纪录 返回值:新记录的Id号(成功) or 0 (失败) 参 数: TableName : String 表名称 ValueList : Array 插入表的字段和值,只能是数组且应遵循前面的参数约定 举 例: Dim fName, fSex, fWorkYear, fBirth fName = "王二坛" fSex = "男" fWorkYear = 12 fBirth = Cdate("1981-10-23") Dim result result = db.AddRecord("TestTable",Array("Name:"&fName, "Sex:"&fSex, "WorkYear:"&fWorkYear, "Birthday:"&fBirth, "IsActive:True")) If result<>0 Then Response.Write("添加记录成功!此记录的自动编号Id为" & result) End If