Salut,

j'utilise ASP.NET (VB.NET) avec microsoft access 2007, le type du serveur est sql server...

problème : je suis en train de lire les données avec un cmd.ExecuteReader , le probleme est que, quand j'affiche par exemple tab(3) avec lbl2, ça ne s'affiche pas, donc les données ne sont pas récupérées dans le tableau...quelqu'un aurait une idée comment faire....?

NB: la requete sql marche, je l'ai essayé toute seule dans access 2007


voici mon code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
   Function verifier_db(ByVal lastname)
 
        Dim conn As New SqlConnection
        Dim reader As SqlDataReader
        Dim serverName As String = "basemaster"
 
        conn.ConnectionString = "packet size=4096;user id=wpmreports;pwd=welcome;data source=""" & serverName & """;persist security info=False;initial catalog=DSDB"
 
        conn.Open()
 
        Dim cmd As SqlCommand
        cmd = Nothing
 
        cmd = New SqlCommand("SELECT PERSON.PERSON_ID, PERSON.FIRSTNAME, PERSON.LASTNAME, PERSON.INTERNET_ADD FROM PERSON WHERE (((PERSON.LASTNAME)=' " + lastname + " '));", conn)
 
        reader = cmd.ExecuteReader
 
        Dim tab(3) As String
 
        While reader.Read
 
            tab(0) = reader.GetString(0) 'person_id
            tab(1) = reader.GetString(1) 'firstname
            tab(2) = reader.GetString(2) 'lastname
            tab(3) = reader.GetString(3) 'email
            lbl2.Text = tab(3)
        End While
 
        reader.Close()
        conn.Close()
        Return tab
    End Function
 
 
    Sub Page_Load()
 
        Dim firstname As String = string1.Value
        Dim lastname As String = string2.Value
        Dim table(3) As String
 
        table = verifier_db(lastname)
        lbl1.Text = "welcome " & string1.Value & " " & string2.Value
 
 
    End Sub