Discussion :

[casa51]

Bonjour,
Voila j’importe une base de donnée .csv dans une table dans sql serveur 2000
Dans mon.csv il y a une colonne « photo » ou sont mis en vrac le nom des photos correspondant au match « base de donnée club de rugby » toute ces photo sont séparer par un pipe elles sont aussi nommé de de façon unique ex :
Pour l’id 123 dans la colonne photo j’aurai 123_1.jpg | 123_2.jpg |123_3.jpg
J’aimerai via une commande sous sql pouvoir réattribuer c’est nom dans des colonnes spécifique
Ex pour l’id 123
Photo1 photo2 photo 3
123_1.jpg 123_2.jpg 123_3.jpg

Merci si vous avez une astuce

[pacmann]

Si tes noms d'images sont dans une colonne d'une table, tu peux faire le select avec ces outils :

CHARINDEX('|', col, n) : te donne la position de l'occurence de '|' dans col.

SUBSTRING(col, m, n) : te donne la sous chaîne de col à partir du caractère d'indice m, d'une longueur de n caractères

Donc par exemple,
SELECT SUBSTRING(col, 1, CHARINDEX('|', col, 1) - 1)
FROM TABLE

devrait te renvoyer ta première photo (à peu près).

SELECT SUBSTRING(Col, CHARINDEX('|', col, 1) + 1, CHARINDEX('|', col, CHARINDEX('|', col, 1)) - CHARINDEX('|', col, 1))
FROM TABLE

devrait te renvoyer ta deuxième photo (à peu près)

...

[casa51]

cool
merci je vais essayer

[casa51]

voila finalement j ai resolu le probleme
avec une fontion en asp qui est bien foutu :
vla le code si sa interesse quelqun on ne sait jammais :
---------------------------------------------------------------------

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
Dim WC , Pos
   If VarType(S) <> 8 Or Len(S) = 0 Then
     CountCSWords = 0
     Exit Function
   End If
   WC = 1
   Pos = InStr(S, "|")
   Do While Pos > 0
     WC = WC + 1
     Pos = InStr(Pos + 1, S, "|")
   Loop
   CountCSWords = WC
End Function
 
Function GetCSWord(ByVal S, Indx)
' Returns the nth word in a specific field.
 
Dim WC, SPos , EPos
   WC = CountCSWords(S)
   If Indx < 1 Or Indx > WC Then
     GetCSWord = Null
     Exit Function
   End If
   Count = 1
   SPos = 1
   For Count = 2 To Indx
     SPos = InStr(SPos, S, "|") + 1
   Next
   EPos = InStr(SPos, S, "|") - 1
   If EPos <= 0 Then EPos = Len(S)
   GetCSWord = Trim(Mid(S, SPos, EPos - SPos + 1))
End Function

on l'appele apres via

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
GetCSWord([strphotosource],1) pour la premiere photo
GetCSWord([strphotosource],2) pour la deuxieme ....

merci pour m'avoir mis sur la voie

[pacmann]

Aaaah, tu voulais le faire par code !
Dans ce cas, dans les langages, tu as toujours des fonctions de ce genre.
En VB, split:
Dim s as string = "a|b|c"
Dim res as string()
res = s.split(CChar("|"))

ça te donne :
res.length => 3
res(0) => "a"
res(1) => "b"
res(2) => "c"