Poner condicion antes de insertar registro

[futacullin]

Necesito ayuda, es lo siguiente, tengo un formulario de registro.html con 2 campos: nombre y numero de mesa, los datos los recibe el archivo insertar.asp, en este ultimo necesito colocar dentro del código un script asp que condicione el ingreso de un nuevo registro dependiendo de la cantidad de personas inscritas por numero de mesa (5 como máximo), si me explico bien que cuando un usuario se inscriba en una mesa que esta llena le muestre un mensaje de error y si no le permita el registro.

necesito su ayuda pues no se como hacerlo

de ante mano gracias por vuestra ayuda
pd: los datos se graban en una BD access 2000

[daniel00]

Que tal futacullin.

Pues más o menos así:

Código:

lstSQL = "SELECT Count(*) as Conteo FROM Mesa Where Mesa = " & laMesa
Set myRecorset  = myConexión.Execute (lstSQL)
if myRecorset(0) > 5 then
 reponse.write "Ya no hay Cupo"
Else
 inscribirlo()
 response.write "Ya estas inscrito!!"
End If

Saludos!

[Shiryu_Libra]

esa seria una buena solucion, pero por que no mejor al hacer la lectura de tus mesas, ves si esta llena o no??

si esta llena, escribes a un lado de ese nombre(nombre de la mesa), "no hay cupo", caso contrario permites la ejecucion del script que Daniel00 te ha escrito

[daniel00]

De hecho son las dos.

En la primer página muestras las mesas con el cupo actual, si ya se lleno, lo indicas con un mensaje.

Y en la segunda válidas que efectivamente no este lleno, como lo mostre anteriormente.

Saludos!

[futacullin]

Gracias por sus respuestas, pero necesito un poco de orientacion, tengo el archivo registro.html dejo parte del código

<FORM METHOD="POST" ACTION="insertar.asp">
Nombre<br><INPUT TYPE="TEXT" NAME="nombre"><br>
numero de mesa<br><INPUT TYPE="TEXT" NAME="mesa"><br>

el codigo del archivo insertar.asp es algo asi:
<%
'Recogo los valores del formulario
nombre=Request.Form("nombre")
mesa= Request.Form("mesa")

'me conecto a la base de datos
user.mdb

'creo la sentencia SQL para insertar los registros
sSQL="Insert Into inscritos (nombre,mesa) values ('" & nombre & "','" & mesa & "')"

set RS = oConn.Execute(sSQL)
%>
mi duda es en que parte coloco el codigo para contar la cantidad de registros de este numero de mesa ("mesa"). la condicon es, si la cantidad supera las 5 personas no permitir el registro (y mostrar mesa llena), si la cantidad es menor a 5 permitir el registro. por su ayuda gracias.

[Shiryu_Libra]

de hecho Daniel00(), te respondio Futacullin

Iniciado por daniel00

Que tal futacullin.

Pues más o menos así:

Código:

lstSQL = "SELECT Count(*) as Conteo FROM Mesa Where Mesa = " & laMesa
Set myRecorset  = myConexión.Execute (lstSQL)
if myRecorset(0) > 5 then
 reponse.write "Ya no hay Cupo"
Else
 inscribirlo()
 response.write "Ya estas inscrito!!"
End If

Saludos!

respecto a como implementarlo. tienes esto

Iniciado por futacullin

<%
'Recogo los valores del formulario
nombre=Request.Form("nombre")
mesa= Request.Form("mesa")

'me conecto a la base de datos
user.mdb

'creo la sentencia SQL para insertar los registros
sSQL="Insert Into inscritos (nombre,mesa) values ('" & nombre & "','" & mesa & "')"

set RS = oConn.Execute(sSQL)
%>

tu codigo deberia quedar de la siguiente forma

Código PHP:

     'Recogo los valores del formulario
  nombre=Request.Form("nombre")
  mesa= Request.Form("mesa")
 
'me conecto a la base de datos
user.mdb
lstSQL = "SELECT Count(*) as Conteo FROM Mesa Where Mesa = " & mesa
Set myRecorset  = myConexión.Execute (lstSQL)
if myRecorset(0) > 5 then
 reponse.write "Ya no hay Cupo"
 Else
 'creo la sentencia SQL para insertar los registros
sSQL="Insert Into inscritos (nombre,mesa) values ('" & nombre & "','" & mesa & ")"
set RS = oConn.Execute(sSQL)
response.write "Ya estas inscrito!!"
 End If  
   

suerte

[futacullin]

Agradecido por vuestra ayuda, problema solucionado.

Gracias