17 lines
331 B
Plaintext
17 lines
331 B
Plaintext
FUNCTION remplazachar(str_ent)
|
|
|
|
DEFINE str_ent STRING
|
|
DEFINE str_sal STRING
|
|
DEFINE str_aux base.StringBuffer
|
|
|
|
LET str_aux = base.StringBuffer.create()
|
|
|
|
CALL str_aux.append(str_ent CLIPPED)
|
|
|
|
CALL str_aux.replace("\\","/",0)
|
|
|
|
LET str_sal="file:///",str_aux.toString()
|
|
|
|
RETURN str_sal
|
|
|
|
END FUNCTION |