ASP操作数据库的类(4)

'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

看见了吧，真的不用考虑字段的类型是什麽滴。
如果你想要代码中的字段和值看得更清楚一点，也可以这样写，但凭卿之所好：

result = db.AddRecord("TestTable",Array("Name:" & fName,_
"Sex:" & fSex,_
"WorkYear:" & fWorkYear,_
"Birthday:" & fBirth,_
"IsActive:True"))

另外，你可以用下面的语句来查看这个函数生成的sql语句：

Response.Write(db.wAddRecord("TestTable",Array("Name:"&fName, "Sex:"&fSex, "WorkYear:"&fWorkYear, "Birthday:"&fBirth, "IsActive:True")))

说 明：返回的Id值用的是比较笨的方法，并不能保证在并发数据量大的时候的准确性，慎用。

原 型：dbCtrl.UpdateRecord(TableName, Condition, ValueList)
功 能：根据指定条件更新纪录
返回值：1 (成功) or 0 (失败)
参 数：
TableName : String 表名称
Condition : String or Array 更新条件，如果是数组应遵循前面的参数约定
ValueList : String or Array 更新的字段及值，如果是数组应遵循前面的参数约定
举 例：
Dim fName, fWorkYear
fName = "王三坛"
fWorkYear = 10
Dim result
result = db.UpdateRecord("TestTable", "UId = 1308", Array("Name:"&fName, "WorkYear:"&fWorkYear))
If result<>0 Then
Response.Write("更新数据成功！")
End If

另外，你可以用下面的语句来查看这个函数生成的sql语句：

Response.Write(db.wUpdateRecord("TestTable", "UId = 1308", Array("Name:"&fName, "WorkYear:"&fWorkYear)))

原 型：dbCtrl.DeleteRecord(TableName,IDFieldName,IDValues)
功 能：删除符合条件的纪录
返回值：1 (成功) or 0 (失败)