in string zeichen einfügen

[Mikele]

hallo helfer (-innen),

ich habe folgendes problem und möchte wissen, ob ich es mit sql lösen kann:

ich habe in ms access 2003 eine tabelle mit u.a. einem textfeld. in diesem textfeld möchte ich die strings wie folgt erweitern.

vorher: "michael" nachher: "m_i_c_h_a_e_l_" oder
vorher: "paul" nachher: "p_a_u_l_"

gruss

[CodeGier]

SQL-mäßig sehe ich da keinen Weg, aber per VBA in ACCESS. Ich kann zwar eigentlich kein VBA, aber dafür hat es gerade noch gereicht:

Public Function Schredder(S1 As String) As String
Dim zeichen, Neu
For zeichen = 1 To Len(S1)
Neu = Neu & Mid(S1, zeichen, 1) & "_"
Next zeichen
Schredder = Neu
End Function

Der SQL String kann dann z.B. so aussehen:

SELECT Schredder(Vorname) From Adressen

Ciao

CodeGier