Derniers sujets
» Recherche de bénévoles, de scouts, d' étudiants en groupe- été 2019
[VB.NET] Base de données EmptyMar 16 Avr 2019, 16:30 par asso-msvd-msvd

» Mission humanitaire de solidarité internationale 2019 avec MSVD
[VB.NET] Base de données EmptyMar 16 Avr 2019, 16:00 par asso-msvd-msvd

» Offre de stage, mission de volontariat international avec MSVD 2019
[VB.NET] Base de données EmptyMar 16 Avr 2019, 15:59 par asso-msvd-msvd

» Missions humanitaires cet été 2019 avec MSVD
[VB.NET] Base de données EmptyMar 16 Avr 2019, 15:57 par asso-msvd-msvd

» Faculté de gouvernance, sciences économiques et sociales FGSES
[VB.NET] Base de données EmptyVen 12 Avr 2019, 10:00 par lhbilmarocain

» Actions solidaire/chantier humanitaire printemps, été, automne, hiver 2019 en Afrique avec JVSI
[VB.NET] Base de données EmptySam 16 Mar 2019, 23:57 par jvsitogo

» Offre de stages/missions de volontariat/chantiers solidaires 2019 en Afrique
[VB.NET] Base de données EmptySam 16 Mar 2019, 17:11 par jvsitogo

» Recherche bénévoles pour mission de volontariat 2019 en Afrique
[VB.NET] Base de données EmptySam 16 Mar 2019, 17:09 par jvsitogo

» Reherche de scouts, de volontaires, de stagiaires pour l'été 2019 ( msvd)
[VB.NET] Base de données EmptyLun 11 Mar 2019, 13:56 par asso-msvd-msvd

» Opportunité de stage, de tourisme, de missions humanitaires, de voyage 2019 avec msvd
[VB.NET] Base de données EmptyLun 11 Mar 2019, 13:55 par asso-msvd-msvd

» Vacances utiles avec MSVD, projets de rénovation, de construction, stages conventionnés,tourisme au Togo, Ghana,Bénin, Burkina-Faso, Sénégal
[VB.NET] Base de données EmptyLun 11 Mar 2019, 13:54 par asso-msvd-msvd

» Appel de candidatures/missions humanitaires de camps chantiers internationaux/rénovation/constructions 2019 avec msvd
[VB.NET] Base de données EmptyLun 11 Mar 2019, 13:51 par asso-msvd-msvd

» Missions humanitaires Afrique avec msvd-France
[VB.NET] Base de données EmptyLun 11 Mar 2019, 13:49 par asso-msvd-msvd

» Vacances utiles 2019 avec MSVD, stages conventionnés, missions humanitaires, tourisme
[VB.NET] Base de données EmptyLun 11 Mar 2019, 13:49 par asso-msvd-msvd

» Aventure de solidarité internationale, de partage culturel, de découverte, au Togo, au Ghana, Au burkina avec Msvd
[VB.NET] Base de données EmptyLun 11 Mar 2019, 13:48 par asso-msvd-msvd

Portail Madariss
[VB.NET] Base de données Mada311
Chat Madariss
[VB.NET] Base de données Mad11
FACEBOOK

[VB.NET] Base de données

Aller en bas

[VB.NET] Base de données Empty [VB.NET] Base de données

Message par Einstein le Sam 11 Juin 2011, 13:26

Salut,

SVP, comment on integre une base de données dans un projet VB.NET?
J'ai utilisé ceci :

Dim connexion As New SqlClient.SqlConnection

connexion = New SqlClient.SqlConnection("database = Database1;Trusted_Connection = yes")
'Database1 est le nom de la bd
Dim Mycommand As SqlClient.SqlCommand = connexion.CreateCommand()
Mycommand.CommandText = "select * from ... "
connexion.Open()
Dim myReader As SqlClient.SqlDataReader = Mycommand.ExecuteReader()

'....

myReader.Close()
connexion.Close()

Mais ça marche tjs pas !

Merci d'avance Smile
Einstein
Einstein
Encore débutant, excusez-moi d'avance
Encore débutant, excusez-moi d'avance

Féminin
Nombre de messages : 25
Age : 28
Ma ville : L'Univers!!
Date d'inscription : 27/06/2006

Revenir en haut Aller en bas

[VB.NET] Base de données Empty Re: [VB.NET] Base de données

Message par MJF le Lun 13 Juin 2011, 03:51

Imports System.Data.SqlClient
Imports System.Data
Imports System.Data.OleDb
Imports System.Data.Sql

public class nom_classe


Public Function Connecter() 'Voici une fonction de connexion
Dim w As Boolean
conn = New SqlConnection()
conn.ConnectionString = "Data Source=localhost;Initial Catalog=nom_base_donné";integrated security=true"

