begin process at 2012 02 16 19:40:57
  Trouver un code source :
 
dans
 
Accueil > Forum > 

VB.NET et VB 2005

 > 

Base de données

 > 

Access

 > 

textbox et datagrid


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

textbox et datagrid

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ée 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

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), 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

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,139 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales