[vba access]récuperer une requete select dans une variable

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [vba access]récuperer une requete select dans une variable

mmuzzik

bonjour,
j'aurais souhaité faire une requete et stocker le résultat de cette requete dans une variable...
est ce possible ?
si oui comment.??

merciiiii

Publicité

mmuzzik

Ps: en Access 2000...parce que lorsque j'essaye de faire une fonction comme celle ci (viens d'un autre forum ms g perdu le link...)
le type database n'est pas reconnu..

Public Function GetSQLInfoTxt(SqlReq As String) As String
Dim mBaseX As database
Dim mTableX As Recordset

On Error Resume Next
Set mBaseX = CurrentDb
Set mTableX = mBaseX.OpenRecordset(SqlReq, dbOpenDynaset)
With mTableX
.MoveFirst
GetSQLInfoTxt = .Fields(0).value
.close
End With
End Function

JihemAir

Je sais pas

Code :

Dim qdfTmp As QueryDef
Dim strText as String
Set qdfTmp = CurrentDb.QueryDefs("Nom_requete" )
strText = qdfTmp.SQL

Ce code permet de recupérer le texte d'une requete stockee.

---------------
J'ai un message.."Cliquez OK pour continuer."...Qu'est ce que je fais ?

mmuzzik

merci bien mais je souhaiterai plutot executer la requete et stocker le résultat..
il semblerai que je doive utiliser ADO...

romano17

Dim access As adodb.Connection
Dim Myrecord As adodb.Recordset
Set access = New adodb.Connection
access.Provider = "Microsoft.Jet.Oledb.4.0"
access.ConnectionString = App.Path & "\GPI6.mdb"
access.Open
SQL = "SELECT ordi_salle,ordi_nom FROM ordi1 where ordi_ip='" & ip.Text & "'"

Set Myrecord = New adodb.Recordset
Myrecord.Open SQL, access, adOpenDynamic, adLockOptimistic
On Error Resume Next
List3.AddItem (Myrecord(0).Value)
List1.AddItem (Myrecord(1).Value)
access.close

mmuzzik

thx romano je v essayer de suite

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[vba access]récuperer une requete select dans une variable

Sujets relatifs
pb pour récupérer une valeur	Select des 10 dernière lignes d'une table ?
la requete avec la fonction dateadd() ne prend pas en compte celle ci	recuperer des variables de session lors du timeout par un listener
[ACCESS]combobox accès au data dans les colonnes	[ACCESS] Question toute conne
Recuperer une chaine de caractere venant d'un script PHP	[PHP] Comment utiliser le résultat d'une requete sans recharger
Utiliser une variable dans un autre fichier	Récupérer une page ASP en C++
Plus de sujets relatifs à : [vba access]récuperer une requete select dans une variable

Page générée en 0.025 secondes