VBA access requete SQL et fonction()

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : VBA access requete SQL et fonction()

subkiller

bonjour

comment puis-je faire executer une fonction() dans une requete SQL "mise a jour" en VBA dans access 2002?

merci d'avance

subkiller

Publicité

jpcheck

Pioupiou

peux tu nous donner le code de départ stp ? Perso je comprends pas encore la question :sweat:

subkiller

alors voilà

accrocher vous a vos meninges je vais essayer d'etre clair (j'ai pas l'habitude)!

j'ai une table avec plein de champ donc un champ "date de creation"

j'ai une fonction que permet de calculer le nombre de jour ouvré entre deux dates.

le but etant:

dans la table, dans un champ nommé "jours ouvrés" inscrire le nombre de jous ouvré separant la date de creation de la date du jour en cours :??:

jpcheck

Pioupiou

ah oki
ben un petit UPDATE a balancer dans ta requete SQL devrait suffire non ?

subkiller

bin le probleme c'est que quand je met la fonction dans la requete j'ai un message d'erreur "objet requis"
quand je remplace la fonction par une valeur fixe ça fonctionne
et quand j'execute la fonction hors de la requete pas de probleme

os cour

jpcheck

Pioupiou

je repete donc ma question : peus tu nous passer un petit bout de code stp ? :sarcastic:

subkiller

voila ma requete

Code :

CurrentDb.Execute "update Table_Suivi_Incident set [ouvré1]=" & " '" & NbOpenDay([mailj0], etad) & "'" & "where [clos]=0"

"Table_Suivi_Incident" etant ma table,
"[ouvré1]","[mailj0]","[clos]" des champs de cette table
et

"NbOpenDay" une fonction calculant le nombre de jour ouvré entre [mailj0] et etad (la date d'aujourd'hui)

subkiller

help je suis vraiment dedans

subkiller

help je suis vraiment dedans

jpcheck

Pioupiou

si tu as comme retour un integer, pas la peine de mettre des " " il me semble...

Publicité

tegu

Pas de bol subkiller, un problème de PC m'a empêché de te répondre bien plus tôt.

La syntaxe « CurrentDb.Execute » est du VBA
La syntaxe « update Table_Suivi_Incident set » est du sql Access

Le sql Access accepte de lancer une fonction Access (si ma mémoire ne me joue pas de tour)
Mais le VBA n'a pas accès aux infos sql directement

Pour être plus clair, quand tu écris :

"update Table_Suivi_Incident set [ouvré1]=" & " '" & NbOpenDay([mailj0], etad) & "'"

en fait, tu sors la syntaxe [mailj0] de son contexte sql Access et VBA ne comprend pas de quoi tu parles.
C'est surtout un problème de guillemets mal placés je pense et de valeur retournée par NbOpenDay
Voici ma proposition de code:

"update Table_Suivi_Incident set [ouvré1]= CStr(NbOpenDay([mailj0], etad))"

Avec la fatigue je sais pas si je suis clair mais j'espère que tu y trouveras de l'inspiration

subkiller

hach maintenant il me demande un argument (erreur 3061)

plus ça va moins je comprend

subkiller

bon bah tout compte fait j'ai contourné le probleme en passant par un recordset

Code :

Set db5 = CurrentDb
Set rs5 = db5.OpenRecordset("SELECT * FROM Table_Suivi_Incident where [clos]=0" )
'Set rs5 = db5.OpenRecordset("Table_Suivi_Incident", dbOpenDynaset)
Do Until rs5.EOF
'vdate1 = rs1.Fields("mailj0" )
'vjouvré = NbOpenDay(vdate1, vdate2)
vjouvré = NbOpenDay(rs5.Fields("mailj0" ), Now())
rs5.Edit
rs5.Fields("ouvré1" ) = vjouvré
rs5.Update
rs5.MoveNext
Loop

en tout cas merci jpcheck

jpcheck

Pioupiou

rs!mailj0 doit suffire, pas la peine du Fields.

De rien

bogoss1207

bonjour,

j'ai un probléme sur access, j'ai une bdd en réseau, on m'a été demandé d'effectuer un filtre par opération. sachant que ya pas de champs " operation, juste que le code correspendant à chaque opération est mentionné devant la designation dans le champ "désignation". ce qui veut dire que j'ai 2 infos dans un seul champ.
la bdd contient plus de 10000 enregistrements. et on se dispose de 8 opérations ( 8 codes).

comment peut-on reussir à faire un tri dans le tableau croisé dynamique par code d'opération?

merci de m'apporter votre aide j'en ai vivement besoin.

merci d'avance.

jpcheck

Pioupiou

peux tu créer un nouveau topic stp ?

FORUM HardWare.fr

Programmation

VB/VBA/VBS

VBA access requete SQL et fonction()

Sujets relatifs
vba access 2002 "wait"	fonction javascript qui regroupe 2 pages html
VBA access fermer word [résolu]	Problème de format sur le graphique Access sous Windows XP
MySQL et fonction PASSWOR('...')	requête et modification d'un champ
[sql] probleme requete sql.	Trigger SQL server 2005
Executer plusieurs requetes Access (a la suite ) avec un seul bouton
Plus de sujets relatifs à : VBA access requete SQL et fonction()

Page générée en 0.041 secondes