2011-03-14 9 views
0

J'ai créé un formulaire de saisie dans lequel je souhaite travailler comme un journal quotidien. L'utilisateur entre un titre, une date, une heure et l'entrée de texte réelle. À la fin est un bouton et je pense que je dois faire un clic "événement" pour faire tout le texte à partir des boîtes de saisie stockées quelque part. Je veux que chacune de ces soumissions soit distincte pour chaque jour avec la possibilité de montrer l'entrée de journal pour chaque jour plus tard. Je suis un novice, mais je pense que les données doivent aller à une base de données. Impossible de trouver un exemple de code pour enregistrer les données de formulaire dans une base de données. La base de données que j'ai créée est "une base de données locale". Vous ne savez pas si cela doit être "Dataset" ou "Entity Data Model".Formulaire Express Visual Basic 2010 vers la base de données

S'il vous plaît montrez-moi un code pour cela ou un moyen d'enregistrer des informations sans base de données en utilisant uniquement le code vb.

Répondre

2

Il existe de nombreuses façons de procéder. Même avec VB Net, vous avez encore besoin d'écrire du code pour enregistrer les choses d'un formulaire que vous souhaitez enregistrer. La question que vous posez n'a pas de réponse simple. D'après votre question, je pense que vous n'avez pas vraiment un «cadre de référence commun» pour comprendre les réponses que quelqu'un pourrait vous donner ici. Vous aurez besoin de savoir quelle base de données vous utilisez et avez l'idéal des moyens appropriés pour vous connecter à cette base de données. Et vous devrez trouver des moyens de traiter vos données depuis et vers votre base de données. Quelle que soit la méthode que vous aurez besoin de connaître un peu de SQL de base, vous savez "Sélectionnez ceci de là où quelque chose =" avec sql insert et mise à jour etc

Laissez-moi vous donner un exemple très "laconique" de la façon d'obtenir données d'un formulaire à une base de données, de sorte que vous pouvez comprendre un peu de la portée du défi.

Sub button4_Click (expéditeur de ByVal comme System.Object, ByVal e comme System.EventArgs)

Dim newid As Integer = Insert (TextBox1.Text)

End Sub

Fonction Insert (ByVal décision As String) As Integer

 Dim Con As New SqlClient.SqlConnection(vConString) 

     Dim cmd As SqlClient.SqlCommand = Con.CreateCommand 

     Dim c As Integer = 0 

     cmd.CommandType = CommandType.StoredProcedure 

     cmd.Parameters.Add("@title", SqlDbType.VarChar, 50).Value = Ruling 

     cmd.CommandText = "InsertRuling" 


     Try 
      Dim R As SqlClient.SqlDataReader 
      Con.Open() 
      R = cmd.ExecuteReader 
      While R.Read() 
       c = R.Item(0) 
      End While 
      R.Close() 
     Catch ex As Exception 
      Debugger.Break() ' 
     Finally 
      If Not Con Is Nothing Then 
       Con.Close() 
      End If 
     End Try 
     Return c 
    End Function 

Cette fonction se connecte à la base de données, insère un enregistrement et renvoie la nouvelle ID (clé primaire) du nouvel enregistrement. La procédure stockée est une procédure stockée dans la base de données (dans ce cas, la base de données est un serveur SQL, la plupart des bases de données ont des procédures stockées). Le paramètre contient la valeur réelle que j'écris dans la base de données. Voici la procédure stockée, BTW la procédure stockée est quelque chose que vous écrivez, ce n'est pas quelque chose qui existe déjà dans la base de données.

PROCÉDURE dbo.InsertRuling ALTER

@title as nvarchar(50 

AS

INSERT INTO décisions (titre) VALEURS (@title)

/* SET NOCOUNT ON */

SELECT @@identity as nid 

/* SET NOCOUNT ON */Vous pouvez également renoncer à la procédure et écrire directement dans la base de données en modifiant quelques éléments de votre fonction.Toute méthode que vous utilisez nécessite que vous soyez capable d'écrire du SQL.

Sub Insert(ByVal Ruling As String) 

     Dim Con As New SqlClient.SqlConnection(vConString) 

     Dim cmd As SqlClient.SqlCommand = Con.CreateCommand 


     cmd.CommandType = CommandType.Text 

     cmd.CommandText = "INSERT INTO Rulings (Title) VALUES (" & Ruling & ")" 


     Try 
      Con.Open() 
      cmd.ExecuteNonQuery() 
     Catch ex As Exception 
      Debugger.Break() ' 
     Finally 
      If Not Con Is Nothing Then 
       Con.Close() 
      End If 
     End Try 

    End Sub 

Net fournit un moyen de connecter vos contrôles directement à la base de données en utilisant des ensembles de données, mais vous devez toujours être capable de comprendre comment écrire sql, et comprendre quelque chose sur les données que vous allez lire et écrire à partir de la base de données. Les instructions de mise à jour, d'insertion et de sélection dans la base de données sont générées automatiquement, mais vous avez toujours besoin d'un cadre de référence commun avec SQL pour comprendre quand et comment les utiliser, et aussi les modifier. Rendez-vous dans une librairie et obtenez un gros livre sur la programmation de VB.net. Il y en a plusieurs là-bas et ils couvrent tous les bases de VB net et bases de données et vous donnera assez de syntaxe SQL pour se débrouiller à propos de n'importe quoi, alors que vous gagnerez de l'expérience, cela deviendra plus facile.

Questions connexes