Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : textbox et datagrid [ Base de données / Access ] (Syxfull)

jeudi 19 avril 2007 à 14:52:43 | textbox et datagrid

Syxfull

Bonjours a tous,

   Voici mon probléme je dispose d'une datagrid allimenté par une BDD access jusque là no souci ^^

   A present je voidrais savoir comment réalisé la fonction suivant :
             click sur un cellule
                     recupération du numéro de ligne
                           Affichage du contenu des différentes Cellule dans des Textbox prevu pour modification et update de la BDD

   je ne connai VB que depuis une semaine pour un stage et entrer directement dans le sujet est assez compliqué.

Merci.

jeudi 19 avril 2007 à 16:07:25 | Re : textbox et datagrid

DARKSIDIOUS

Membre Club Administrateur CodeS-SourceS
Il me semble qu'il faut utiliser la fonction Column du datagrid en lui spécifiant le titre de la colonne (je sais plus, ca fait longtemps que j'utilise plus ce contrôle, je lui préfère le SCGrid : aussi rapide mais bien plus pratique à utiliser !).



jeudi 19 avril 2007 à 16:58:27 | Re : textbox et datagrid

Syxfull

donc j'arrive a récupéré le numéro de ligne avec

Private Sub DataGrid_vanne_Click()
   Dim ligne As Integer

   Txt_ligne = DataGrid_vanne.Row          'affichage dans un text box pour visualisation direct

End Sub

maintenant je sais pas comment affiché dans un textbox le contenu de la colonne X sachant la ligne  et les nom des colonne
sinon je passe par un recordset j'ai pu voir qu'il y avais interraction entre les deux et un system de coordonnné ....(colonne ligne)
donc je cherche a faire un truc du style:

txt_nom = Datagrid. "blabla"(nom de la colonne, ligne)    je sais pas comment arriver a un résultat comme celui-ci

et sinon comment interdire au gens de modifier directement a l'interrieur de la grid? un case que j'ai pas coché?


jeudi 19 avril 2007 à 17:14:14 | Re : textbox et datagrid

DARKSIDIOUS

Membre Club Administrateur CodeS-SourceS
arf, pas fait gaffe que c'était pour du .net, je pourrais pas t'aider plus vu que je fais pas de .net.



vendredi 20 avril 2007 à 12:04:54 | Re : textbox et datagrid

adamo901

pourquoi tu ne fais pas du dot net.
tu as souvent de très belle solutions, et migrer vers le dot net sembleêtre une bonne chose!!
n'est ce pas??

vendredi 20 avril 2007 à 12:18:38 | Re : textbox et datagrid

DARKSIDIOUS

Membre Club Administrateur CodeS-SourceS
Lol, j'ai mes raisons que j'ai déjà exposé en large et en travers : j'ai préféré passer à un langage bien plus pérenne que le vb : le java.
Tu as les mêmes fonctionnalités que le .net, les mêmes inconvénients, mais surtout, sun au moins ils respectent la compatibilité avec les anciennes versions.



vendredi 20 avril 2007 à 14:00:23 | Re : textbox et datagrid

adamo901

J'essai de faire le même virage : du VB6 vers le java.
Je suis entrain de preparer une certification. mais avec les contraintes de mon travail, je trouve dificilement le temps!!

et bonne chance à tout le monde

lundi 23 avril 2007 à 08:57:00 | Re : textbox et datagrid

Syxfull

Euh on pe revenir a ma question svp

Moi j'ai pas le choix donc qui peut m'aider a trouvé la solution?

lundi 23 avril 2007 à 14:22:20 | Re : textbox et datagrid

flacheur123

je sais pas si c'est pratique mais je crois que ca peux t'aider


Private Sub DataGrid1_Click()

Text4 = DataGrid1.Row
If Not Adodc1.Recordset.RecordCount = 0 Then
    Text1.Text = IIf(IsNull(Adodc1.Recordset!id), "", Adodc1.Recordset!id)
    Text2.Text = IIf(IsNull(Adodc1.Recordset!nom), "", Adodc1.Recordset!nom)
    Text3.Text = IIf(IsNull(Adodc1.Recordset!prenom), "", Adodc1.Recordset!prenom)
      Else
    Text1.Text = IIf(IsNull(Adodc1.Recordset!id), "", Adodc1.Recordset!id)
    Text2.Text = IIf(IsNull(Adodc1.Recordset!nom), "", Adodc1.Recordset!nom)
    Text3.Text = IIf(IsNull(Adodc1.Recordset!prenom), "", Adodc1.Recordset!prenom)
