SQL ET QUE LA DISCUTION COMENCE!!!!!!!!!!
Résolu
Salut tout le monde, j’espère bien résoudre mon problèm… euh !! j’en suis sure… ^^
CECI EST UN CODE D’UNE APPLICATION SOUS .NET … DANS CETTE APPLICATION J’AI BESOIN D’UNE BASE DE DONNEES DONT JE VAI ENREGISTRER MODIFER ET SUPPRIMER DES ENREGISTREMENT…
Le but c’est d’acéder a un enregistrement et que le résultat soit afficher sur un label ou un textbox … Mon problèm c’est que j’arricve pas a le faire … voila le code que j’ai developper … existe-t-il des erreurs ????
Imports System
Imports System.Data
Imports System.Data.OleDb
Partial Public Class _Default
Inherits System.Web.UI.Page
Private ObjetConnection As OleDbConnection
Private ObjetCommand As OleDbCommand
Private ObjetDataAdapter As OleDbDataAdapter
Private ObjetDataSet As New DataSet()
Private strSql As String
Private ObjetDataTable As DataTable
Private ObjetDataRow As DataRow
Private RowNumber As Integer
Private strConn As String
Private ObjetCommandBuilder As OleDbCommandBuilder
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) HandlesButton1.Click
'Initialisation de la chaîne de paramètres pour la connexion
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source= c:\nom.mdb;"
'Initialisation de la chaîne contenant l'instruction SQL
strSql = "SELECT USER.* FROM USER"
'Instanciation d'un Objet Connexion
ObjetConnection = New OleDbConnection()
'Donner à la propriété ConnectionString les paramètres de connexion
ObjetConnection.ConnectionString = strConn
'Ouvrir la connexion
ObjetConnection.Open()
'Instancier un objet Commande
ObjetCommand = New OleDbCommand(strSql)
'Instancier un objet Adapter
ObjetDataAdapter = New OleDbDataAdapter(ObjetCommand)
'initialiser l'objet Command
ObjetCommand.Connection() = ObjetConnection
'Avec l'aide de la propriété Fill du DataAdapter charger le DataSet
ObjetDataAdapter.Fill(ObjetDataSet, "USER")
'Mettre dans un Objet DataTable une table du DataSet
ObjetDataTable = ObjetDataSet.Tables("USER") ' !!!!!! ERREUR *********************<=====
RowNumber = 0
Me.TextBox1.Text = ObjetDataTable.Rows(RowNumber).Item("USER_NAME").ToString
End Sub
End Class
CECI EST UN CODE D’UNE APPLICATION SOUS .NET … DANS CETTE APPLICATION J’AI BESOIN D’UNE BASE DE DONNEES DONT JE VAI ENREGISTRER MODIFER ET SUPPRIMER DES ENREGISTREMENT…
Le but c’est d’acéder a un enregistrement et que le résultat soit afficher sur un label ou un textbox … Mon problèm c’est que j’arricve pas a le faire … voila le code que j’ai developper … existe-t-il des erreurs ????
Imports System
Imports System.Data
Imports System.Data.OleDb
Partial Public Class _Default
Inherits System.Web.UI.Page
Private ObjetConnection As OleDbConnection
Private ObjetCommand As OleDbCommand
Private ObjetDataAdapter As OleDbDataAdapter
Private ObjetDataSet As New DataSet()
Private strSql As String
Private ObjetDataTable As DataTable
Private ObjetDataRow As DataRow
Private RowNumber As Integer
Private strConn As String
Private ObjetCommandBuilder As OleDbCommandBuilder
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) HandlesButton1.Click
'Initialisation de la chaîne de paramètres pour la connexion
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source= c:\nom.mdb;"
'Initialisation de la chaîne contenant l'instruction SQL
strSql = "SELECT USER.* FROM USER"
'Instanciation d'un Objet Connexion
ObjetConnection = New OleDbConnection()
'Donner à la propriété ConnectionString les paramètres de connexion
ObjetConnection.ConnectionString = strConn
'Ouvrir la connexion
ObjetConnection.Open()
'Instancier un objet Commande
ObjetCommand = New OleDbCommand(strSql)
'Instancier un objet Adapter
ObjetDataAdapter = New OleDbDataAdapter(ObjetCommand)
'initialiser l'objet Command
ObjetCommand.Connection() = ObjetConnection
'Avec l'aide de la propriété Fill du DataAdapter charger le DataSet
ObjetDataAdapter.Fill(ObjetDataSet, "USER")
'Mettre dans un Objet DataTable une table du DataSet
ObjetDataTable = ObjetDataSet.Tables("USER") ' !!!!!! ERREUR *********************<=====
RowNumber = 0
Me.TextBox1.Text = ObjetDataTable.Rows(RowNumber).Item("USER_NAME").ToString
End Sub
End Class
Configuration: Windows XP Internet Explorer 6.0
5 réponses
-
RowNumber = 0 Me.TextBox1.Text = ObjetDataTable.Rows(RowNumber).Item("USER_NAME").ToString
pourquoi me ? -
oé paglop ... merci premièrement de me répondre .... le problem cé pa a ce niveau ... l'interpreteur me donne l'erruer exactement dans cette linge:
ObjetDataAdapter.Fill(ObjetDataSet, "USER") ' !!!!!! ERREUR *********************<=====
voilaaaaa -
dsl paglop ... je croi le problème c'est parcque le mot USER est un mot resérvé je doit pa l'utiliser .... enfait pour la connexion il marche tré bien j'en suis sure
je croi j'ai résolu mon problem ... mai bon j'en suis pa certain ^^
Merci de tt façon -
je peux vous aider mais il faut que je voire tous le program faites confiance a mois je peux le corigée j'ai le magistere en informatique de sécuritée merci
-
salut les amis ................ enfit je vous remerci de votre réponse ... j'ai résolu mon problèm cétai vraiment ce que j'ai cru ...
ObjetDataAdapter.Fill(ObjetDataSet, "USER") ' !!!!!! ERREUR *********************<=====
l'erreur fait cé que je doit pa utiliser le mot "USER" comme un nom de ma table car c'est un mot résérvéeeeeeee ....
voila ... merci zineb cé tré gentille de ta part ^^
