comment afficher ce qu'on a dans un dataset avec un msgbox

Version imprimable

Voir 40 message(s) de cette discussion en une page

31/05/2007, 17h49
alaa_85

l'exeption se declanche dans quelle ligne ?
31/05/2007, 17h51
alaa_85

Faut Faire comme ça:

Code:

sdaRequetes.Fill(dsRequete,"EVENEMNT")
01/06/2007, 09h09
khayate

ca change rien,il me met tjrs la meme erreur,
comprend pas!!!!
01/06/2007, 11h42
khayate

esque quelqu'un peut m'aider je trouve pas de solution

jai tjrs ce code

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Dim conn As New OracleConnection(oradb)
        conn.Open()
 
        Dim cmd As New OracleCommand
        cmd.Connection = conn
        cmd.CommandText = "select * from EVENEMNT"
        cmd.CommandType = CommandType.Text
        'Dim drreader As OracleDataReader
        Dim sdaRequetes As New OracleDataAdapter
        sdaRequetes.SelectCommand = cmd
        Dim dsRequete As New DataSet
        Try
            conn.Open()
            sdaRequetes.Fill(dsRequete, "EVENEMNT")
            conn.Dispose()
        Catch ex As Exception
 
        End Try
        MsgBox(dsRequete.Tables("EVENEMNT").Rows(1).Item("EVENMT_CLIENT"))

ki m'affiche cette erreur " La référence d'objet n'est pas définie à une instance d'un objet" et pourtant tout mes objets sont instancie .eske kelkun peut me donner un coup de main

01/06/2007, 17h01
khayate

j'ai une tite kestion:
eske ka votre avis,d'apres ce code ya ma table "EVENMET" dans mon dataset
car je veux par le suite recupere ce ke j'ai dans mon dataset et le mettre dans une table sql[coce] Dim oradb As String = "Data Source=(DESCRIPTION=(ADDRESS_LIST=" _
+ "(ADDRESS=(PROTOCOL=TCP)(HOST= SM65CVDF)(PORT=1521)))" _
+ "(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=OSMOSE)));" _
+ "User Id=OSMOSE;Password=OSMOSE;"

Dim conn As New OracleConnection(oradb)
conn.Open()

Dim cmd As New OracleCommand
cmd.Connection = conn
cmd.CommandText = "select * from EVENEMNT"
cmd.CommandType = CommandType.Text
'Dim drreader As OracleDataReader
Dim sdaRequetes As New OracleDataAdapter
sdaRequetes.SelectCommand = cmd
Dim dsRequete As New DataSet
Try
conn.Open()
sdaRequetes.Fill(dsRequete, "EVENEMNT")
conn.Dispose()
Catch ex As Exception

End Try
MsgBox(dsRequete.Tables("EVENEMNT").Rows(1).Item("EVENT_CLIENT"))[/code]

j'ai une tite kestion:
eske ka votre avis,d'apres ce code ya ma table "EVENMET" dans mon dataset
car je veux par le suite recupere ce ke j'ai dans mon dataset et le mettre dans une table sql

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 Dim oradb As String = "Data Source=(DESCRIPTION=(ADDRESS_LIST=" _
                     + "(ADDRESS=(PROTOCOL=TCP)(HOST= SM65CVDF)(PORT=1521)))" _
                     + "(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=OSMOSE)));" _
                     + "User Id=OSMOSE;Password=OSMOSE;"
 
 
 
 
        Dim conn As New OracleConnection(oradb)
        conn.Open()
 
        Dim cmd As New OracleCommand
        cmd.Connection = conn
        cmd.CommandText = "select * from EVENEMNT"
        cmd.CommandType = CommandType.Text
        'Dim drreader As OracleDataReader
        Dim sdaRequetes As New OracleDataAdapter
        sdaRequetes.SelectCommand = cmd
        Dim dsRequete As New DataSet
        Try
            conn.Open()
            sdaRequetes.Fill(dsRequete, "EVENEMNT")
            conn.Dispose()
        Catch ex As Exception
 
        End Try
        MsgBox(dsRequete.Tables("EVENEMNT").Rows(1).Item("EVENT_CLIENT"))

01/06/2007, 17h27
khayate

la kestion etait si jetais pas clair
eske j'affecte bien ma table "EVENEMNT" a bien ete affecte dans mon dataset d'apres le code au dessus???????????????????

Voir 40 message(s) de cette discussion en une page