Discussion :

[geof]

Bonjour,

Je découvre VB5, et je voulais exécuter une requete SQL dans un programme, mais impossible de trouver des sources en VB5!
Donc si vous pouviez me dire comment je dois faire pour exécuter une requete SQL sous VB5 et récupérer le résultat ce serait HYPER COOL!...

Merci d'avance

[Vld44]

Salut.

Comme dirait Delbeke et bien d'autres, on a pas de boule de crystal ...

Quoiqu'il en soit, as-tu jeté un oeil aux tutos VB de developpez.net ?
Beaucoup concernent les accès aux bases de données (voir ADO)

[geof]

le pb, c'est qu'apparemment, je suis pas sûr, mais l'acces ADO n'existe pas dans VB5, pour l'instant j'utilise DMO...qui doit etre l'ancetre d'ADO...
J'ai regardé dans le tutos, mais je n'ai pas les meme méthode pour mes objets, je suis un peu perdu...noobs oblige...
Donc si qqn veut bien me donner une adresse qui traite de VB5, ou alors m'orienter sur le code qui me permettrait d'executer une requete et de recupérer le résultat...

[geof]

juste pour vous montrer le code de connection à ma base et la requete que je voudrais exécuter...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 Dim oDatabase As SQLDMO.Database
 Dim Result As QueryResults
 
 Set oSQLServer = New SQLDMO.SQLServer
  With oSQLServer
    .LoginSecure = True  'Identification Windows NT
    .LoginTimeout = 30
   .Connect Server_Name, "", ""
 End With
 
 Dim cmdSQL As String
 cmdSQL = "SELECT LIC_COL FROM CFCOLL"
 Result = oSQLServer.ExecuteWithResults("SELECT LIC_COL FROM CFCOLL")