Fijar los rs = CurrentDb.OpenRecordset (“fundname selecto, carpeta de FundInfo”, el dbOpenSnapshot)
Hacer mientras que no rs.EOF
CurrentDb.Execute (“modHist LastFileDate determinado = # '” y DateNewestFileInFolder (rs (“carpeta” de la actualización)) y” “# donde fundName =” “y rs (“fundname”) y” '")
Lazo
|