Problema query per copiare dati da TB A a TB B

[Pandax]

ho letto che forse è a causa della versione di access su server...

e per risolvere potrei fare così:

Function ReplaceText(StringIn as String) as String

Dim NewString as String

NewString = Replace(StringIn,"../../files/","../../public/archivio/")

ReplaceText = NewString

End function 

INSERT INTO [FILES_ARCHIVIO] (data,area,sezione,zona,tipologia,descrizione,link)
SELECT data,area,sezione,zona,tipologia,descrizione,ReplaceText(link) as LinkNEW FROM [FILES] 

solo che mi da questo errore:

Microsoft VBScript compilation error '800a03ee'

Expected ')'

/public/archivio/archiviazione_documenti.asp, line 106

Function ReplaceText(StringIn as String) as String