Informatique
	EXPERTISE, CONSEILS, FORMATION, ACCOMPAGNEMENT AU CHANGEMENT Solution Intranet, Extranet et Internet Accompagnement et formation au travail collaboratif Accès à la rubrique

Formation
	FORMATION SALARIES ETUDIANTS APPRENTIS. Bureautique, Internet, Sciences de la vie, Mathématique, Physiques Aéronautique Accès à la rubrique

Biologie
	RECHERCHE Biologie cellulaire Biologie moléculaire Génétique Accès à la rubrique

Aéronautique
	PILOTE PRIVE D'AVION Enseignant - aéronautique - aéromodélisme en savoir plus

Faire une insertion en boucle

<%@LANGUAGE="VBSCRIPT"%>
<%
set Cnbd = Server.CreateObject("ADODB.Recordset")
Cnbd.ActiveConnection = "dsn=webselection;uid=web;"
%>

<%
Dim z
Dim val
Dim u

z=request.form("langue").Count

if request.form("langue").Count then
for u=1 to z
val=request.form("langue")(u)

Cnbd.Source = "INSERT INTO dbo.test (Critere) Values ('"&val&"')"
Cnbd.Open

next
end if