OVH Cloud OVH Cloud

modifier le chemin d'un fichier

7 réponses
Avatar
fth
Bonjour,

mon appli affiche des photos.
le chemin d'origine des photos doit etre changé pour tous les
enregistrements.
j'ai donc le champ Path1 (original) que j'aimerais modifier dans Path2

une bonne idée à me transmettre?
d'avance merci

Frederic

7 réponses

Avatar
Nobodyisperfect
Salut Frédéric
Fais une requête sur ta table incriminée, puis fais une mise à jour de
ton champ Chemin par ton nouveau Path et le tour est joué ;o)

@+
Olivier
Avatar
fth
Salut Olivier,

Heuuu, j'ai pas bien exposé mon probleme...
dans le champ "chemin", j'ai le path ET le nom du fichier...
d'ou mon soucis ...
Potferdek hein!?

uyne autre idée?
d'vance merci

Frédéric


"Nobodyisperfect" wrote in message
news:
Salut Frédéric
Fais une requête sur ta table incriminée, puis fais une mise à jour de
ton champ Chemin par ton nouveau Path et le tour est joué ;o)

@+
Olivier




Avatar
3stone
Salut,

"fth"
| Heuuu, j'ai pas bien exposé mon probleme...
| dans le champ "chemin", j'ai le path ET le nom du fichier...
| d'ou mon soucis ...



Si le chemin d'accès est identique pour toutes les photos, il est avantageux
de placer ce path dans une petite table "tblParametres" par exemple...
Cela permet de ne changer que celui-là en cas de déplacement du
répertoire photo.

Pour ton problème, regarde la fonction InstrRev() qui te permetra
de rechercher le dernier "" dans le path et de modifier ce qui précède.

Ou une ch'tit fonction...


Function fnChangePath(sPathOriginal, sNeuPath) As String
Dim iPos As Integer
fnChangePath = sNeuPath & Mid(sPathOriginal, InStrRev(sPathOriginal, ""))
End Function


que tu utilise dans ta requête de mise à jour de cette façon :


champ: PathPhotos
mise à jour: fnChangePath([PathPhotos];"c:nouveau path")


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
fth
Salut Pierre,

Merci pour l'info, je teste direK!

Heuu, si tu avais une autre idée dans le mm genre pour mon precedent post ..
" Creer un string à partir d'une liste ..."

sans abuser...?

Merci

Frederic
"3stone" wrote in message
news:e$
Salut,

"fth"
| Heuuu, j'ai pas bien exposé mon probleme...
| dans le champ "chemin", j'ai le path ET le nom du fichier...
| d'ou mon soucis ...



Si le chemin d'accès est identique pour toutes les photos, il est
avantageux
de placer ce path dans une petite table "tblParametres" par exemple...
Cela permet de ne changer que celui-là en cas de déplacement du
répertoire photo.

Pour ton problème, regarde la fonction InstrRev() qui te permetra
de rechercher le dernier "" dans le path et de modifier ce qui précède.

Ou une ch'tit fonction...


Function fnChangePath(sPathOriginal, sNeuPath) As String
Dim iPos As Integer
fnChangePath = sNeuPath & Mid(sPathOriginal, InStrRev(sPathOriginal,
""))
End Function


que tu utilise dans ta requête de mise à jour de cette façon :


champ: PathPhotos
mise à jour: fnChangePath([PathPhotos];"c:nouveau path")


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/



Avatar
fth
Pierre,

Il me demande un signe = ...

le path d'origine, auquel je n'ai pas acces sur la machine de dvpmt, est
"./Upload/"
et le nouveau path sera du genre d: etc ..

ceci expliquerais cela?

D'avance merci

Frédéric

"3stone" wrote in message
news:e$
Salut,

"fth"
| Heuuu, j'ai pas bien exposé mon probleme...
| dans le champ "chemin", j'ai le path ET le nom du fichier...
| d'ou mon soucis ...



Si le chemin d'accès est identique pour toutes les photos, il est
avantageux
de placer ce path dans une petite table "tblParametres" par exemple...
Cela permet de ne changer que celui-là en cas de déplacement du
répertoire photo.

Pour ton problème, regarde la fonction InstrRev() qui te permetra
de rechercher le dernier "" dans le path et de modifier ce qui précède.

Ou une ch'tit fonction...


Function fnChangePath(sPathOriginal, sNeuPath) As String
Dim iPos As Integer
fnChangePath = sNeuPath & Mid(sPathOriginal, InStrRev(sPathOriginal,
""))
End Function


que tu utilise dans ta requête de mise à jour de cette façon :


champ: PathPhotos
mise à jour: fnChangePath([PathPhotos];"c:nouveau path")


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/



Avatar
3stone
re,

"fth"
| Il me demande un signe = ...
|
| le path d'origine, auquel je n'ai pas acces sur la machine de dvpmt, est
| "./Upload/"
| et le nouveau path sera du genre d: etc ..


remplace le backslash par une slash...


Function fnChangePath(sPathOriginal, sNeuPath) As String
Dim iPos As Integer
fnChangePath = sNeuPath & Mid(sPathOriginal, InStrRev(sPathOriginal, "/"))
End Function



--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
fth
Salut Pierre,

Merci pour les coups de pouces, la je sens que mes neurones redemarent!!!
je cherche maitenant à me servir de ce qui précede pour afficher la photo
dans mon formulaire ...

Bon Week end,

A+

Frédéric

"3stone" wrote in message
news:
re,

"fth"
| Il me demande un signe = ...
|
| le path d'origine, auquel je n'ai pas acces sur la machine de dvpmt, est
| "./Upload/"
| et le nouveau path sera du genre d: etc ..


remplace le backslash par une slash...


Function fnChangePath(sPathOriginal, sNeuPath) As String
Dim iPos As Integer
fnChangePath = sNeuPath & Mid(sPathOriginal, InStrRev(sPathOriginal,
"/"))
End Function



--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/