[Resolvido] Limitar cadastros

[Vagner Nunes 0]

Prezados,

 

Bom dia. Estou criando uma página para alunos realizar inscrições para 4 tipos de oficinas, porém preciso limitar a quantidade de aluno em cada oficina. Como posso fazer isso?

 

Ex.: tenho o curso Língua Portuguesa = 20 alunos

Língua Espanhola = 20 alunos

Língua Inglesa = 20 alunos

Literatura Inglesa = 20 alunos

 

Daí quando for feita a inscrição de número 21 não aceitar a inscrição.

 

Alguém pode me ajudar? Estou usando banco Access.

 

Sds,

 

Vagner Nunes

[Public2004 79]

O ideal seria antes de mostrar a informações de cadastro/inscrição já verificar e mostrar a msg ao usuário que não existem mais vagas. Para isso basta varrer a tabela de cadastro e contar os registros (recordcount).

 

Att.

[Gilberto Jr 26]

como o public2004 disse

 

no inicio da pagina de cadastro voce faz o select

select count(*) as total from tb_cadastro
'no corpo da pagina mostramos o form se nao tiver 20 registro e se tiver mostramos uma mensagem

if total=20 then
<form>
</form>
else
response.write "ja atingimos o total de alunos"
end if

[Vagner Nunes 0]

Funcionou certinho aqui, porém gostaria de saber como faço para este SELECT buscar a oficina escolhida de um form de página anterior.

 

Fiz abaixo uma modificações e funcionou certinho, porém precisaria que onde esta escrito Oficina de Artes, fosse buscando de um formulário e depois mostrar também em um formulário desta página o campo oficina já preenchido na página anterior, porém não conseguir fazer funcionar de jeito nenhum.

 

Posso fazer com que o SELECT faça o COUNT(*) + mostrar dados do campo Oficina?

 

"SELECT count(*) as total  FROM inscricoes  WHERE oficina = 'Oficina de Artes'"

Aguardo contato,

 

Sds,

 

Vagner Nunes

[Public2004 79]

Você pode enviar esta variável através de um campo oculto do formulário, ex:

<input type="hidden" name="curso" value="Oficina de Artes" />

E recuperar na página seguinte normalmente:

Request.Form("curso")

e trate como necessário.

 

Att.

[xanburzum 169]

através de um IF simples, verificando o valor astrado no BD e caso for > 20, você coloca uma mensagem de inscrições encecadrradas

dependendo da situacaun melhor usar um contatdor normal ou a clausula count do SQL, pois se o seu bd for muito grande o recordcount do objeto recordset para apresentar queda de desempenho

e para usar o RecordCount , seu cursortype tem k ser recordset.CursorType = 3 (AdOpenDynamic)

 

exemplo:

<%
DIM mySQL, objRS
mySQL = "SELECT * FROM myTable" 
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open mySQL, objConn

' Count how many records exist
DIM iRecordCount
iRecordCount = 0
DO WHILE NOT objRS.EOF
iRecordCount = iRecordCount + 1
objRS.MoveNext
Loop

' Display result
Response.Write "(" & iRecordCount & ")"

objRS.Close
Set objRS = Nothing 
objConn.Close
Set objConn = Nothing
%> 

SQL COUNT

 

<!--#INCLUDE VIRTUAL="/includes/connection.asp" -->

<%
DIM mySQL, objRS
mySQL = "SELECT Count(*) AS intTotal FROM myTable" 
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open recSQL, objConn

' Display result
Response.Write objRS("intTotal")

objRS.Close
Set objRS = Nothing 
objConn.Close
Set objConn = Nothing
%> 
 

[Vagner Nunes 0]

Beleza, agora funcionou do jeito que estava querendo, valeu mesmo!!!

[Gilberto Jr 26]

Falou man. precisando estamos ae

[xanburzum 169]

ok ,beleza