Sur ASP SVP.... - Programmation
Marsh Posté le 06-06-2001 à 09:00:16
bonjour,
Il faut que tu inséres ton code dans une page ASP, puis que tu inséres dans ta page ASP une commande INCLUDE ( voir le code ci-dessous que j'utilise°.Il n'est pas encore optimisé mais cela fonctionne.
<%
Option Explicit
Dim strconnect
%>
<!-- #include file="ConnectionBanque.asp" -->
<!-- METADATA TYPE="typelib"
FILE="C:\Program Files\Fichiers Communs\System\ado\msado15.dll" -->
<!-- #include file="List_data.asp" -->
<BASEFONT FACE="Comic Sans MS" COLOR="DarkBlue">
<HTML>
<HEAD>
</HEAD>
La ligne #include file="ConnectionBanque.asp" permet d'avoir accès au fonctions contnues dans le fichier ConnectionBanque.asp.
Tu peux remarque que je fais appel en dessous à List_data.asp. Ce fichier contient un ensemble de fonctions utiles pour effectuer des traitements sur la base de données. Il s'agit par exemple de générer des list box, de mettre à jour une table, de retourner un recordset, d'effacer un enregistrement, de gérer les droits d'accès, etc.
Je t'ivite à rechercher des infos sur INCLUDE.
A+
Marsh Posté le 07-06-2001 à 08:48:53
si, je pense qu'il y a une façon plus simple. tu demande à l'utilisateur de saisir ce qu'il recherche (tu stockeras ça dans une variable du type chaine, ex: Chaine). Ton code à modifier devient alors :
<% Set OBJdbConnection = Server.CreateObject("ADODB.Connection" )
OBJdbConnection.Open "glossaire"
SQL = "SELECT * FROM T_glossaire WHERE terme like Chaine + '%'"
Set rs = OBJdbConnection.Execute(SQL)
%>
où Chaine + '%' représente la concaténation du contenu de Chaine et le caractère %
Marsh Posté le 06-06-2001 à 07:50:15
Bonjour, je cherche à afficher un glossaire(qui se trouve dans une BDD) en fonction d'une lettre que l'internaute aura selectionner dans une liste de choix. Pour l'instant, j'ai fais une page par lettre, avec le code suivant en debut de page:
<% Set OBJdbConnection = Server.CreateObject("ADODB.Connection" )
OBJdbConnection.Open "glossaire"
SQL = "SELECT * FROM T_glossaire WHERE terme like'A%'"
Set rs = OBJdbConnection.Execute(SQL)
%>Je pense que c'est cela que je dois modifier, mais comment?, merci pour votre aide