Le Deal du moment :
SSD interne Crucial BX500 2,5″ SATA – 500 ...
Voir le deal
29.99 €

Urgent !!

Page 3 sur 4 Précédent  1, 2, 3, 4  Suivant

Voir le sujet précédent Voir le sujet suivant Aller en bas

Urgent !! - Page 3 Empty Urgent !!

Message par HOUCINE Jeu Juil 07, 2011 7:17 pm

Rappel du premier message :

Sallam,
j'ai besoin de Code VB pour enregistrer les données d'une base de
donnée Sql vers un fichier.text merci d'avance ?!!


HOUCINE
HOUCINE
 
 

Nombre de messages : 11
Date d'inscription : 07/07/2011
Masculin

Revenir en haut Aller en bas


Urgent !! - Page 3 Empty Re: Urgent !!

Message par HOUCINE Ven Juil 08, 2011 7:38 pm

chof la variante 4 / 2010 ila kan moumkin rah fiha dak qustion dyal trigger !!
et merci d'avance !!


HOUCINE
HOUCINE
 
 

Nombre de messages : 11
Date d'inscription : 07/07/2011
Masculin

Revenir en haut Aller en bas

Urgent !! - Page 3 Empty Re: Urgent !!

Message par Mr.Hicham Ven Juil 08, 2011 10:57 pm

je sai pa 3lash katahdar la variante 4 rani deja khdamtha b9at ghi la partie web

Regarde Ici


Mr.Hicham
Mr.Hicham
 
 

Nombre de messages : 464
Date d'inscription : 25/05/2010
Masculin

Revenir en haut Aller en bas

Urgent !! - Page 3 Empty Re: Urgent !!

Message par HOUCINE Sam Juil 09, 2011 10:24 am

Ok mon mi c po grave normalement 0.25pnt olla 0.5 c po chi 7aja niiiiiiiit
je souhaite a vous et tous les TDI2 bonne courage incha2llah examen ikoun très facile Wink


HOUCINE
HOUCINE
 
 

Nombre de messages : 11
Date d'inscription : 07/07/2011
Masculin

Revenir en haut Aller en bas

Urgent !! - Page 3 Empty Re: Urgent !!

Message par hassnaa66 Sam Juil 09, 2011 10:44 am

Voila un code simple si vous n'avez pas creer le fichier .il sera creer automatique

Dim chemin As New String("C:\fichier.txt")
Dim ligne As String() = New String(ds.Tables("produit").Rows.Count - 1) {}
Dim i As Integer

For Each dr As DataRow In ds.Tables("produit").Rows

ligne(i) += dr.ItemArray.GetValue(0).ToString
ligne(i) += dr.ItemArray.GetValue(1).ToString
ligne(i) += dr.ItemArray.GetValue(2).ToString
i = i + 1

Next
File.WriteAllLines(chemin, ligne)
MsgBox("Enregistrement est bien fait")


dans ce cas j'ai 3 colone dans ma table c'est pour cela j'ai mit 3 ligne(i)

bon chance tester ca marche bien en plus il est facile


hassnaa66
hassnaa66
 
 

Nombre de messages : 31
Date d'inscription : 09/05/2010
Féminin

Revenir en haut Aller en bas

Urgent !! - Page 3 Empty Re: Urgent !!

Message par HOUCINE Sam Juil 09, 2011 11:30 am

merci bien ma sœur hassaa a toi aussi bn courage Wink


HOUCINE
HOUCINE
 
 

Nombre de messages : 11
Date d'inscription : 07/07/2011
Masculin

Revenir en haut Aller en bas

Urgent !! - Page 3 Empty Re: Urgent !!

Message par Contenu sponsorisé




Contenu sponsorisé


Revenir en haut Aller en bas

Page 3 sur 4 Précédent  1, 2, 3, 4  Suivant

Voir le sujet précédent Voir le sujet suivant Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum