asp实现获取MSSQL数据库表指定条件行数的函数

　　'数据库表行数函数，这是取表的行数

　　Function GetTblRows(TblName)

　　'如果TblName表名值为空，则

　　if TblName="" Then

　　GetTblRows="未知TblName"

　　exit Function

　　Else

　　set rec = server.createobject("adodb.recordset")

　　SQL="EXEC sp_spaceused "&TblName

　　rec.open sql,conn,1,1

　　GetTblRows=Trim(rec("rows"))

　　rec.close

　　set rec=nothing

　　end if

　　End Function

　　<%=GetTblRows("表格名称")%>