[prob php] recherche à partir d'un bout de ti
sebalab
-
phil232 Messages postés 610 Statut Membre -
phil232 Messages postés 610 Statut Membre -
Bonjour,
je me heurte à un gros probleme, j'ai des photos nomé comme dynamique dans la forme 5636_7896589_a1.jpg , 5636_7896589_b1.jpg , etc .....
et dans une base de donné 7896589 corespond à une reference client a, b, c , et c.... corespond à chaque fois à une nouvelle image.
j'aimerai pouvoir faire un script qui me permetrai de chercher parmis les photos presente dans un dossier les photos ayant dans leur nom 7896589, et le a1, b1 etc..... decliné a chaque fois s'il y en a.
ceci dans le but de retravaillé sur ces photos pour les redimentionner avant des inscrire definitivement dans mon site.
je cherche en vain, et ne trouve rien, quelqu'un peut-il m'aider.
je me heurte à un gros probleme, j'ai des photos nomé comme dynamique dans la forme 5636_7896589_a1.jpg , 5636_7896589_b1.jpg , etc .....
et dans une base de donné 7896589 corespond à une reference client a, b, c , et c.... corespond à chaque fois à une nouvelle image.
j'aimerai pouvoir faire un script qui me permetrai de chercher parmis les photos presente dans un dossier les photos ayant dans leur nom 7896589, et le a1, b1 etc..... decliné a chaque fois s'il y en a.
ceci dans le but de retravaillé sur ces photos pour les redimentionner avant des inscrire definitivement dans mon site.
je cherche en vain, et ne trouve rien, quelqu'un peut-il m'aider.
A voir également:
- [prob php] recherche à partir d'un bout de ti
- Creer un groupe whatsapp a partir d'un autre groupe - Guide
- Comment faire une recherche à partir d'une photo - Guide
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Utorrent recherche de pairs ✓ - Forum Téléchargement
- Combien y a-t-il de bateaux dans la zone de 475 pixels de large et 1000 pixels de haut à partir du coin supérieur gauche de cette image ? - Forum Photoshop
3 réponses
Sub SearchFiles(SearchFolder, SearchName)
Dim fso 'As Scripting.FileSystemObject
Dim f 'As File
Dim fld 'As Folder
Dim fi
Dim SearchFolder
Dim SearchName
SearchFolder = "C:\UserTemp"
SearchName = "rg"
Set fso = CreateObject("Scripting.FileSystemObject")
Set fld = fso.GetFolder(SearchFolder)
Set fi = fso.OpenTextFile("c:\UserTemp\testfile.txt", 2, True) 'ForWriting
For Each f In fld.Files
If InStr(UCase(f.Name), UCase(SearchName)) > 0 Then
fi.WriteLine f.Name
End If
Next
fi.Close
Set fso = Nothing
Set fld = Nothing
Set fi = Nothing
Set f = Nothing
End Sub
Dim fso 'As Scripting.FileSystemObject
Dim f 'As File
Dim fld 'As Folder
Dim fi
Dim SearchFolder
Dim SearchName
SearchFolder = "C:\UserTemp"
SearchName = "rg"
Set fso = CreateObject("Scripting.FileSystemObject")
Set fld = fso.GetFolder(SearchFolder)
Set fi = fso.OpenTextFile("c:\UserTemp\testfile.txt", 2, True) 'ForWriting
For Each f In fld.Files
If InStr(UCase(f.Name), UCase(SearchName)) > 0 Then
fi.WriteLine f.Name
End If
Next
fi.Close
Set fso = Nothing
Set fld = Nothing
Set fi = Nothing
Set f = Nothing
End Sub
