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
Partager