Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1522 connectés 

  FORUM HardWare.fr
  Programmation

  [VB6]: Executer une requete??

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VB6]: Executer une requete??

n°114936
leohnart
Posté le 20-03-2002 à 13:59:30  profilanswer
 

SAlut a tous, j'espere que vous allez pouvoir m'aider,  
je connais pas la commande pour executer une requete.
Merci d'avance

mood
Publicité
Posté le 20-03-2002 à 13:59:30  profilanswer
 

n°115161
leohnart
Posté le 20-03-2002 à 18:08:35  profilanswer
 

up

n°115264
cerdoc
Comment l'AK47 à changé ma vie
Posté le 20-03-2002 à 20:56:22  profilanswer
 

sur une base de données ?

n°115684
leohnart
Posté le 21-03-2002 à 15:49:15  profilanswer
 

cerdoc a écrit a écrit :

sur une base de données ?  




oui sur une base access 97 que j'ai construite avec le gestionnaire de données

n°115786
HappyHarry
Posté le 21-03-2002 à 18:11:31  profilanswer
 

dim rs as new ADODB.RecordSet
rs.open "requete",connection a la base

n°116592
kvl
Posté le 23-03-2002 à 19:34:12  profilanswer
 

dim cngestion As New ADODB.Connection
dim rsgestion As ADODB.Recordset
 
 
'Procedure de connection à la base  '
cngestion.ConnectionString = " Provider=Microsoft.Jet.oledb.4.0;data source=c:\...."  
cngestion.open
 
 
'Procedure d'initialisation du recordset '
 
Set rsgestion = New ADODB.Recordset
rsgestion.CursorLocation = adUseClient
rsgestion.open "select * from ...", cngestion, adOpenDynamic,adLockOptimistic
 
'Alimentation des zones du formulaire'
Set txtNoprop.DataSource = rsgestion
txtNoprop.DataField = "noprop"
 
Set txtNom.DataSource = rsgestion
txtNom.DataField = "Nom"
 
Set txtPrenom.DataSource = rsgestion
txtPrenom.DataField = "prenom"
 
Set txtAdres.DataSource = rsgestion
txtAdres.DataField = "adresse"

 

[jfdsdjhfuetppo]--Message édité par kvl--[/jfdsdjhfuetppo]

n°116631
couitchy
Posté le 23-03-2002 à 22:04:05  profilanswer
 

pfffffff c d'un compliqué votre truc !!
 
dim DB as DataBase
Dim Requete as String
Dim rs as recordset
 
set db=dbengine.opendatabase("c:\aa\aa.mdb" )
set rs=db.openrecordset(requete,dbopendynaset)
 
et hop !!
le résultat de la requête est dans rs.......


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation

  [VB6]: Executer une requete??

 

Sujets relatifs
[MYSQL] Erreur de sortie de requete: Select Count(*)[MYSQL] Syntaxe de variable dans une requete
Pb soustraction en VB6Pb a la con VB6
dualscreen switcher: cai faisable ca (requête cachée ;) )[VB6]: Gestion des erreurs
[VB6]: Ca doit etre tres dur c pour ca que...[VB6]: Question sur l'apparence des boutons
VB6 => html[MySQL] Requête assez compliquée
Plus de sujets relatifs à : [VB6]: Executer une requete??


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR