[Resolvido] Limitar cadastro

[Carlos Moreira 0]

Pessoal tenho duas tabelas aqui

 

CLIENTE

-CliId

-CliNome

 

IMAGEM

-ImagId

-Imag1

-ImagCliId

 

eu cadastro o cliente numa coluna da tabela IMAGEM porem eu preciso limitar os cliente a cadastrar apenas 10 imagens, como faço?

 

OBS: Banco MYSQL

[Dee 0]

Faz um contador, coloca em sessão e cada upload de imagem você soma 1, quando for 10, você trava o upload, trava o botao, sei lah qqr coisa =)

[Carlos Moreira 0]

Eu tenho um Fomulário IMAGENS

 

onde o cliente selecione a imagem e grava no banco, portante preciso de um comando que Set o banco e verifique se ja tem 10 registro com determinado ID, e se somar 10 ele da um aviso antes do cadastro.

[Dee 0]

$sql = "select count(imagem) as total_imagens from usuarios where id_usuario = 1"

$exe = mysql_query($sql);

$res = mysql_result($exe, 0, 'total_imagens');

 

if($res == 10)

{

echo "Limite excedido";

}

 

[Carlos Moreira 0]

Entendi a logica só no sei a linha de comando.

 

minha base de busca é essa:

 

sql = "SELECT * FROM colecao where ColCliId = '"&CliId&"'"

Set RScolecao = Conn.Execute(sql)

 

como ficaria aqui?

[xanburzum 169]

você pode ler a quantidade de imagens, usando FSO , para contar as extensoes da img, e quando o user for fazer mais um UPLOAD, antes você faz um SELECT no banco para ver quantos existem e pode exibir para ele,

"select count(imagem) as total_imagens from usuarios where id_usuario = 1"

tipo:

você tem 5 imagens

 

e podendo, exibir as imagens k estaun cadastradas, para npo caso se ele kiser atualizar ou excluir uma

[Carlos Moreira 0]

Certo! seria isso mesmo, eu ja tenho um painel onde ele edita, deleta e inseri imagens.

 

Gostaria de fazer uma condição na pagina que eu cadastro a imagem:

 

Se CLIENTE > CliQuantImag Então

 

Response.Redirect "Pagina_Aviso.asp"

 

como poderia faze-lo? lembrando que minha estrurua é esta baixo

 

CLIENTE

-CliId

-CliQuantImag

 

IMAGEM

-ImagId

-Imag1

-ImagCliId

[xanburzum 169]

você faz um select na sau base , passando como WHERE o cliente, você pode usar o SUM ou um contador em FSO, podendo até exibil-as ao user, faz um simples IF

[Carlos Moreira 0]

Como ficaria a função com SUM? por gentileza teria como posta pra mim? nao sei como montar o mando! levando como base as informações que passei da minha base da dados com as respectivas tabelas.

[xanburzum 169]

<% call abreconexao

 

'crio o rs

set rs=Server.CreateObject("ADODB.Recordset")

'crio o SQL

"select count(imagem) as total_imagens from usuarios where id_usuario = 1"

rs.open SQL,conexao,1,3

total=rs("total_imagens")

while not rs.eof

total2="Total de Imagens" & total

[Carlos Moreira 0]

Consegui fazer deu certo, porem na hora de cadastrar esta aparecendo esse erro:

 

"Microsoft VBScript runtime error '800a000d'

Type mismatch"

Call abre_conexao1(ConnString,Conn)
Set RScolecao = Conn.Execute("SELECT count(ColCliId) as TotalImagens FROM colecao Where ColCliId= "&Session("CliId")&"")

TotalImagens= RScolecao("TotalImagens")
TotalCadastro = Session("CliQuantImag")


If TotalImagens = TotalCadastro or TotalImagens > TotalCadastro Then '(O Erro esta nasta linha)
Response.Redirect"colecaocliente_limiteimagem.asp"
End If

RScolecao.Close 
Set RScolecao = Nothing
Call fecha_conexao1()

O que pode ser?

[xanburzum 169]

veja se o tipo de dado esta correto,por exemplo, se naun esta passando um valor num em uma string

[Carlos Moreira 0]

ja chequei o valor do Session esta correto! ele vem junto quando é feito o LOGIN.

O que pode ser fora isso sera?

[xanburzum 169]

dá um response.write na sua string SQL para ver o k esta sendo passado

[Carlos Moreira 0]

dei um response nos dois

 

TotalImagens= RScolecao("TotalImagens")

TotalCadastro = Session("CliQuantImag")

 

AMBOS aparecem

 

10

10

 

Deu certo! resgatei assim a condição

 

If ""&TotalImagens&"" = ""&TotalCadastro&"" or ""&TotalImagens&"" > ""&TotalCadastro&"" Then
Response.Redirect"colecaocliente_limiteimagem.asp"
End If

Obrigado pessoal!