1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
| ' Insere dans la table Avis les différents choix effectués par l utilisateur Ex. coca, chaise etc...
' et reprend son nom
for i = 1 to Request.QueryString("choix").Count
Com = Request.QueryString("commentaires")
Commentaires = Com & i
NomV = NomVotant & i
OpRep = Request.QueryString("choix")
set RSInsertChoixUser = Server.CreateObject("ADODB.Recordset")
Response.Write "Choix effectués 'OpRep' : " & OpRep & "|<br>"
SQLInsertChoixUser ="INSERT INTO Avis (NomVotant, avis, VoteOptionId) VALUES ('" &NomV& "','" &Commentaires& "'," &OpRep& ");"
RSInsertChoixUser.open SQLInsertChoixUser, Conn, 3, 3
Next |