|
Remplissage de cases à cocher par programmation |
Iniciado por lotix, fev., 27 2004 1:08 PM - 1 resposta |
| |
| | | |
|
| |
Publicado em fevereiro, 27 2004 - 1:08 PM |
Je cherche, à l'ouverture d'une page, à renseigner dynamiquement les noms des options et les valeurs sélectionnées d'un groupe de cases à cocher. IE de la même façon qu'une combo mémoire de type multi-sélection.
Par exemple, dans l'exmple ci-dessous, le CAS "COMBO" fonctionne correctement mais pas le CAS "CASE" pour les combos mémoire, je fais :
////////////////////DEBUT PROC EXTERNE////////////////////// PROCEDURE InitListe(strListe, strCle , strType sont des chaînes) strSQL est une chaîne i est un entier = 0 strSQL = "SELECT LST_IDCHOIX, LST_VALEUR FROM dbo.LISTESCHOIX WHERE LST_NOM = '" + strCle + "' ORDER BY LST_RANG" SQLExec(strSQL, "REQ") TANTQUE SQLFetch("REQ") = 0 // Il y a encore une ligne à lire i++ //Cas d'une comboBox SELON strType CAS "COMBO" : SI i = 1 ALORS ListeSupprimeTout(strListe) FIN // Récupérer les données ListeAjoute(strListe, SQLLitCol("REQ", 2) + gLien(SQLLitCol("REQ", 1)))
//Cas de cases à cocher CAS "CASE" : // ListeAjoute(strListe, SQLLitCol("REQ", 2) + glien(SQLLitCol("REQ", 1))) Liste // {strListe}[i] = SQLLitCol("REQ", 2) // {strListe}[i]..Valeur = SQLLitCol("REQ", 1) FIN FIN
SQLFerme("REQ") ////////////////////FIN PROC EXTERNE////////////////////////
///////////INITIALISATION DE PGSIGNALETIQUE///////////////// InitListe("TYPEPRODUIT", "TYPEPRODUIT", "CASE") ///////////INITIALISATION DE PGSIGNALETIQUE///////////////// |
| |
| |
| | | |
|
| | |
| |
Publicado em fevereiro, 27 2004 - 3:36 PM |
Bonjoutr fait de forme suivant qui ça marche
SI Fichier.rubriquefichier= Vrai ALORS Nondetonchamp = Vrai FIN
"lotix" <lotix@vs-plongee.com> escreveu na mensagem news:403f2849$1@news.pcsoft.fr...
Je cherche, à l'ouverture d'une page, à renseigner dynamiquement les noms des options et les valeurs sélectionnées d'un groupe de cases à cocher. IE de la même façon qu'une combo mémoire de type multi-sélection.
Par exemple, dans l'exmple ci-dessous, le CAS "COMBO" fonctionne
correctement
mais pas le CAS "CASE" pour les combos mémoire, je fais :
////////////////////DEBUT PROC EXTERNE////////////////////// PROCEDURE InitListe(strListe, strCle , strType sont des chaînes) strSQL est une chaîne i est un entier = 0 strSQL = "SELECT LST_IDCHOIX, LST_VALEUR FROM dbo.LISTESCHOIX WHERE LST_NOM
= '" + strCle + "' ORDER BY LST_RANG" SQLExec(strSQL, "REQ") TANTQUE SQLFetch("REQ") = 0 // Il y a encore une ligne à lire i++ //Cas d'une comboBox SELON strType
CAS "COMBO" : SI i = 1 ALORS ListeSupprimeTout(strListe) FIN // Récupérer les données ListeAjoute(strListe, SQLLitCol("REQ", 2) + gLien(SQLLitCol("REQ", 1)))
//Cas de cases à cocher CAS "CASE" : // ListeAjoute(strListe, SQLLitCol("REQ", 2) + glien(SQLLitCol("REQ", 1))) Liste // {strListe}[i] = SQLLitCol("REQ", 2) // {strListe}[i]..Valeur = SQLLitCol("REQ", 1) FIN FIN
SQLFerme("REQ") ////////////////////FIN PROC EXTERNE////////////////////////
///////////INITIALISATION DE PGSIGNALETIQUE///////////////// InitListe("TYPEPRODUIT", "TYPEPRODUIT", "CASE") ///////////INITIALISATION DE PGSIGNALETIQUE/////////////////
|
| |
| |
| | | |
|
| | | | |
| | |
|