|
|
 | Kun Replace-funktion på noget af teksten
Fra : MooreHojer |
Dato : 24-09-05 13:31 |
|
Hej NG
Jeg vil gerne fjerne alle '.' i en tekststreng, undtagen det sidste, og
erstatte dem med '_'.
F.eks. vil jeg gerne have 'program.februar.2005.xls' til at blive til
'program_februar_2005.xls'
Hvordan gør jeg det?
På Forhånd Tak!
--
MooreHojer
| |
 jamen (24-09-2005)
| Kommentar
Fra : jamen |
Dato : 24-09-05 15:04 |
|
MooreHojer wrote:
> Jeg vil gerne fjerne alle '.' i en tekststreng, undtagen det sidste, og
> erstatte dem med '_'.
>
> F.eks. vil jeg gerne have 'program.februar.2005.xls' til at blive til
> 'program_februar_2005.xls'
En mulighed:
fil = "program.februar.2005.xls"
pos = InStrRev(fil, ".") 'position på sidste punktum
fil2 = Replace(Left(fil, pos-1), ".", "_") + Mid(fil, pos)
Response.Write fil2
| |
MooreHojer (24-09-2005)
| Kommentar
Fra : MooreHojer |
Dato : 24-09-05 15:20 |
|
> En mulighed:
>
> fil = "program.februar.2005.xls"
>
> pos = InStrRev(fil, ".") 'position på sidste punktum
> fil2 = Replace(Left(fil, pos-1), ".", "_") + Mid(fil, pos)
>
> Response.Write fil2
Takker 
--
MooreHojer
| |
|
|