Bonjour à vous tous!


Là, j'ai vraiment besoin de vous....Je commence toujours en VB.net/Asp.net.....Et je ne comprend pas la chose suivante, il s'agit d'un projet que j'ai repris et qui comprend une classe VB de ce genre :

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
 
Public Sub connection()
con.Close()
con.ConnectionString = "Database=MaBD;Data source=MonIP;uid=MonUser;pwd=MonPassword"
con.Open()
End Sub
 
Public Sub Mafonction(ByVal ds As DataSet)
connection()
 
str = "SELECT * from matable"
 
cmd.CommandText = str
cmd.Connection = con
cmd.CommandType = CommandType.Text
 
sqlad.SelectCommand = cmd
 
ds.Clear()
 
sqlad.Fill(ds, "MonDS")
 
End Sub

Dans mes forms, j'appelle cette classe ainsi :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Dim cls AsNew NomDeLaClasse()
 
Private Sub FonctionTest()
 
  Dim monType AsString
 
  cls.Mafonction(ds)
 
End Sub

Et ça fonctionnait, jusqu'à ce que je commence un nouveau projet et que j'importe ces codes. Comme je n'ai pas conçu l'application, je ne sais pas comment la classe a été déclarée et où? Donc, j'ai une erreur évidemment, il ne reconnait pas le : Dim cls As New NomDeLaClasse()

J'ai besoin de repartir à neuf, parce que nous avons changé cette application sur un serveur Windows 2003 en 64 bits et certains bouts de code ne fonctionnent plus....

Merci infiniment de votre aide toujours précieuse,


Isabelle