Try
conn.Open()
w = True
Catch ex As Exception
MsgBox("connexion échouée !!! ")
w = False
End Try
Return w
End Function

'fonction pour la recgercg et la récupération des données:

Public Sub rechercheuser()
Dim table As New DataTable
sql = "select * from om_table where blabla='" &blabla & "' and pwd ='" & pwd & "'"
command.Connection = conn
command.CommandText = sql
Try
adapter.SelectCommand = command
adapter.Fill(table)
For i As Integer = 0 To table.Rows.Count - 1
combobox.item.add ( table.Rows(i)("login"))
Next
Catch
MsgBox("Problème inattendu !!!")
End Try
End Sub



' voici une fonction pour l'insertion

Public Sub nom_fnction()
Try
sql = "insert into nom_tabler values ('" & nam & "','" & pad & "','" & typ & "')"
command.Connection = conn
command.CommandText = sql
command.ExecuteNonQuery()
MsgBox("Ajout utilisateur terminé", MsgBoxStyle.Information, "Vérification d'utilisateur")
Catch ex As System.Data.SqlClient.SqlException
MsgBox( ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
' par la suite vous ne faite que d'appeler ces fonctions

Pour plus d'info, VOILA un pdf avec le cours complet en VB.NET utilisant ADO.NET .
MJF
MJF
Admin.
Admin.

Masculin
Nombre de messages : 1611
Date d'inscription : 16/02/2010

Revenir en haut Aller en bas

[VB.NET] Base de données Empty Re: [VB.NET] Base de données

Message par MJF le Lun 13 Juin 2011, 04:08

Tu n'as pas spécifié quel langage tu utilises, vbs, c# ou c++?
Voila qlq chose d'autre:
'Déclaration
Dim RequeteSQL As String
Dim objCommand As MySqlCommand
Dim objDataReader As MySqlDataReader
Dim MyAdapter As MySqlDataAdapter = New MySqlDataAdapter()
'Création de la chaîne de connexion
Dim connectString As String = "Server=localhost;Database=parc;User ID=root;Password=password"

Try 'Ouvre le piège

'Création de la connexion
Dim Connection As MySqlConnection = New MySqlConnection()
Connection.ConnectionString = connectString

'Mouchard n°1
MessageBox.Show("1")

'Ouverture de la connexion
Connection.Open()

'Mouchard n°1
MessageBox.Show("2")

'Requete SQl
RequeteSQL = "SELECT * FROM ordinateur"

'Execution de la requete
objCommand = New MySqlCommand(RequeteSQL, Connection)
objDataReader = objCommand.ExecuteReader

While objDataReader.Read
MessageBox.Show(objDataReader.GetString(0))
End While

'Fermeture
objDataReader.Close()
Connection.Close()

Catch Ex As Exception 'Intercepte l'erreur en cas de pb
MsgBox(Ex.ToString)
End Try 'Ferme le piège
_____________________________________________

[quote]Représente une connexion ouverte à une base de données SQL Server. This class cannot be inherited. Cette classe ne peut pas être héritée.

For a list of all members of this type, see SqlConnection Members . Pour obtenir une liste de tous les membres de ce type, voir Membres SqlConnection .

System.Object System.Object
System.MarshalByRefObject System.MarshalByRefObject
System.ComponentModel.Component System.ComponentModel.Component
System.Data.SqlClient.SqlConnection System.Data.SqlClient.SqlConnection

[Visual Basic] [Visual Basic]
NotInheritable Public Class SqlConnection NotInheritable SqlConnection classe publique
Inherits Component Inherits Component
Implements IDbConnection, ICloneable IDbConnection Outillages, ICloneable
[C#] [C #]
public sealed class SqlConnection : Component, IDbConnection, public SqlConnection classe scellée: Composant, IDbConnection,
ICloneable ICloneable
[C++] [C + +]
public __gc __sealed class SqlConnection : public Component, public __sealed SqlConnection classe __gc: Composant public,
IDbConnection, ICloneable IDbConnection, ICloneable
[JScript] [JScript]
public class SqlConnection extends Component implements SqlConnection public class composant implémente
IDbConnection, ICloneable IDbConnection, ICloneable

Thread Safety Sécurité des threads

Any public static ( Shared in Visual Basic) members of this type are thread safe. Tout static (Shared en Visual Basic) publics de ce type sont thread-safe. Any instance members are not guaranteed to be thread safe. Les membres d'instance ne sont pas garantis pour être thread-safe.
Remarks Remarques

A SqlConnection object represents a unique session to a SQL Server data source. Un objet SqlConnection représente une session unique à une base de données SQL Server source. In the case of a client/server database system, it is equivalent to a network connection to the server. SqlConnection is used in conjunction with SqlDataAdapter and SqlCommand to increase performance when connecting to a Microsoft SQL Server database. Dans le cas d'un système client / serveur de base de données, il est équivalent à une connexion réseau au serveur. SqlConnection est utilisé en conjonction avec SqlDataAdapter et SqlCommand pour augmenter les performances lors de la connexion à une base de données SQL Server de Microsoft. For all third-party SQL server products, as well as other OLE DB-supported data sources, use OleDbConnection . Pour tous les partis SQL Server Products tiers, ainsi que d'autres soutenus par des sources de données OLE DB, utilisez OleDbConnection .

When you create an instance of SqlConnection , all properties are set to their initial values. Lorsque vous créez une instance de SqlConnection, toutes les propriétés sont définies à leurs valeurs initiales. For a list of these values, see the SqlConnection constructor. Pour obtenir une liste de ces valeurs, consultez le constructeur SqlConnection.

If the SqlConnection goes out of scope, it is not closed. Si SqlConnection est hors de portée, il n'est pas fermé. Therefore, you must explicitly close the connection by calling Close or Dispose . Par conséquent, vous devez fermer explicitement la connexion en appelant Close ou Dispose .

Note To deploy high-performance applications, you need to use connection pooling. Remarque: Pour déployer des applications de haute performance, vous devez utiliser le regroupement de connexion. When you use the .NET Framework Data Provider for SQL Server, you do not need to enable connection pooling because the provider manages this automatically, although you can modify some settings. Lorsque vous utilisez le. NET Framework pour SQL Server, vous n'avez pas besoin d'activer le regroupement de connexion, car le fournisseur gère cela automatiquement, mais vous pouvez modifier certains paramètres. For more information about using connection pooling with the .NET Framework Data Provider for SQL Server, see Connection Pooling for the .NET Framework Data Provider for SQL Server . Pour plus d'informations sur l'utilisation de regroupement de connexion avec le. NET Framework Data Provider for SQL Server, consultez Regroupement de connexions pour le. NET Framework Data Provider for SQL Server .

If a SqlException is generated by the method executing a SqlCommand , the SqlConnection remains open when the severity level is 19 or less. Si un SqlException est généré par la méthode de l'exécution d'un SqlCommand, SqlConnection reste ouvert lorsque le niveau de gravité est 19 ou moins. When the severity level is 20 or greater, the server usually closes the SqlConnection . Lorsque le niveau de gravité est 20 ou plus, le serveur ferme généralement le SqlConnection. However, the user can reopen the connection and continue. Toutefois, l'utilisateur peut rouvrir la connexion et continuer.

An application that creates an instance of the SqlConnection object can require all direct and indirect callers to have adequate permission to the code by setting declarative or imperative security demands. SqlConnection makes security demands using the SqlClientPermission object. Une application qui crée une instance de l'objet SqlConnection peut exiger que tous les appelants directs et indirects d'avoir l'autorisation adéquate pour le code en définissant impératif de sécurité des demandes ou déclarative. SqlConnection impose des exigences de sécurité en utilisant le SqlClientPermission objet. Users can verify that their code has adequate permissions by using the SqlClientPermissionAttribute object. Les utilisateurs peuvent vérifier que leur code possède les autorisations adéquates en utilisant la SqlClientPermissionAttribute objet. Users and administrators can also use the Code Access Security Policy Tool (Caspol.exe) to modify security policy at the machine, user, and enterprise levels. Les utilisateurs et les administrateurs peuvent également utiliser le Code Access Security Policy Tool (Caspol.exe) pour modifier la politique de sécurité sur la machine, l'utilisateur, et les niveaux de l'entreprise. For more information, see Securing Applications . Pour plus d'informations, consultez Sécurisation des applications .

Note If you are using Microsoft .NET Framework version 1.0, the FullTrust named permission set is required to connect to SQL Server using Open . Remarque: Si vous utilisez Microsoft. NET Framework version 1.0, le jeu d'autorisations nommé FullTrust est nécessaire de se connecter à SQL Server en utilisant Open . This requirement does not apply if you are using .NET Framework version 1.1. Cette exigence ne s'applique pas si vous utilisez. NET Framework version 1.1. For more information, see Requesting Permissions and Named Permission Sets . Pour plus d'informations, consultez Demande d'autorisations et Jeux d'autorisations nommés .

For more information about handling warning and informational messages from the server, see Working with Connection Events . Pour plus d'informations sur la gestion des messages d'avertissement et d'information à partir du serveur, voir Utilisation des événements Connection .
Example Exemple

[Visual Basic, C#, C++] The following example creates a SqlCommand and a SqlConnection . [Visual Basic, C #, C + +] L'exemple suivant crée un SqlCommand et SqlConnection. The SqlConnection is opened and set as the Connection for the SqlCommand . Le SqlConnection est ouvert et défini en tant que connexion pour les SqlCommand. The example then calls ExecuteNonQuery , and closes the connection. L'exemple appelle ensuite ExecuteNonQuery et ferme la connexion. To accomplish this, the ExecuteNonQuery is passed a connection string and a query string that is a Transact-SQL INSERT statement. Pour ce faire, le ExecuteNonQuery est passé une chaîne de connexion et une chaîne de requête qui est une-SQL INSERT instruction Transact.

[Visual Basic] [Visual Basic]
Public Sub InsertRow(myConnectionString As String) Public Sub InsertRow (myConnectionString As String)
' If the connection string is null, use a default. «Si la chaîne de connexion est null, utilisez une valeur par défaut.
If myConnectionString = "" Then Si myConnectionString = "" Then
myConnectionString = "Initial Catalog=Northwind;Data Source=localhost;Integrated Security=SSPI;" myConnectionString = "Initial Catalog = Northwind; Data Source = localhost; Integrated Security = SSPI;"
End If End If
Dim myConnection As New SqlConnection(myConnectionString) maConnexion Dim As New SqlConnection (myConnectionString)
Dim myInsertQuery As String = "INSERT INTO Customers (CustomerID, CompanyName) Values('NWIND', 'Northwind Traders')" myInsertQuery Dim As String = "INSERT INTO clients (CustomerID, CompanyName) VALUES ('nwind», «Northwind Traders')"
Dim myCommand As New SqlCommand(myInsertQuery) Dim As New SqlCommand macommande (myInsertQuery)
myCommand.Connection = myConnection myCommand.Connection = maConnexion
myConnection.Open() myConnection.Open ()
myCommand.ExecuteNonQuery() myCommand.ExecuteNonQuery ()
myCommand.Connection.Close() myCommand.Connection.Close ()
End Sub 'SelectSqlClientSrvRows End Sub 'SelectSqlClientSrvRows

[C#] [C #]
public void InsertRow(string myConnectionString) public void InsertRow (myConnectionString string)
{ {
// If the connection string is null, use a default. / / Si la chaîne de connexion est null, utilisez une valeur par défaut.
if(myConnectionString == "") if (myConnectionString == "")
{ {
myConnectionString = "Initial Catalog=Northwind;Data Source=localhost;Integrated Security=SSPI;"; myConnectionString = "Initial Catalog = Northwind; Data Source = localhost; Integrated Security = SSPI;"
} }
SqlConnection myConnection = new SqlConnection(myConnectionString); maConnexion SqlConnection = new SqlConnection (myConnectionString);
string myInsertQuery = "INSERT INTO Customers (CustomerID, CompanyName) Values('NWIND', 'Northwind Traders')"; myInsertQuery string = "INSERT INTO clients (CustomerID, CompanyName) VALUES ('nwind», «Northwind Traders')";
SqlCommand myCommand = new SqlCommand(myInsertQuery); SqlCommand macommande = new SqlCommand (myInsertQuery);
myCommand.Connection = myConnection; myCommand.Connection = maConnexion;
myConnection.Open(); myConnection.Open ();
myCommand.ExecuteNonQuery(); myCommand.ExecuteNonQuery ();
myCommand.Connection.Close(); myCommand.Connection.Close ();
} }

[C++] [C + +]
public: public:
void InsertRow(String* myConnectionString) void InsertRow (myConnectionString * String)
{ {
// If the connection string is null, use a default. / / Si la chaîne de connexion est null, utilisez une valeur par défaut.
if(myConnectionString->Equals(S"")) if (Equals myConnectionString-> (S "))
{ {
myConnectionString = S"Initial Catalog=Northwind;Data Source=localhost;Integrated Security=SSPI;"; myConnectionString = S "Initial Catalog = Northwind; Data Source = localhost; Integrated Security = SSPI;"
} }
SqlConnection* myConnection = new SqlConnection(myConnectionString); SqlConnection * maConnexion = new SqlConnection (myConnectionString);
String* myInsertQuery = S"INSERT INTO Customers (CustomerID, CompanyName) Values('NWIND', 'Northwind Traders')"; String * myInsertQuery = S "INSERT INTO clients (CustomerID, CompanyName) VALUES ('nwind», «Northwind Traders')";
SqlCommand* myCommand = new SqlCommand(myInsertQuery); SqlCommand * macommande = new SqlCommand (myInsertQuery);
myCommand->Connection = myConnection; Connexion macommande-> = maConnexion;
myConnection->Open(); maConnexion-> Open ();
myCommand->ExecuteNonQuery(); ExecuteNonQuery macommande-> ();
myCommand->Connection->Close(); macommande-> Connexion-> Close ();
} }
[code]
________________________________________
Étudies ces exemples et trouves ton erreur!
Bonne chance.
MJF
MJF
Admin.
Admin.

Masculin
Nombre de messages : 1611
Date d'inscription : 16/02/2010

Revenir en haut Aller en bas

[VB.NET] Base de données Empty Re: [VB.NET] Base de données

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

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