Tage noget ud af en tekst

Du kan enten lave noget InStr, Mid spagetti.

Eller du kan bruge regex.

VBS regex eksempel:

s = "[blabla='eksempel' skaludtages='9999' blabla='eksempel']"
Set re = New RegExp
re.Pattern = "(?:skaludtages=')(\d+)(?:')"
re.Global = True
Set mm = re.Execute(s)
Set m = mm.Item(0)
WScript.Echo "værdi=" &  m.SubMatches(0)
Set m = Nothing
Set mm = Nothing
Set re = Nothing

Hej Arne.
Jeg prøvede regex eksempel, men kunne ikke få det til at funke (det skal siges at jeg bruger vb6.0)

Jeg ville have brugt instr, hvis det ikke var fordi jeg startede igen på VB6 for nylig, og kan ikke huske alle de forskellige koder pga. min dårlige hukommelse :D

Forresten, jeg kan ikke bruge mid, da valuen ikke altid er i midten :-) Ellers har jeg misforstået "mid" tingen :D

Ja.

Du angive hvad den skal tage.

http://www.w3schools.com/vbscript/func_mid.asp

Men lad mig lige prøve og starte min gamle NT 4 box med VB6 og se om jeg kan få regex til at virke.

Følgende virker fint hos mig i VB6:

Private Sub Command1_Click()
    Dim s As String
    Dim re As RegExp
    Dim mm As MatchCollection
    Dim m As Match
    s = "[blabla='eksempel' skaludtages='9999' blabla='eksempel']"
    Set re = New RegExp
    re.Pattern = "(?:skaludtages=')(\d+)(?:')"
    re.Global = True
    Set mm = re.Execute(s)
    Set m = mm.Item(0)
    MsgBox "værdi=" & m.SubMatches(0)
    Set m = Nothing
    Set mm = Nothing
    Set re = Nothing
End Sub

Efter at jeg lige fandt dette på nettet:

To use this library in your Visual Basic application, select Project|References in the VB IDE's menu. Scroll down the list to find the item "Microsoft VBScript Regular Expressions 5.5".

Tusind tak..
Gi' et svar :-)

kommer her

Kan man få den der regex ting til også at kunne se bogstaver i value?

Jo da.

re.Pattern = "(?:skaludtages=')([ABCabc123]+)(?:')"

tillader tegn fra ABCabc123.

re.Pattern = "(?:skaludtages=')([A-Za-zÆØÅæøå0-9]+)(?:')"

tillader alle danske bogstaver og tal.

Takker endnu engang! Din placering på Eksperten er velfortjent :-)

Men lige et allersidste spørgsmål-

Hvordan tillader jeg ALT bortset fra ' ?

[^']+

hat på betyder alt andet end det efterfølgende