Designed by Maunakea !
68 en ligne   Boutique | Sites | Bar | Forum | PhpBB | Actu | Glossaire | Codes | Tips | Liens | Livres | Lettre  


 Recherche

 NewsLetter






   

Quizz 1.01 (1/3)

Organisez des concours sur votre site !





Didier
Dans le cadre de ses partenariats, ASP-PHP.net organise parfois des concours sous forme de Quizz permettant de faire gagner des lots divers à ses visiteurs... Une page ASP a donc été écrite pour permettre la gestion complète de ce jeu. Si elle peut vous servir...

Télécharger l'exemple complet


Introduction - Tirage aléatoire - Envoi de mail - Script complet



1. Le lien d'appel

Un simple lien javascript permet d'ouvrir la page dans un popUp :

<A href="javascript:void(0)"
   onclick="window.open('quizz.asp',null,'width=600,height=560,left=20,top=20,'
      + ' status=no, directories=no, toolbar=no, location=no, menubar=no, scrollbars=yes, resizable=no')"
>PARTICIPEZ AU CONCOURS !</A>



2. La base de données

J'utilise ici une base MSAccess quizz.mdb générée par AxS et comportant une table joueurs ayant les champs suivants :

  • ID NumAuto (entier long auto-incrémenté)  
  • Nom Texte (100)
  • Prenom Texte (100)
  • Adresse Texte (100)
  • CP Texte (20)
  • Ville Texte (100)
  • Email Texte (100)
  • Date Date/Heure
  • Score Octal
  • NbQuest Octal
  • IP Texte (20)



  • 3. Remarques

  • Ce quizz n'autorise qu'un jeu par connexion (stockage de l'IP dans la BD)... pour permettre plusieurs jeux successifs adaptez ou supprimez les lignes concernées :

    <% ' === PAGE 1 : Questions ===

    if request.form.count = 0 and request.queryString.count = 0 then

       ' 1 seule participation par IP
       Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & database
       SQL = "SELECT * FROM joueurs where IP='" & IP & "'"
       RS.open SQL,conn,3,3
       test = RS.eof
       RS.close
       Conn.close

       if not test then%>

          <script>location.replace("quizz.asp?redir")</script>
       <%end if
    %>




    4. Tirage aléatoire

    A l'issue du jeu, un tirage aléatoire doit être fait parmi les joueurs ayant répondu correctement aux questions... cette petite procédure (à appeler dans une page "admin") devrait vous aider à l'automatiser :



    _tirage.asp 
    <% ' TIRAGE ALEATOIRE DANS LA BD

    sub tirage(tours,base,requete)
       dim alea,Conn,RS,cpt,mem
       ' Connexion
       Set Conn = Server.CreateObject("ADODB.Connection")
       Set RS = server.createobject("ADODB.Recordset")
       Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & base
       ' Sélection de tous les enregistrements
       RS.Open requete,Conn,3,3
       cpt = 0 : mem = "|"
       ' En-têtes du tableau
       response.write "<table border cellspacing=0 cellpadding=2><tr>"
       for each champ in RS.Fields
          response.write "<td><b>" & champ.name & "</b></td>"
       next
       response.write "</tr>"
       ' Tirage parmi les enregistrements
       randomize
       while cpt < tours
          alea = Int(RS.recordCount * Rnd)
          ' Déjà sorti ?
          if instr(mem, "|" & cStr(alea) & "|") < 1 then
             cpt = cpt + 1
             mem = mem & cStr(alea) & "|"
             RS.moveFirst : RS.move(alea)
             ' Affiche l'enregistrement
             response.write "<tr>"
             for each champ in RS.Fields
                response.write "<td>" & RS(champ.name) & "</td>"
             next
             response.write "</tr>"
          end if
       wend
       response.write "</table>"
       ' Déconnexion
       RS.close
       Conn.close
    end sub

    ' Exemple d'appel :
    ' database = Server.MapPath("../../") & "\database\asphp2\quizz.mdb"
    ' SQL = "SELECT * FROM joueurs WHERE Score = NbQuest"
    ' tirage 2,database,SQL
    %>


  • Pour pouvoir écrire dans ce forum, identifiez-vous !

      v1.3p © ASP-PHP.net 2002  

    Didier le 26/02/2005 (100 487 hits)
    Didier Téléchargez gratuitement et légalement des logiciels Microsoft ! Si, si ;)
    • Visual Studio 2010
    • Office 2010
    • Expression Studio 3
    • SQL Server 2008
    • et d'autres...
    Au fil des news  
    Adobe - Adobe lance des applications Photoshop Express....
    PHP - Détermination de l'intersection entre 2 segments
    Magazines - Le N°132 de Programmez est disponible
    Les alertes dans SharePoint 2007 - Comment SharePoint 2007 gère les User Alerts
    Une des fonctionnalités de base de SharePoint, aussi bien dans Windows SharePoint Services (WSS) ...
    Adobe - Photoshop.com Mobile pour Android 1.2
    Adobe - Adobe dévoile une technologie de lecture.......
    PHP - Experts PHP : participez au Forum PHP 2010 !
    PHP - Fobec.com - Code source PHP & javascript
    Foliotage alphabétique - Lister sur la première lettre d'un champ
    Pour faire suite à l'article de JPierre sur la pagination alphabétique, voici, en ASP et en PHP, ...
    Dreamweaver CS4 + Php + Mysql - Pagination alphabétique
    Je vous propose la création d'une barre de navigation ou pagination alphabétique pour filtrer les ...
    Adobe - HTML5 dans Dreamweaver CS5
    VBScript - Déterminer si un chemin est absolu ou relatif
    VBScript - Lire/écrire un fichier texte
    Magazines - Le N°130 de Programmez est disponible
    Hebergement - Hébergement à prix libre
    Adobe - Adobe Creative Suite 5
    PHP - Calcul de la date de Pâques
    Magazines - Le N°128 de Programmez est disponible
    Magazines - Le N°127 de Programmez est disponible
    Dreamweaver CS4 + Php + Mysql - Trucs et Astuces - Part 6
    Pour continuer dans le même style, je vous propose une suite au précédent article. Rechercher tous ...
    Adobe - Adobe Photoshop.com Mobile pour iPhone 1.1
    JavaScript - Ajouter une page dans vos favorites
    Dreamweaver CS4 + Php + Mysql - Trucs et Astuces - Part 5 -
    Je vous propose cette fois deux astuces. Comment exporter une feuille de style avec l'aide de ...
    SharePoint Personalization Site Links - Les liens personnalisés des MySite SharePoint
    Nous avons vu dans les articles précédents comment agrémenter les pages de recherche afin de ...
    Magazines - Le n°126 de Programmez est disponible
    Outils - Traducteur en ligne automatique pour site web
    Adobe - Adobe Photoshop.com Mobile pour Iphone
    Magazines - Le n°125 de Programmez est disponible
    Adobe - Adobe AIR 2 et Flash Player 10.1version bêta
    Les conférences autour des technologies Microsoft - Liste non exhaustive des grands évènements
    Nous allons essayer de regrouper un grand nombre des évènements autour des technologies Microsoft ...
    Magazines - Le n°124 de Programmez est disponible
    PHP - Forum PHP 2009
    Composants - eFace - XAML en Java
    WPF - Désactiver le bouton de réduction d'une fenêtre
    Magazines - Le n°123 de Programmez est disponible
    Magazines - Le n°122 de Programmez est disponible
    Auditer une ferme SharePoint - Assurer le bon fonctionnement de SharePoint
    Dans le cadre de la bonne gestion de son environnement SharePoint, il est utile de faire un ...
    SQL Server 2008 Report Builder 2.0 - Installation et utilisation de Report Builder 2.0
    Dans le cadre de la création de rapports pour SQL Server Reporting Services 2008, un outil est ...
    Magazines - Le HS N° 1 de Web Design est disponible
    Outils - EntityBuilder
    Tutorial : HTML | Scripting | ASP-PHP | ASP.net | SQL Server | XML
    Sharepoint | XAML | Pocket | Dreamweaver | VML | Divers
      Scripts : Scripting | ASP-PHP | ASP.net | Divers
      Boutique | Annuaire | Bannières | Météo | Tribune | Partenariats
    v3b © Didier 2003   
     

    Corpo Sciences de Reims Partitions gratuites Carte, météo, annonces
     ASP-magazine MVP TechNet Groupes Utilisateurs Microsoft DotNet Project