Accueil > > > CRÉATION D'UNE LISTE DE CHOIX, DONT LES OPTIONS SONT ISSUES D'UNE BASE DE DONNÉES.
CRÉATION D'UNE LISTE DE CHOIX, DONT LES OPTIONS SONT ISSUES D'UNE BASE DE DONNÉES.
Information sur la source
Description
Liste de choix : sélection d'une catégorie de site internet.
Source
- <%
- ' Declaration de la connexion base de donnees
- Dim DSN_BASE
- DSN_BASE = "DBQ=" & Server.Mappath(".Nom_Base.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25"
- Set CONNFavoris = Server.CreateObject("ADODB.Connection")
- CONNFavoris.ConnectionTimeout = 30
- CONNFavoris.CommandTimeout = 30
- CONNFavoris.Open DSN_BASE
-
-
- ' Construction de la requete SQL
-
- RequeteSQL = "SELECT DISTINCT Genre FROM Nom_Table"
-
- ' Recup des donnees dans la base
- Set objRecordset = Server.CreateObject("ADODB.Recordset")
- objRecordset.Open RequeteSQL,CONNFavoris
- %>
- <html>
- <head>
- <title>Selection</title>
- </head>
-
- <body>
- <H4>Sélectionnez une catégorie</h4>
- <form name="Choix" Action="find2.asp" method="post">
- <select name="Selection" size="1">
- <%
- objRecordset.MoveFirst
-
- Do While Not objRecordset.EOF
- %>
- <option value="<%=objRecordset("Genre")%>"><% =objRecordset("Genre")%></option>
- <%
- objRecordset.MoveNext
- Loop
- %>
- </select>
- <input name="Lancer" Type="submit" Value="Lancer la recherche">
- </form>
-
-
- </body>
- </html>
<%
' Declaration de la connexion base de donnees
Dim DSN_BASE
DSN_BASE = "DBQ=" & Server.Mappath(".Nom_Base.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25"
Set CONNFavoris = Server.CreateObject("ADODB.Connection")
CONNFavoris.ConnectionTimeout = 30
CONNFavoris.CommandTimeout = 30
CONNFavoris.Open DSN_BASE
' Construction de la requete SQL
RequeteSQL = "SELECT DISTINCT Genre FROM Nom_Table"
' Recup des donnees dans la base
Set objRecordset = Server.CreateObject("ADODB.Recordset")
objRecordset.Open RequeteSQL,CONNFavoris
%>
<html>
<head>
<title>Selection</title>
</head>
<body>
<H4>Sélectionnez une catégorie</h4>
<form name="Choix" Action="find2.asp" method="post">
<select name="Selection" size="1">
<%
objRecordset.MoveFirst
Do While Not objRecordset.EOF
%>
<option value="<%=objRecordset("Genre")%>"><% =objRecordset("Genre")%></option>
<%
objRecordset.MoveNext
Loop
%>
</select>
<input name="Lancer" Type="submit" Value="Lancer la recherche">
</form>
</body>
</html>
Conclusion
Une fois la sélection faite, le fichier FIND2.ASP affiche les sites internet correspondant à votre choix de catégorie.
Sources de la même categorie
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
Remplir une liste deroulante (données base acces) selon un choix dans une autre liste deroulante [ par ruth ]
Bonjour,J'ai un formulaire où j'ai une liste déroulante remplis à partir d'une base accès.Selon le choix dans cette liste je veux
Liste Déroulante liée Base ACCESS [ par Marcello50310 ]
ASP.NET-ACCESS 97Bonjour Quelqu'un aurait-il un exemple de liste déroulante liée a une base de donnée Access 97 ? Je ne trouve par d'ex
liste déroulante - lister base de données [ par xclear ]
Bonjour, un petit coup de pouce j'ai une base access: 1champs ID, 1 champs Nom, 1 champs Ville. 1 formulaire avec une liste déroulante <
liste de choix [ par meryfille ]
bonjour j'ai un petit prôbleme(excel) je veux convert une cellule comme combobox (liste de choix) Merci pour votre aide just mery
Aspnetdb & co [ par Djzlouk ]
Bonjour, J'ai une question d'architecture ! C'est relativement simple... Quand je cré un projet, j'ai la creation d'une base de données aspnetdb.mdf
liste à choix multiple [ par RugbyOne ]
Bonjour, Je cherche comment on récupère les items sélectionnés dans un Pour le reste, c'est Request.form(mon_champ), mais là ça fonctionne comment
Création 3 listes déroulantes conditionnelles en cascades [ par yasashii ]
Bonjour à toutes et tous, Je me permets de vous envoyer mes questions autour d’une gestion de liste déroulante conditionnelle dans un formulaire Acce
Connexion database via URL... [ par Steeve Le Provost ]
Hi everybody ! Je souhaiterais me connecter a une base de donnée á partir d'une adresse URL...Il faudrait que je puisse gérer des Connection strings d
AUCUNE VALEUR DANS FORMULAIRE [ par lardereau ]
Bonjour,Je vous explique mon problème qui n'est certes pas compliqué mais je dois que je sèche.Dans une page asp, j'ai un formulaire avec une "Liste/M
programmation ASP liste de choix événements [ par didi ]
Bonjour: je suis un jeune dévéloppeur en ASP et je suis en ce moment en train d'utiliser une liste de selection qui se charge à partir d'une table j'a
|
Derniers Blogs
XNA IS DEAD!XNA IS DEAD! par richardc
Depuis la semaine dernière (et grâce aux TechDays 2012), je me penche activement sur la nouvelle version de Windows, aka Windows 8. Vous me direz, il était temps puisque la première preview date de Septembre dernier.
OK. Remarquez, on n'en est qu'aux...
Cliquez pour lire la suite de l'article par richardc TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 !TECHDAYS PARIS 2012 : WINDOWS SERVER "8" QUOI DE 9 ! par ROMELARD Fabrice
Speakers: Fabrice Meillon et Stanislas Quastana Cette session est basée entièrement sur celle donnée lors de la BUILD cet hiver. Il n'y a pas d'ajout d'information en rapport avec cet évènement passé. Windows 8 Server sera intégralem...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice [HTML5] AUTOUR DU W3C : NOUVEAUX STANDARDS ET WEB MOBILE (LILLE)[HTML5] AUTOUR DU W3C : NOUVEAUX STANDARDS ET WEB MOBILE (LILLE) par Gio
Je m'y prends un peu tard je sais, mais bon je suis développeur web et donc hyper fainéant ! Toujours dans le cadre des technologies émergentes, ici HTML5, parce qu'on aime HTML5 chez Wyg , nous seront présent, le vieux ( Aurélien V.) et moi, pour pr...
Cliquez pour lire la suite de l'article par Gio [WP7] DYNAMICALLY CHANGE STARTUP PAGE[WP7] DYNAMICALLY CHANGE STARTUP PAGE par KooKiz
Let's say that you want to allow the user to customize the startup page of your application. You can easily change the startup page by editing the 'NavigationPage' attribute in the manifest file. But the manifest cannot be modified once the applicatio...
Cliquez pour lire la suite de l'article par KooKiz
Forum
RE : FORMULAIRERE : FORMULAIRE par ap24dp
Cliquez pour lire la suite par ap24dp RE : FORMULAIRERE : FORMULAIRE par jopop
Cliquez pour lire la suite par jopop RE : FORMULAIRERE : FORMULAIRE par ap24dp
Cliquez pour lire la suite par ap24dp RE : FORMULAIRERE : FORMULAIRE par jopop
Cliquez pour lire la suite par jopop
Logiciels
DocTranslate (V3.1.0.0)DOCTRANSLATE (V3.1.0.0)DocTranslate est un traducteur de document Microsoft Word, PowerPoint et Excel. Il permet d'autom... Cliquez pour télécharger DocTranslate Tribler (2012)TRIBLER (2012)Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des... Cliquez pour télécharger Tribler OneSwarm (2012)ONESWARM (2012)Le peer-to-peer qui protège votre vie privée, c'est OneSwarm.
Ce logiciel de peer-to-peer crypté... Cliquez pour télécharger OneSwarm PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System
|