Bonjour tout le monde,
OS: Win XP Pro SP2
SDK: Visual Studio 2003
Framework 1.1.4322 SP1
4D Server version 1999
Ayant découvert 4D depuis peu et après avoir retourner le problème dans tous les sens, je m'adresse a vous.
Voila mon but est de faire une interface en ASP.NET sur une base 4D version 1999 ( je précise tout de suite je n'ai pas la possibilité de changer de version 4D...)
- J'ai installer le pilote ODBC pour 4D sur ma machine
- j'arrive a me connecter a ma base 4D
- lorsque je teste l'etat de ma connexion il est a true.
- Je n'arrive pas a envoyer une requête et récupèrer les résultat dans un dataset.
Voila mon code:
Mon code plante au niveau de la flèche, je comprends pas pourquoi puisque j'utilise la classe odbc "normalement" comme on le décrit dans la MSDN.
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
46
47 Imports System.Data.Odbc Dim lo_4dCnx As OdbcConnection Dim ls_StrCnx As String Dim ls_SQL As String Dim lo_4DAdapt As OdbcDataAdapter Dim lo_DataSet As New Dataset Dim ll_return As Long Dim ls_DSN As String Dim ls_Driver As String Dim ls_DBQ As String Dim ls_Pwd As String Dim ls_User As String ls_DSN = "DSN=BaseHeure;" ls_Driver = "DRIVER=ODBC Driver for 4D Server;" ls_DBQ = "DBQ=TCP/IP:<MonIP>;" ls_User = "UID=<MonID>;" ls_Pwd = "PWD=<MonPWD>;" ls_StrCnx = ls_Driver + ls_DSN + ls_DBQ + ls_User + ls_Pwd lo_4dCnx = New OdbcConnection(ls_StrCnx) lo_4dCnx.Open() If lo_4dCnx.State = ConnectionState.Open Then Try ls_SQL = "Select nom,prénom,matricule from Salariés;" lo_4DAdapt = New OdbcDataAdapter(ls_SQL, lo_4dCnx) ---> ll_return = Clng(lo_4DAdapt.Fill(lo_DataSet)) Catch ex As Exception Throw New System.Exception(ex.Message) Finally If Not lo_4dCnx Is Nothing Then lo_4dCnx.Dispose() End If End Try End If
Et la j'obtient l'erreur suivante:
ERROR - aucune information d'erreur disponible
Ce qui me laisse un peu sans voix et surtout sans savoir ce qui ne fonctionne pas... Si quelqu'un peu m'apporter une aide ou me dire comment il a fait pour réussir à interroger une base 4D depuis ASP.NET je suis preneur.
Merci a tous et bon code!!!
VinZ
[edit] déplacé et édité par olivier delmotte [/edit]
Partager