End If

End Sub


lundi 23 avril 2007 à 15:23:31 | Re : textbox et datagrid

Syxfull

Réponse acceptée !
Ceci est un code utilisant un module ADODB pour la connection cependant j'ai trouvé la solution

je recupere le numéro de ligne et la clef primaire:

Dim cle As String
Dim Ligne As Integer
 'On recupere la valeur Cle de la ligne sur laquelle on a cliquésous forme d'une chaine
   Ligne = DataGrid_vanne.Row
   cle = DataGrid_vanne.Columns(0).CellValue(DataGrid_vanne.RowBookmark(Ligne))
   Txt_Nom = cle 'On Rempli le champ Nom
     
'Fonction de connection non détaillé ici mais c'est juste uen connection a la base de donné comme les autres   
   If Funct_Open_ADODB_Recordset(Chemin_BDD_Biblio, "", "", BDD_Table_Parc_Vanne) Then
           
                'On recherche le Numéro Clé Primaire de l'enregistrement a effacer
                ADODB_Recordset.Find "Numéro = '" & cle & "'", , adSearchForward, 1 '
               
                'Si la recherche a Trouve l'element avant la fin de la base de données
                If Not ADODB_Recordset.EOF Then
                    'On modife les enregistrements en cours
                    Txt_Designation = ADODB_Recordset![Descriptif].Value
                    Cbo_Materiel = ADODB_Recordset![Materiel].Value
                    Cbo_API = ADODB_Recordset![Automate].Value
                    Cbo_Tete = ADODB_Recordset![Tete].Value

on oublit pas de fermé les actions et c'est bon



Cette discussion est classé dans : textbox, bdd, datagrid, cellule


Répondre à ce message

Sujets en rapport avec ce message

le datagrid m'efface toujours la première cellule!!! [ par Dom ] voila, c'est un peu embetant :((Merci à tous requetes [ par soph-mef ] Dans mon projet, j'ai un controle datagrid, un controle ADO data, un bouton de commande rechercher et deux controles textbox. Je voudrais que l'utilis RECUPERE CELLULE D'1 DATAGRID [ par sweeping ] Je voudrais récupérer une cellule dans une datagrid, pour toute les lignes de la datagrid affichée (afin de faire un test sur la meme cellule de chaqu Comment récuperer l'adresse d'une cellule Excel dans un Textbox [ par lewis77 ] Comment récupérer l'adresse d'une cellule excel choisie et pointé par un utilisateur dans un controle textbox?exemple du formulaire:" Indiquez la cell datagrid [ par sophmef1 ] Dans mon form j'ai un datagrid, un controle adodc, un textbox,un bouton de commande.Je voudrais lancer une requête en cliquant sur le bouton selon le modifier une BDD existante placée sur un serveur [ par test66 ] En fait, voila l'état des lieux : Il y a une base de données existante sur un serveur. Je peux visualiser les tables avec Microsoft SQL server 7 mais modifier 1 BDD sur 1 serveur [ par test66 ] En fait, voila l'état des lieux : Il y a une base de données existante sur un serveur. Je peux visualiser les tables avec Microsoft SQL server 7 mais Largeur Colonne DataGrid [ par xabi62 ] Comment définir une largeur automatique selon la longueur du texte saisi dans la cellule.G calculer lalongueur de la chaine de la cellule mais je n'ar recup de la valeur d'une cellule [ par polac ] C'est encore moi.J'ai un DataGrid rempliPour récuperer la valeur d'une cellule, je fais : NomGrille.Columns(0).textJe recupère ainsi la valeur... m UserForm et Format [ par PatWolver ] Bonjour à tous,Mon problème est le suivant :J'ai créé un userform contenant un textbox. Ce textbox a pour la propriété ControlSource "Feuil1!A1" (ce q


Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Appels d'offres

Téléchargements

Logiciels à télécharger sur le même thème :



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,296 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.