---
title: "RegExp för att addera och subtrahera"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/11023-regexp-för-att-addera-och-subtrahera"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "OveRRidE"
published: "2001-08-07T22:50:00.000Z"
updated: "2001-08-09T14:24:00.000Z"
replies: 6
views: 225
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/11023-regexp-för-att-addera-och-subtrahera"
---

# RegExp för att addera och subtrahera

## #1 — OveRRidE, 2001-08-07T22:50Z

Jag har suttit som en dåre och försökt förstå mig på RegExp, men det går inte. Iallafall inte alla delar av det.. :e

Mitt fall: 
Jag har ett bildnamn, ex **IM000378.JPG** som skall formateras en aning. Det jag vill få ut ur funktionen är samma bildnamn, fast ett steg högre OCH ett steg lägre. 

Jag vill alltså av denna "string" ha ut exempelvis **IM000379.JPG** och **IM000377.JPG**. 

Är det någon som förstår? :) ;)

Skulle uppskatta all hjälp, tack på förhand.

Permalänk: https://www.webforum.nu/p/11023

## #2 — Vide, 2001-08-07T23:02Z

Du behöver bara amvända lite simpla strängfunktioner... ;)

```
strImg = "IM000378.JPG"
strTmp = Left(strImg,2) & Cint(Mid(strImg,3,6)) + 1 & Right(strImg,4)
```

Fast du kommer få problem med att nummren börjar på 000.

Permalänk: https://www.webforum.nu/p/283235

## #3 — Vide, 2001-08-07T23:17Z

Gjorde en liten funktion för det :)

```
Function StrAdd(str,interval)
strLen = Len(str)
strTmp = Cint(str) + interval
If Len(strTmp) < strLen Then
For i = 0 To strLen - Len(strTmp)
strZero = strZero & "0"
Next
StrAdd = strZero & strTmp
Else
StrAdd = strTmp
End If
End Function
```

Så resten borde se ut såhär då:

```
strImg = "IM000378.JPG"
strTmp = Left(strImg,2) & StrAdd(Mid(strImg,3,6),1) & Right(strImg,4)
```

Permalänk: https://www.webforum.nu/p/283236

## #4 — OveRRidE, 2001-08-08T06:16Z

Tack!

Skall pröva det, återkommer efter test.

Permalänk: https://www.webforum.nu/p/283237

## #5 — OveRRidE, 2001-08-08T20:37Z

**Rättelse efter tre gånger felskrivet..**

Helt sanslöst, jag klantade till det igen! :x

Jag får ut **IM0000379.JPG**.. en nolla för mycket..

Permalänk: https://www.webforum.nu/p/283238

## #6 — Vide, 2001-08-08T22:32Z

Det skall självklart vara en etta istället för en nolla i loopen:

```
For i = 1 To strLen - Len(strTmp)
```

Permalänk: https://www.webforum.nu/p/283239

## #7 — OveRRidE, 2001-08-09T14:24Z

Tack!

Permalänk: https://www.webforum.nu/p/283240

---

Tråden på webben: https://www.webforum.nu/amne/asp/11023-regexp-för-att-addera-och-subtrahera