Como Coloco Estatisticas Do Membros Cadastrados
#1
Posted 10/06/2004, 20:30
att,
#2
Posted 11/06/2004, 01:39
Tente assim :
<%
set conn = server.createobject ("ADODB.connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("db2.mdb")
Set rs =Server.CreateObject("ADODB.Recordset")
SQL = "select top 5 * from members order by memid desc"
Set rs = Conn.Execute(SQL)
If rs.EOF Then
Response.Write "Nenhum usuario cadastrado"
else
do while num < 5
response.write rs("usern")
num=num+1
rs.MoveNext
Loop
End If
%>
e a quantidade seria mais ou menos assim:
<%
set conn1 = server.createobject ("ADODB.connection")
conn1.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("membros/db2.mdb")
Set rs1 =Server.CreateObject("ADODB.Recordset")
SQL1 = "select count(*) as Total From members"
Set rs1 = Conn1.Execute(SQL1)
If rs1.EOF Then
Response.Write "0"
End If
%>
<%=rs1("Total")%>
Funcionou né?
T+
Generation..
“Obstáculos são aquelas coisas medonhas que você vê quando tira seus olhos de seu objetivo” (Henry Ford)
“É impossível para um homem aprender aquilo que ele acha que já sabe.” (Epíteto)
“A única razão da existência do tempo é para que todas as coisas não aconteçam de uma vez.”(Albert Einstein)
0 user(s) are reading this topic
0 membro(s), 0 visitante(s) e 0 membros anônimo(s)