Opdateringsforespørgsel - tilføjelse af data flere steder i en post

Det kan gøres med en opdatering i stil med dette:

"/x" & Left([felt1];2) & "/x" & Mid([felt1];3;2) & "/x" & Mid([felt1];6;2) & "/x" o.s.v.

Der er muligvis andre smartere måder, men dette skulle kunn bruges :

SELECT "/x" & Mid([DinTabel]![DitFelt],1,2) & "/x" & Mid([DinTabel]![DitFelt],3,2) & "/x" & Mid([DinTabel]![DitFelt],5,2) ...... osv ... AS Omformet
FROM DinTabel;

Try making a function somthing like this and then in you update query call the function with the original string in the update to field


Public Function ConvString(Si As String) As String

Dim i As Integer, o As Integer
Dim So As String

So = "\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x\x"

o = 1

    For i = 1 To 32
       
        If i Mod 2 = 1 Then
           
            o = o + 2
        End If
       
        Mid(So, o, 2) = Mid(Si, i, 1)
       
        o = o + 1
   
   
    Next i

    ConvString = So

End Function



SQL something like this

UPDATE tbl1 SET tbl1.Txt = ConvString([txt]);

Hej Jensen :-)

Fik dit svar til at virke først :-) - derfor tildeler jeg dig pointene - hvis du altså vil svare - og ikke blot kommentere :-)

mvh

Søren C

Jeg svarer :-)