|
<%=nomedapagina%>
- Administração
<%'Criamos o objeto RS, selecionamos o usuário pelo login e a senha
Set RS = Server.CreateObject("ADODB.RecordSet")
Query = "SELECT * FROM membros WHERE sua_senha='"&session("pass")&"' and seu_login='"&session("user")&"' "
RS.Open Query, Conexao, 3, 3
'Falamos que nome é rs("seu_nome")
nome = rs("seu_nome")
'Se clicks for nulo colca fala que a variavel cliques será -
'Se não ele fala que cliques será rs("clicks")
If rs("clicks") = "" Then
cliques = "-"
else
cliques = rs("clicks")
End If
'Fala que ima é rs("imagem"), exibicao_seu é .... e assim vai até id
ima = RS("imagem")
exibicao_seu = RS("exibicao_seu")
hit = RS("hit")
id = RS("tc_id")
'Caso cliques for 0 ou exibacao_seu for 0
'ele fala que doratio será -
'Se não ele fala ele faz várias contas para chegar a uma porcentagem de aproveitamento
If cliques = "0" OR exibicao_seu = "0" Then
DoRatio = "-"
Else
DoRatioSub = cliques/(exibicao_seu/100)
DoRatioSub2 = Round(DoRatioSub,2)
DoRatio = DoRatioSub2 & "%"
End If
%>
| Nome
do responsável: <%=nome%> |
Data
da inscrição: <%=rs("data")%> |
|
|
| Crédito(os):
<%=rs("creditos")%> |
Seu
banner exibido: <%=hit%> |
Click's
no seu banner: <%=cliques%> |
| Bonificação:
<%=rs("bonificacao")%> |
Banner
exibido no seu site: <%=exibicao_seu%> |
Aproveitamento:
<%=DoRatio%> |
| |
| |
| <%=rs("site")%> |
| |
| Código
para ser colocado em seu site: |
|
|
|