Question : Mettre à jour la question (ou le VBA) qui met à jour une base de données avec la date du dernier dossier créé dans une chemise

J'ai le code suivant que BlueDevilFan a écrit. ce code du

So regarde dans une chemise et trouve le dossier le plus récent créé dans cette chemise. Et soustrait cette date de la date d'aujourd'hui.

So que je veux employer ce code o quelque chose semblable pour mettre à jour une table sur la base de données. Ainsi, la question vérifiera chaque fonds à la table et à la chemise correspondante. Elle vérifiera le dernier dossier et saisira la date. Et mettre à jour une table avec les dates correspondantes. le

So, question de mise à jour du
The regardera dans Fundinfo ! FundName (nom des fonds) et FundInfo ! Chemise (l'endroit de la chemise aiment c:\aa\loca). Elle vérifiera la date du dernier dossier créé dessous (c:\aa\loca). Puis, elle ira au modhist ! FundName (fundname) et modhist ! LastFileDate (la date du dernier dossier a créé dans une chemise) et mettent à jour le modhist ! Il est facile comprendre LastFileDate avec la date de création du dossier le plus récent sous l'espoir du

I de c:\aa\loca) ceci. Si vous avez des questions me laissiez le know




class= > " clair " de

> de " codeSnippet " de class= de

class= " lineNumbers " de

class= de

1 : 2 : 3 : 4 : 5 : 6 : 7 : 8 : 9 : 10 : 11 : 12 : 13 : 14 : 15 : 16 : 17 : 18 : 19 :

fonction >Public " de l'id= " codeSnippet965111 de

class= de

Réponse : Mettre à jour la question (ou le VBA) qui met à jour une base de données avec la date du dernier dossier créé dans une chemise

Pardonner mes typos….

1 : 2 : 3 : 4 : 5 :

Placer les rs = le CurrentDb.OpenRecordset (« fundname choisi, chemise de FundInfo », dbOpenSnapshot) Faire tandis que pas rs.EOF CurrentDb.Execute (modHist LastFileDate réglé = # ' » et DateNewestFileInFolder (rs (« chemise » « de mise à jour)) et » « # où fundName = » « et rs (« fundname ») et » '") Boucle