Je suis débutant en programmation , j'ai rencontré un problème , mon programme affiche des valeurs sur un message box et ces valeurs doivent être stocké dans une base de données SQL server que j'ai déjà créer , mais ce que j'arrive pas a faire , est d’insérer ce message box ou bien le Contenu de ce message box dans ma base de données !! est ce qu'il ya une solution ?!!
S'il vous plait j'ai besoin d'aide !
NHenry
Messages postés15112Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention13 avril 2024159 28 mai 2013 à 12:49
Bonjour,
Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).
Sans ton code (et quelques explications le concernant), on ne pourras pas beaucoup t'aider.
v----Signature--------v----------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list ---
Mon site
voici mon code pour l'affichage du message box et pour l’insérer mais la démarche pour l’insérer ne marche pas
Sub Main()
Console.WriteLine("Waiting For Client...")
Server.Start()
Client = Server.AcceptTcpClient()
Stream = Client.GetStream()
cn.Open()
While True
Console.WriteLine("Receiving...")
Dim RecvBytes(Client.ReceiveBufferSize) As Byte
Stream.Read(RecvBytes, 0, Client.ReceiveBufferSize)
Dim RecvText As String = Encoding.ASCII.GetString(RecvBytes)
MsgBox(RecvText)
Try
' Insérer une valeur '
cmd = New SqlCommand("insert into Client values('" + MsgBoxResult() + "')", cn)
cmd.ExecuteNonQuery()
Catch ex As Exception
Finally
cn.Close()
End Try
End While
Dim SendBytes() As Byte = Encoding.ASCII.GetBytes("HI")
Stream.Write(SendBytes, 0, SendBytes.Length)
End Sub
NHenry
Messages postés15112Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention13 avril 2024159 28 mai 2013 à 13:02
Bonjour,
Essayes de mettre Console.WriteLine(ex.ToString) dans ton catch, tu as peut être une erreur ...
v----Signature--------v----------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list ---
Mon site
NHenry
Messages postés15112Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention13 avril 2024159 28 mai 2013 à 20:33
Bonjour,
D'où vient le MsgBoxResult() ?
v----Signature--------v----------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list ---
Mon site